/[MITgcm]/MITgcm_contrib/llc_hires/llc_4320/check_output.m
ViewVC logotype

Contents of /MITgcm_contrib/llc_hires/llc_4320/check_output.m

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.2 - (show annotations) (download)
Thu May 12 01:21:56 2016 UTC (7 years, 10 months ago) by dimitri
Branch: MAIN
CVS Tags: HEAD
Changes since 1.1: +1 -0 lines
saving changes before pleiades shutdown

1 pn='~dmenemen/llc_4320/MITgcm/run_485568/';
2 fld={'Eta','KPPhbl','PhiBot','SIarea','SIheff','SIhsalt', ...
3 'SIhsnow','SIuice','SIvice','oceFWflx','oceQnet', ...
4 'oceQsw','oceSflux','oceTAUX','oceTAUY', ...
5 'Salt','Theta','U','V','W'};
6 ts=485568:144:976320;
7 ts=976320:144:1037376;
8 for t=ts, disp(t)
9 for f=1:length(fld)
10 fnm=[pn fld{f} '.' myint2str(t,10) '.data'];
11 D=dir(fnm);
12 switch fld{f}
13 case{'Salt','Theta','U','V','W'}
14 sz=87340032000;
15 otherwise
16 sz=970444800;
17 end
18 if D.bytes~=sz
19 error(['Wrong file size for ' fnm])
20 end
21 end
22 end

  ViewVC Help
Powered by ViewVC 1.1.22