Warning, /verification/tutorial_deep_convection/input/gen_ini.m is written in an unsupported language. File is not indexed.
view on githubraw file Latest commit add29e06 on 2018-01-31 20:35:05 UTC
213f3ebfc9 Jean*0001 %-- In order to run a short test where "something" happens,
0002 % provide pseudo initial conditions which correspond to the output
0003 % of a standard run, at t=2.h, when convection starts to develop.
0004
0005 it=360; %- t= 2.h in the simulation
0006
0007 namF='T';
0008 var=rdmds(namF,it);
0009 fid=fopen([namF,'.120mn.bin'],'w','b'); fwrite(fid,var,'real*4'); fclose(fid);
0010
0011 namF='Eta';
0012 var=rdmds(namF,it);
0013 fid=fopen([namF,'.120mn.bin'],'w','b'); fwrite(fid,var,'real*4'); fclose(fid);
0014
0015 namF='U';
0016 var=rdmds(namF,it);
0017 fid=fopen([namF,'.120mn.bin'],'w','b'); fwrite(fid,var,'real*4'); fclose(fid);
0018
0019 namF='V';
0020 var=rdmds(namF,it);
0021 fid=fopen([namF,'.120mn.bin'],'w','b'); fwrite(fid,var,'real*4'); fclose(fid);
0022