| 3 |
================= |
================= |
| 4 |
UPDATES |
UPDATES |
| 5 |
|
|
| 6 |
|
December 5, 2006: 216-CPU code for cube46 |
| 7 |
|
Changed diagnostics to accomodate JMCs latest and some |
| 8 |
|
changes to code-mods/CPP_EEOPTIONS.h and W2_OPTIONS.h |
| 9 |
|
to speed up code. |
| 10 |
|
|
| 11 |
November 7, 2006: 216-CPU code for cube43 |
November 7, 2006: 216-CPU code for cube43 |
| 12 |
Bug fixes in growth.F routine and new set of diagnostics |
Bug fixes in growth.F routine and new set of diagnostics |
| 13 |
|
|
| 68 |
|
|
| 69 |
cd ../build |
cd ../build |
| 70 |
\rm * |
\rm * |
| 71 |
../../../tools/genmake2 -mods=../code -of ../../../tools/build_options/linux_ia64_ifort+mpi_altix_nas |
../../../tools/genmake2 -mods=../code -of ../code/linux_ia64_ifort+mpi_altix_nas |
| 72 |
make depend |
make depend |
| 73 |
make -j |
make -j |
| 74 |
|
|
| 114 |
to use matlab to look at the output |
to use matlab to look at the output |
| 115 |
matlab |
matlab |
| 116 |
|
|
| 117 |
for fld={'VICEtave','UICEtave','HEFFtave','AREAtave','QSWtave', ... |
for fld={'SIuice','SIvice','SIheff','SIarea','oceQsw', ... |
| 118 |
'QNETtave','FVtave','FUtave','EmPmRtave'} |
'surForcT','oceTAUX','oceTAUY','surForcS'} |
| 119 |
tmp=permute(readbin([fld{1} '.0000000020.data'],[32,6,32]),[1 3 2]); |
tmp=permute(readbin([fld{1} '.0000000072.data'],[32,6,32]),[1 3 2]); |
| 120 |
cx=[min(tmp(:)) max(tmp(:))]; clf, plot_cube, title(fld{1}), pause |
cx=[min(tmp(:)) max(tmp(:))]; clf, plot_cube, title(fld{1}), pause |
| 121 |
end |
end |
| 122 |
|
|
| 123 |
heff=permute(readbin(['HEFFtave.0000000020.data'],[32,6,32]),[1 3 2]); |
heff=permute(readbin(['SIheff.0000000072.data'],[32,6,32]),[1 3 2]); |
| 124 |
mask=0*heff; mask(find(heff>.001))=1; |
mask=0*heff; mask(find(heff>.001))=1; |
| 125 |
uice=mask.*permute(readbin(['UICEtave.0000000020.data'],[32,6,32]),[1 3 2]); |
uice=mask.*permute(readbin(['SIuice.0000000072.data'],[32,6,32]),[1 3 2]); |
| 126 |
vice=mask.*permute(readbin(['VICEtave.0000000020.data'],[32,6,32]),[1 3 2]); |
vice=mask.*permute(readbin(['SIvice.0000000072.data'],[32,6,32]),[1 3 2]); |
| 127 |
clf |
clf |
| 128 |
subplot(221), mypcolor(uice(:,:,3)'); colorbar, title('uice, tile 3') |
subplot(221), mypcolor(uice(:,:,3)'); colorbar, title('uice, tile 3') |
| 129 |
subplot(222), mypcolor(uice(:,:,6)'); colorbar, title('uice, tile 6') |
subplot(222), mypcolor(uice(:,:,6)'); colorbar, title('uice, tile 6') |