| 1 |
Instructions for setting up a cube-sphere integration with sea-ice. |
Instructions for setting up a cube-sphere integration with sea-ice. |
| 2 |
|
|
| 3 |
|
Forcing fields and other input files needed for the CS510 |
| 4 |
|
configuration can be obtained from |
| 5 |
|
http://ecco2.org/products/model_setups/cs510.html |
| 6 |
|
|
| 7 |
================= |
================= |
| 8 |
UPDATES |
UPDATES |
| 9 |
|
|
| 10 |
November 3, 2006: 216-CPU code for cube43 |
December 11, 2006: preparing for cube47, same as cube43 |
| 11 |
Martin's growth.F routine and Patrick's pkg/seaice diagnostics |
but with Arctic monthly river runoff climatology |
| 12 |
|
|
| 13 |
|
December 5, 2006: 216-CPU code for cube46 |
| 14 |
|
Changed diagnostics to accomodate JMCs latest and some |
| 15 |
|
changes to code-mods/CPP_EEOPTIONS.h and W2_OPTIONS.h |
| 16 |
|
to speed up code. |
| 17 |
|
|
| 18 |
|
November 7, 2006: 216-CPU code for cube43 |
| 19 |
|
Bug fixes in growth.F routine and new set of diagnostics |
| 20 |
|
|
| 21 |
October 15, 2006: 216-CPU code for cube40 |
October 15, 2006: 216-CPU code for cube40 |
| 22 |
|
|
| 36 |
see pkg/ecco/ecco_cost_init_fixed.F |
see pkg/ecco/ecco_cost_init_fixed.F |
| 37 |
pkg/ecco/cost_averagesfields.F |
pkg/ecco/cost_averagesfields.F |
| 38 |
|
|
| 39 |
|
########################################################################## |
| 40 |
|
########################################################################## |
| 41 |
|
# Get forcing files, etc. |
| 42 |
|
# Example below is for cube46 on /nobackup2a/menemenl |
| 43 |
|
|
| 44 |
|
cd /nobackup2a/menemenl |
| 45 |
|
mkdir cube47 |
| 46 |
|
cd cube47 |
| 47 |
|
ln -sf ../run_template . |
| 48 |
|
ln -sf ../ncep_rgau . |
| 49 |
|
|
| 50 |
|
|
| 51 |
########################################################################## |
########################################################################## |
| 52 |
########################################################################## |
########################################################################## |
| 53 |
# getting the code from anonymous CVS server |
# getting the code from anonymous CVS server |
|
# |
|
| 54 |
|
|
| 55 |
bash or sh shell: |
bash or sh shell: |
| 56 |
$ export CVSROOT=':pserver:cvsanon@mitgcm.org:/u/gcmpack' |
$ export CVSROOT=':pserver:cvsanon@mitgcm.org:/u/gcmpack' |
| 74 |
########################################################################## |
########################################################################## |
| 75 |
########################################################################## |
########################################################################## |
| 76 |
# 510*510*6*50, 216-cpu cube sphere on altix with ifort and pkg/diagnostics |
# 510*510*6*50, 216-cpu cube sphere on altix with ifort and pkg/diagnostics |
|
# requires input files in sudirectories run_template and ncep_rgau |
|
|
# these can be obained from lou:/u/menemenl/cube |
|
| 77 |
|
|
| 78 |
cd MITgcm/verification/global_ocean.cs32x15/code |
cd MITgcm/verification/global_ocean.cs32x15/code |
| 79 |
\cp ../../../../MITgcm_contrib/high_res_cube/code-mods/* . |
\cp ../../../../MITgcm_contrib/high_res_cube/code-mods/* . |
| 83 |
|
|
| 84 |
cd ../build |
cd ../build |
| 85 |
\rm * |
\rm * |
| 86 |
../../../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 |
| 87 |
make depend |
make depend |
| 88 |
make -j |
make -j |
| 89 |
|
|
| 129 |
to use matlab to look at the output |
to use matlab to look at the output |
| 130 |
matlab |
matlab |
| 131 |
|
|
| 132 |
for fld={'VICEtave','UICEtave','HEFFtave','AREAtave','QSWtave', ... |
for fld={'SIuice','SIvice','SIheff','SIarea','oceQsw', ... |
| 133 |
'QNETtave','FVtave','FUtave','EmPmRtave'} |
'surForcT','oceTAUX','oceTAUY','surForcS'} |
| 134 |
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]); |
| 135 |
cx=[min(tmp(:)) max(tmp(:))]; clf, plot_cube, title(fld{1}), pause |
cx=[min(tmp(:)) max(tmp(:))]; clf, plot_cube, title(fld{1}), pause |
| 136 |
end |
end |
| 137 |
|
|
| 138 |
heff=permute(readbin(['HEFFtave.0000000020.data'],[32,6,32]),[1 3 2]); |
heff=permute(readbin(['SIheff.0000000072.data'],[32,6,32]),[1 3 2]); |
| 139 |
mask=0*heff; mask(find(heff>.001))=1; |
mask=0*heff; mask(find(heff>.001))=1; |
| 140 |
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]); |
| 141 |
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]); |
| 142 |
clf |
clf |
| 143 |
subplot(221), mypcolor(uice(:,:,3)'); colorbar, title('uice, tile 3') |
subplot(221), mypcolor(uice(:,:,3)'); colorbar, title('uice, tile 3') |
| 144 |
subplot(222), mypcolor(uice(:,:,6)'); colorbar, title('uice, tile 6') |
subplot(222), mypcolor(uice(:,:,6)'); colorbar, title('uice, tile 6') |