/[MITgcm]/MITgcm/pkg/rw/rw_ad.flow
ViewVC logotype

Annotation of /MITgcm/pkg/rw/rw_ad.flow

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph

Revision 1.12 - (hide annotations) (download)
Mon Oct 25 18:39:50 2010 UTC (13 years, 7 months ago) by jmc
Branch: MAIN
CVS Tags: checkpoint62o, checkpoint62n, checkpoint62p
Changes since 1.11: +7 -1 lines 
new commom block to hold globalFile option for writing sections (xz & yz);
 + new S/R to set this flag.
1 jmc 1.12 C $Header: /u/gcmpack/MITgcm/pkg/rw/rw_ad.flow,v 1.11 2009/09/01 19:25:28 jmc Exp $
2 jmc 1.4 C $Name: $
3 heimbach 1.1
4     C----------------------------------------
5     C subroutine set_write_global_fld
6     C----------------------------------------
7     CADJ SUBROUTINE set_write_global_fld INPUT = 1
8     CADJ SUBROUTINE set_write_global_fld OUTPUT =
9    
10     C----------------------------------------
11     C subroutine write_fld_xy_rs
12     C----------------------------------------
13     CADJ SUBROUTINE write_fld_xy_rs INPUT = 1,2,3,4,5
14     CADJ SUBROUTINE write_fld_xy_rs OUTPUT =
15    
16     C----------------------------------------
17     C subroutine write_fld_xy_rl
18     C----------------------------------------
19     CADJ SUBROUTINE write_fld_xy_rl INPUT = 1,2,3,4,5
20     CADJ SUBROUTINE write_fld_xy_rl OUTPUT =
21    
22     C----------------------------------------
23     C subroutine write_fld_xyz_rs
24     C----------------------------------------
25     CADJ SUBROUTINE write_fld_xyz_rs INPUT = 1,2,3,4,5
26     CADJ SUBROUTINE write_fld_xyz_rs OUTPUT =
27    
28     C----------------------------------------
29     C subroutine write_fld_xyz_rl
30     C----------------------------------------
31     CADJ SUBROUTINE write_fld_xyz_rl INPUT = 1,2,3,4,5
32     CADJ SUBROUTINE write_fld_xyz_rl OUTPUT =
33    
34     C----------------------------------------
35     C subroutine write_local_rl
36     C----------------------------------------
37     CADJ SUBROUTINE write_local_rl INPUT = 1,2,3,4,5,6,7,8,9
38     CADJ SUBROUTINE write_local_rl OUTPUT =
39    
40     C----------------------------------------
41     C subroutine write_local_rs
42     C----------------------------------------
43     CADJ SUBROUTINE write_local_rs INPUT = 1,2,3,4,5,6,7,8,9
44     CADJ SUBROUTINE write_local_rs OUTPUT =
45    
46     C----------------------------------------
47     C subroutine set_write_global_rec
48     C----------------------------------------
49     CADJ SUBROUTINE set_write_global_rec INPUT = 1
50     CADJ SUBROUTINE set_write_global_rec OUTPUT =
51    
52     C----------------------------------------
53     C subroutine write_rec_xy_rl
54     C----------------------------------------
55     CADJ SUBROUTINE write_rec_xy_rl INPUT = 1,2,3,4,5
56     CADJ SUBROUTINE write_rec_xy_rl OUTPUT =
57    
58     C----------------------------------------
59     C subroutine write_rec_xyz_rs
60     C----------------------------------------
61     CADJ SUBROUTINE write_rec_xyz_rs INPUT = 1,2,3,4,5
62     CADJ SUBROUTINE write_rec_xyz_rs OUTPUT =
63    
64     C----------------------------------------
65     C subroutine write_rec_xyz_rl
66     C----------------------------------------
67     CADJ SUBROUTINE write_rec_xyz_rl INPUT = 1,2,3,4,5
68     CADJ SUBROUTINE write_rec_xyz_rl OUTPUT =
69    
70 heimbach 1.5 C----------------------------------------
71 jmc 1.11 C subroutine write_rec_3d_rs
72     C----------------------------------------
73     CADJ SUBROUTINE write_rec_3d_rs INPUT = 1,2,3,4,5,6,7
74     CADJ SUBROUTINE write_rec_3d_rs OUTPUT =
75    
76     C----------------------------------------
77     C subroutine write_rec_3d_rl
78     C----------------------------------------
79     CADJ SUBROUTINE write_rec_3d_rl INPUT = 1,2,3,4,5,6,7
80     CADJ SUBROUTINE write_rec_3d_rl OUTPUT =
81    
82     C----------------------------------------
83     C subroutine write_rec_lev_rs
84     C----------------------------------------
85     CADJ SUBROUTINE write_rec_lev_rs INPUT = 1,2,3,4,5,6,7,8,9
86     CADJ SUBROUTINE write_rec_lev_rs OUTPUT =
87    
88     C----------------------------------------
89     C subroutine write_rec_lev_rl
90     C----------------------------------------
91     CADJ SUBROUTINE write_rec_lev_rl INPUT = 1,2,3,4,5,6,7,8,9
92     CADJ SUBROUTINE write_rec_lev_rl OUTPUT =
93    
94     C----------------------------------------
95 jmc 1.12 C subroutine set_write_global_sec
96     C----------------------------------------
97     CADJ SUBROUTINE set_write_global_sec INPUT = 1
98     CADJ SUBROUTINE set_write_global_sec OUTPUT =
99    
100     C----------------------------------------
101 jmc 1.11 C subroutine write_rec_xz_rs
102     C----------------------------------------
103     CADJ SUBROUTINE write_rec_xz_rs INPUT = 1,2,3,4,5,6,7
104     CADJ SUBROUTINE write_rec_xz_rs OUTPUT =
105    
106     C----------------------------------------
107     C subroutine write_rec_xz_rl
108     C----------------------------------------
109     CADJ SUBROUTINE write_rec_xz_rl INPUT = 1,2,3,4,5,6,7
110     CADJ SUBROUTINE write_rec_xz_rl OUTPUT =
111    
112     C----------------------------------------
113     C subroutine write_rec_yz_rs
114     C----------------------------------------
115     CADJ SUBROUTINE write_rec_yz_rs INPUT = 1,2,3,4,5,6,7
116     CADJ SUBROUTINE write_rec_yz_rs OUTPUT =
117    
118     C----------------------------------------
119     C subroutine write_rec_yz_rl
120     C----------------------------------------
121     CADJ SUBROUTINE write_rec_yz_rl INPUT = 1,2,3,4,5,6,7
122     CADJ SUBROUTINE write_rec_yz_rl OUTPUT =
123    
124     C----------------------------------------
125 jmc 1.10 C subroutine WRITE_GLVEC_RS
126     C----------------------------------------
127     CADJ SUBROUTINE WRITE_GLVEC_RS INPUT = 1,2,3,4,5,6
128     CADJ SUBROUTINE WRITE_GLVEC_RS OUTPUT =
129    
130     C----------------------------------------
131     C subroutine WRITE_GLVEC_RL
132     C----------------------------------------
133     CADJ SUBROUTINE WRITE_GLVEC_RL INPUT = 1,2,3,4,5,6
134     CADJ SUBROUTINE WRITE_GLVEC_RL OUTPUT =
135    
136     C----------------------------------------
137 heimbach 1.5 C subroutine READ_MFLDS_CHECK
138     C----------------------------------------
139 heimbach 1.8 CADJ SUBROUTINE READ_MFLDS_CHECK INPUT = 2,3,4
140     CADJ SUBROUTINE READ_MFLDS_CHECK OUTPUT = 1,2
141 heimbach 1.5
142     C----------------------------------------
143     C subroutine READ_MFLDS_INIT
144     C----------------------------------------
145     CADJ SUBROUTINE READ_MFLDS_INIT INPUT = 1
146     CADJ SUBROUTINE READ_MFLDS_INIT OUTPUT =
147    
148     C----------------------------------------
149     C subroutine READ_MFLDS_SET
150     C----------------------------------------
151     CADJ SUBROUTINE READ_MFLDS_SET INPUT = 1, 4,5,6
152     CADJ SUBROUTINE READ_MFLDS_SET OUTPUT = 2,3
153    
154     C----------------------------------------
155     C subroutine READ_MFLDS_3D_RL
156     C----------------------------------------
157     CADJ SUBROUTINE READ_MFLDS_3D_RL INPUT = 1, 3,4,5,6,7
158 heimbach 1.6 CADJ SUBROUTINE READ_MFLDS_3D_RL OUTPUT = 2,3
159 heimbach 1.5
160 jmc 1.9 C----------------------------------------
161     C subroutine READ_MFLDS_LEV_RL
162     C----------------------------------------
163     CADJ SUBROUTINE READ_MFLDS_LEV_RL INPUT = 1, 3,4,5,6,7,8,9
164     CADJ SUBROUTINE READ_MFLDS_LEV_RL OUTPUT = 2,3
165 heimbach 1.5
  ViewVC Help
Powered by ViewVC 1.1.22