MPMice/arctic36km/lookat.m

pn='/homes/dmenemen/Arctic36km/MITgcm/exe/';
nx=210;
ny=192;
nme='SIheff';
for ts=36:36:262980
 fn=[pn nme '.' myint2str(ts,10) '.data'];
 if exist(fn)
  fld=readbin(fn,[nx ny]);
  clf
  mypcolor(fld');
  caxis([0 5])
  thincolorbar
  title(['nme ' ts2dte(ts,2400)])
  pause(.01)
 else
  break
 end
end
1	pn='/homes/dmenemen/Arctic36km/MITgcm/exe/';
2	nx=210;
3	ny=192;
4	nme='SIheff';
5	for ts=36:36:262980
6	fn=[pn nme '.' myint2str(ts,10) '.data'];
7	if exist(fn)
8	fld=readbin(fn,[nx ny]);
9	clf
10	mypcolor(fld');
11	caxis([0 5])
12	thincolorbar
13	title(['nme ' ts2dte(ts,2400)])
14	pause(.01)
15	else
16	break
17	end
18	end