MITgcm_contrib/quarter_degree_global/partial_files.m

freq=30.5;
init=datenum(1992,1,1);
delt=200;
pn='lou:/u/menemenl/eigth/BULK/output200';
for m=2:9
 dte=datenum(2000,m,1);
 ts=(dte-init)*24*60*60/delt;
 per=(dte-init-(8*12+m-2)*freq)*24;
 disp([int2str(delt) ' ' myint2str(ts,10) ' ' int2str(per) ' ' ...
       datestr(dte) ' ' pn])
end
delt=300;
pn='lou:/u/menemenl/eigth/BULK/output300_badMonthlyDumps';
for m=10:29
 dte=datenum(2000,m,1);
 ts=(dte-init)*24*60*60/delt;
 per=(dte-init-(8*12+m-2)*freq)*24;
 disp([int2str(delt) ' ' myint2str(ts,10) ' ' int2str(per) ' ' ...
       datestr(dte) ' ' pn])
end
pn='c20:/nobackup20/menemenl/eighth/MITgcm/exe/output';
for m=30:63
 dte=datenum(2000,m,1);
 ts=(dte-init)*24*60*60/delt;
 per=(dte-datenum(2000,m-1,1))*24;
 if m==61, per=18; end
 disp([int2str(delt) ' ' myint2str(ts,10) ' ' myint2str(per,3) ...
       ' ' datestr(dte) ' ' pn])
end
1	freq=30.5;
2	init=datenum(1992,1,1);
3	delt=200;
4	pn='lou:/u/menemenl/eigth/BULK/output200';
5	for m=2:9
6	dte=datenum(2000,m,1);
7	ts=(dte-init)2460*60/delt;
8	per=(dte-init-(812+m-2)freq)*24;
9	disp([int2str(delt) ' ' myint2str(ts,10) ' ' int2str(per) ' ' ...
10	datestr(dte) ' ' pn])
11	end
12	delt=300;
13	pn='lou:/u/menemenl/eigth/BULK/output300_badMonthlyDumps';
14	for m=10:29
15	dte=datenum(2000,m,1);
16	ts=(dte-init)2460*60/delt;
17	per=(dte-init-(812+m-2)freq)*24;
18	disp([int2str(delt) ' ' myint2str(ts,10) ' ' int2str(per) ' ' ...
19	datestr(dte) ' ' pn])
20	end
21	pn='c20:/nobackup20/menemenl/eighth/MITgcm/exe/output';
22	for m=30:63
23	dte=datenum(2000,m,1);
24	ts=(dte-init)2460*60/delt;
25	per=(dte-datenum(2000,m-1,1))*24;
26	if m==61, per=18; end
27	disp([int2str(delt) ' ' myint2str(ts,10) ' ' myint2str(per,3) ...
28	' ' datestr(dte) ' ' pn])
29	end