Skip to content
Snippets Groups Projects
Commit 49296686 authored by Antoine Cyril David Hoffmann's avatar Antoine Cyril David Hoffmann
Browse files

move matlab auxiliary script

parent 92ffdefc
No related branches found
No related tags found
No related merge requests found
......@@ -5,10 +5,8 @@ Ni00_ = []; Ne00_ = [];
PHI_ = [];
Ts2D_ = [];
Ts5D_ = [];
if strcmp(OUTPUTS.write_non_lin,'.true.')
Sipj_ = []; Sepj_ = [];
end
while(CONTINUE)
filename = sprintf([BASIC.RESDIR,'outputs_%.2d.h5'],JOBNUM);
......@@ -22,10 +20,9 @@ while(CONTINUE)
Ts2D_ = cat(1,Ts2D_,Ts2D);
Ts5D_ = cat(1,Ts5D_,Ts5D);
if strcmp(OUTPUTS.write_non_lin,'.true.')
Sipj_ = cat(5,Sipj_,Sipj);
Sepj_ = cat(5,Sepj_,Sepj);
end
JOBNUM = JOBNUM + 1;
else
CONTINUE = 0;
......@@ -36,7 +33,7 @@ Nipj = Nipj_; Nepj = Nepj_; Ts5D = Ts5D_;
Ni00 = Ni00_; Ne00 = Ne00_; PHI = PHI_; Ts2D = Ts2D_;
clear Nipj_ Nepj_ Ni00_ Ne00_ PHI_ Ts2D_ Ts5D_
if strcmp(OUTPUTS.write_non_lin,'.true.')
Sipj = Sipj_; Sepj = Sepj_;
clear Sipj_ Sepj_
end
\ No newline at end of file
filename = sprintf([BASIC.RESDIR,'outputs_%.2d.h5'],JOBNUM-1);
\ No newline at end of file
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment