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 |