| 1 | 
dimitri | 
1.1 | 
Ocean Inversion Project | 
| 2 | 
  | 
  | 
======================= | 
| 3 | 
  | 
  | 
 | 
| 4 | 
  | 
  | 
Instructions for using pkg/ptracers to compute tracer | 
| 5 | 
  | 
  | 
Green's functions for Gruber's ocean inversion project | 
| 6 | 
  | 
  | 
(http://quercus.igpp.ucla.edu/OceanInversion/). | 
| 7 | 
  | 
  | 
 | 
| 8 | 
  | 
  | 
 | 
| 9 | 
dimitri | 
1.2 | 
=============================================== | 
| 10 | 
  | 
  | 
First check that pkg/ptracers works OK by using | 
| 11 | 
  | 
  | 
salinity initial and boundary conditions | 
| 12 | 
  | 
  | 
=============================================== | 
| 13 | 
  | 
  | 
 | 
| 14 | 
  | 
  | 
1 ===> get MITgcm code from cvs repository | 
| 15 | 
  | 
  | 
 | 
| 16 | 
  | 
  | 
 CVSROOT=:pserver:cvsanon@mitgcm.org:/u/u0/gcmpack | 
| 17 | 
  | 
  | 
 cvs login ( CVS password: cvsanon ) | 
| 18 | 
  | 
  | 
 cvs co MITgcm | 
| 19 | 
  | 
  | 
 | 
| 20 | 
  | 
  | 
2 ===> put MITgcm_contrib/ocean_inversion_project in MITgcm directory | 
| 21 | 
  | 
  | 
 | 
| 22 | 
  | 
  | 
 cd MITgcm | 
| 23 | 
  | 
  | 
 cvs co -d ocean_inversion_project MITgcm_contrib/ocean_inversion_project | 
| 24 | 
  | 
  | 
 | 
| 25 | 
  | 
  | 
3 ===> compile | 
| 26 | 
  | 
  | 
 | 
| 27 | 
  | 
  | 
 cd bin | 
| 28 | 
  | 
  | 
 cp ../verification/global_with_exf/code/* . | 
| 29 | 
  | 
  | 
 cp ../ocean_inversion_project/code/.genmakerc . | 
| 30 | 
  | 
  | 
 cp ../ocean_inversion_project/code/* . | 
| 31 | 
  | 
  | 
 cp ../ocean_inversion_project/code/ptracers_forcing.F.test ptracers_forcing.F | 
| 32 | 
  | 
  | 
 cp ../ocean_inversion_project/code/ptracers_init.F.test ptracers_init.F | 
| 33 | 
  | 
  | 
 cp ../ocean_inversion_project/code/ptracers_read_mask.F.test ptracers_read_mask.F | 
| 34 | 
  | 
  | 
 ../tools/genmake | 
| 35 | 
  | 
  | 
 make depend | 
| 36 | 
  | 
  | 
 make | 
| 37 | 
  | 
  | 
 | 
| 38 | 
  | 
  | 
4 ===> execute | 
| 39 | 
  | 
  | 
 | 
| 40 | 
  | 
  | 
 cd ../exe | 
| 41 | 
  | 
  | 
 cp ../verification/global_with_exf/input/* . | 
| 42 | 
  | 
  | 
 cp ../ocean_inversion_project/input/* . | 
| 43 | 
  | 
  | 
 cp ../ocean_inversion_project/input/data.ptracers.test data.ptracers | 
| 44 | 
  | 
  | 
 mitgcmuv > output .txt | 
| 45 | 
  | 
  | 
   | 
| 46 | 
  | 
  | 
5 ===> check that PTRACER output for tracer 1 and tracer 30 | 
| 47 | 
  | 
  | 
  ===> is identical to salinity output | 
| 48 | 
  | 
  | 
 | 
| 49 | 
  | 
  | 
 diff PTRACER01.0000000020.001.001.data S.0000000020.001.001.data | 
| 50 | 
  | 
  | 
 diff PTRACER30.0000000020.001.001.data S.0000000020.001.001.data | 
| 51 | 
  | 
  | 
 | 
| 52 | 
  | 
  | 
 | 
| 53 | 
  | 
  | 
====================================================== | 
| 54 | 
  | 
  | 
Second generate binary input files.  netcdf files are not OK | 
| 55 | 
  | 
  | 
 | 
| 56 | 
  | 
  | 
====================================================== | 
| 57 | 
  | 
  | 
====================================================== | 
| 58 | 
  | 
  | 
====================================================== | 
| 59 | 
  | 
  | 
====================================================== | 
| 60 | 
dimitri | 
1.1 | 
 | 
| 61 | 
  | 
  | 
 cd MITgcm/bin | 
| 62 | 
  | 
  | 
 cp ../verification/global_with_exf/code/* . | 
| 63 | 
  | 
  | 
 cp ../code/.genmakerc . | 
| 64 | 
  | 
  | 
 cp ../code/* . | 
| 65 | 
  | 
  | 
 cp ../code/ptracers_forcing.F.test ptracers_forcing.F | 
| 66 | 
  | 
  | 
 cp ../code/ptracers_init.F.test ptracers_init.F | 
| 67 | 
  | 
  | 
 cp ../code/ptracers_read_mask.F.test ptracers_read_mask.F | 
| 68 | 
  | 
  | 
 ../tools/genmake | 
| 69 | 
  | 
  | 
 make depend | 
| 70 | 
  | 
  | 
 make | 
| 71 | 
  | 
  | 
 cd ../exe | 
| 72 | 
  | 
  | 
 cp ../verification/global_with_exf/input/* . | 
| 73 | 
  | 
  | 
 cp ../input/* . | 
| 74 | 
  | 
  | 
 cp ../input/data.ptracers.test data.ptracers | 
| 75 | 
  | 
  | 
 mitgcmuv > output .txt | 
| 76 | 
  | 
  | 
 | 
| 77 | 
  | 
  | 
===> examine interpolation output for 30-region mask | 
| 78 | 
  | 
  | 
 | 
| 79 | 
  | 
  | 
 matlab | 
| 80 | 
  | 
  | 
 mask=zeros(94,44,30); | 
| 81 | 
  | 
  | 
 load fort.10 | 
| 82 | 
  | 
  | 
 for i=1:length(fort) | 
| 83 | 
  | 
  | 
  mask(fort(i,2)+2,fort(i,3)+2,fort(i,1))=fort(i,4); | 
| 84 | 
  | 
  | 
 end  | 
| 85 | 
  | 
  | 
 for i=1:30 | 
| 86 | 
  | 
  | 
  mypcolor(mask(3:92,3:42,i)'); | 
| 87 | 
  | 
  | 
  colorbar,title(i),pause | 
| 88 | 
  | 
  | 
 end | 
| 89 | 
  | 
  | 
 mypcolor(sum(mask,3)'); colorbar | 
| 90 | 
  | 
  | 
 | 
| 91 | 
  | 
  | 
===================================== | 
| 92 | 
  | 
  | 
 | 
| 93 | 
  | 
  | 
 | 
| 94 | 
  | 
  | 
Global ocean experiment with ptracers | 
| 95 | 
  | 
  | 
===================================== | 
| 96 | 
  | 
  | 
 | 
| 97 | 
  | 
  | 
===> set up and integrate 30-tracer computation | 
| 98 | 
  | 
  | 
 | 
| 99 | 
  | 
  | 
 cd MITgcm/bin | 
| 100 | 
  | 
  | 
 cp ../verification/global_with_exf/code/* . | 
| 101 | 
  | 
  | 
 cp ../code/.genmakerc . | 
| 102 | 
  | 
  | 
 cp ../code/* . | 
| 103 | 
  | 
  | 
 ../tools/genmake | 
| 104 | 
  | 
  | 
 make depend | 
| 105 | 
  | 
  | 
 make | 
| 106 | 
  | 
  | 
 cd ../exe | 
| 107 | 
  | 
  | 
 cp ../verification/global_with_exf/input/* . | 
| 108 | 
  | 
  | 
 cp ../input/* . | 
| 109 | 
  | 
  | 
 mitgcmuv > output .txt | 
| 110 | 
  | 
  | 
 | 
| 111 | 
  | 
  | 
===> look at output | 
| 112 | 
  | 
  | 
 | 
| 113 | 
  | 
  | 
 matlab | 
| 114 | 
  | 
  | 
 for i=1:30 | 
| 115 | 
  | 
  | 
  tr=readbin(['PTRACER' myint2str(i) ... | 
| 116 | 
  | 
  | 
              '.0000000020.001.001.data'],[90 40 15],1); | 
| 117 | 
  | 
  | 
  mypcolor(tr(:,:,2)'), colorbar, pause(1) | 
| 118 | 
  | 
  | 
 end |