Commit a042e7ba authored by Jérémy Baudry's avatar Jérémy Baudry

first commit

parents
,jeremy,jeremy-ThinkPad-T410,29.11.2016 10:02,file:///home/jeremy/.config/libreoffice/4;
\ No newline at end of file
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
File added
File added
File added
!
! _______________________
! | |
! | WIM PARAMETERS |
! |_______________________|
!______________________________________________________________________________
! WAVES PARAMETERS:
!
! Tm -> Peak period [s]
! Hs -> Significant wave height [m]
! disp -> Allowing wave dispersion
! 0: Wave dispersion is not allowed,
! group speed is the same at all spectrum
! frequency (cg=max[cg(w)])
! 1: Wave dispersion is allowed
!------------------------------------------------------------------------------
&waves_parameters
Tm =8
Hs =1.5
disp =0
/
!______________________________________________________________________________
! MODEL PARAMETERS:
!
! nbin -> Number of grid bin
! dx -> Spatial resolution [m]
! Cfl -> Courant–Friedrichs–Lewy condition (0<Cfl<1)
! Only in the case where disp=0. The CFL condition
! is needed to calculate the time step.
! name_sim -> name of the output file
! root -> destination folder for the output file
!------------------------------------------------------------------------------
&model_parameter
nbin =100
dx =5000
Cfl =1
name_sim ='SIMWG'
root = 'output/'
/
!______________________________________________________________________________
! SPECTRUM PARAMETERS:
!
! init_spec -> method to build the initial wave spectrum
! 3: From observations
! 2: Swell
! 1: JONSWAP spectrum
! 0: Bretschneider spectrum
! nfreq -> number of frequency bin
! Tmin -> Minimum period [s]
! Tmax -> Maximum period [s]
! alpha_s -> parameter for jonswap spectrum (init_spec=1)
! beta_s -> parameter for jonswap spectrum (init_spec=1)
! gamma_s -> parameter for jonswap spectrum (init_spec=1)
! swell_T -> swell period (init_spec=2)
! swell_Hs -> swell significant height (init_spec=2)
! spec_file -> path to the input spectrum (init_spec=3)
! freq_file -> path to the frequencies file (init_spec=3)
!------------------------------------------------------------------------------
&spectrum_parameters
init_spec =0
nfreq =800
Tmin =2.5
Tmax =20
alpha_s =0.2044
beta_s =1.2500
gamma_s =3.3
swell_T =19
swell_Hs=0.09
spec_file='input/AWAC/2015-2016/spectre.dat'
freq_file='input/AWAC/2015-2016/freq.dat'
/
!______________________________________________________________________________
! ICE PARAMETERS
!
! X_ice -> Distance of the ice edge [m]
! c_cice -> Ice concentration
! ice_thick -> method for compute the ice thickness
! 0: constant thickness
! 1: thickness is a function of distance
! from ice edge
! hice -> Ice thickness (if ice_thick=0) [m]
! hmax -> Maximum ice thickness (if ice_thick=1) [m]
! Xh -> distance where h=hmax/2 (if ice_thicl=1) [m]
!------------------------------------------------------------------------------
&ice_parameters
X_ice =25000
cice =1
ice_thick =1
hice =3
hmax =4
Xh =200000
strain_crit =3e-5
P_c =0.3
/
!________________________________________________________________________________
! FSD PARAMETERS
! FSD_sheme -> method for compute <D>
! 0: dumont et al (2011)
! 1: power law
!
! minfloe -> minimum size floe to build the floe size categories [m]
! maxfloe -> maximum size floe to build the floe size categories [m]
! nbcat -> number of floe size categories
!--------------------------------------------------------------------------------
&fsd_parameters
FSD_scheme =1
minfloe =5
maxfloe =400
nbcat =60
/
!_________________________________________________________________________________
! IDT PARAMETERS
!IDT_scheme -> compute the ice thickness distribution
0: no distribution
1: distribution (rayleigh)
!mu_IDT -> parameter for the distribution
!mincat_h -> minimum ice thickness category
!maxcat_h -> maximum ice thickness category
!nbcat_h -> number of ice thickness categories
!---------------------------------------------------------------------------------
&idt_parameters
IDT_scheme =1
mu_IDT =0.5
mincat_h =0.1
maxcat_h =8
nbcat_h =50
/
!________________________________________________________________________________
File added
0.29411764705882354 0.58529411764705885 0.77941176470588236 0.97352941176470587 1.1676470588235295 1.3617647058823530 1.5558823529411767 1.7500000000000000 1.9441176470588235 2.1382352941176470 2.3323529411764707 2.5264705882352940 2.7205882352941178 2.9147058823529415 3.1088235294117648 3.3029411764705885 3.4970588235294118 3.6911764705882355 3.8852941176470592 4.0794117647058821 4.2735294117647058 4.4676470588235286 4.6617647058823533 4.8558823529411761 5.0499999999999998 5.2441176470588236 5.4382352941176464 5.6323529411764710 5.8264705882352938 6.0205882352941167 6.2147058823529413 6.4088235294117641 6.6029411764705888 6.7970588235294116 6.9911764705882344 7.1852941176470591 7.3794117647058819 7.5735294117647056 7.7676470588235293 7.9617647058823522 8.1558823529411768 8.3499999999999996 8.5441176470588225 8.7382352941176471 8.9323529411764717 9.1264705882352928 9.3205882352941174 9.5147058823529420 9.7088235294117649 9.9029411764705877
This diff is collapsed.
clear all;
close all;
cmap=jet(5);
w=load('wavelength_ice.dat');
strain=load('strain.dat');
cat_h=load('cat_h.dat');
a=[1 2 4 7 10];
fig=figure;
%
set(fig,'Units','inches');
set(fig,'Position',[0 2.7111 8.2000 4.3333]);
set(fig,'OuterPosition',[0 2.7111 8.2000 5.3333]);
set(fig,'PaperUnits','inches');
set(fig,'PaperPosition',[0 0 8.2000 4.3333]);
set(fig,'PaperPositionMode','manual');
set(fig,'PaperOrientation','portrait');
set(fig,'PaperSize',[8.2000 5.3333]);
for i=1:5
plot(w(a(i),:),strain(a(i),:),'color',cmap(i,:),'linewidth',1.5)
hold on
end
l=legend('h=0.3 m','h=0.5 m','h=0.1 m','h=1.5','h=2 m');
set(gca,'fontsize',16)
set(l,'fontsize',16)
set(l,'interpreter','latex','Box','off','location','eastoutside');
xlabel('$\lambda_{ice}$ [m]','interpreter','latex','fontsize',16)
ylabel('$\sigma$ per meter amplitude','interpreter','latex','fontsize',16)
saveas(gcf,'strain_ice','epsc')
\ No newline at end of file
This diff is collapsed.
clear all;
close all;
fig=figure;
% fig.Units='inches';
% fig.Position=[6 6 9 3.2];
% fig.OuterPosition=[6 6 9 3.2];
%
% fig.PaperUnits = 'inches';
% fig.PaperPosition = [0 0 9 3.2];
% fig.PaperPositionMode = 'manual';
% fig.PaperOrientation='landscape';
% fig.PaperSize=[9 3.2];
%
for n=3
titre1=['10^{-6}';'10^{-4}';'10^{-3}';'10^{-2}'];
titre2=cellstr(titre1);
dos1=['1e6 ';'1e4 ';'test ';'1e2 '];
dos2=cellstr(dos1);
dossier=[num2str(n),'mu1';num2str(n),'mu2';num2str(n),'mu3';dos2(n);num2str(n),'mu4'];
dossier=cellstr(dossier);
diffus=['1e-2_uniforme'];
mix=[1e-6 1e-4 1e-3 1e-2];
mu=[0.5 1 1.5 2 2.5]/86400;
col=['mo';'ro';'bo';'ko'];
col=cellstr(col);
for i=1:5
dos=char(dossier(i));
number(:,n)=sqrt(mu/mix(n));
lagbiomass=load(['~/projets/correction_memo/output/',dos,'/weight_',diffus,'.dat']);
eulbiomass=load(['~/projets/correction_memo/output/',dos,'/eulerian_',diffus,'.dat']);
biolag_tot=sum(lagbiomass,2)*0.5;
bioeul_tot=sum(eulbiomass,2)*0.5;
std=sqrt((biolag_tot-bioeul_tot).^2./bioeul_tot.^2)*100;
std(1:3)=0;
maxstd(i,n)=max(std);
maxbio(i,n)=max(biolag_tot);
plot(std)
hold on
end
end
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment