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 |