pkg/mdsio/mdsio_ad.flow

C $Header: /u/gcmpack/MITgcm/pkg/mdsio/mdsio_ad.flow,v 1.5 2008/05/30 19:43:18 heimbach Exp $
C $Name:  $

C----------------------------------------
C subroutine mds_read_field
C----------------------------------------
CADJ SUBROUTINE mds_read_field  INPUT  = 1,2,3,4,5,6,7,  9,10
CADJ SUBROUTINE mds_read_field  OUTPUT =               8 
CADJ SUBROUTINE mds_read_field  DEPEND = 1,2,3,4,5,6,7,8,9,10
CADJ SUBROUTINE mds_read_field  REQUIRED

C----------------------------------------
C subroutine mds_write_field
C----------------------------------------
CADJ SUBROUTINE mds_write_field  INPUT  = 1,2,3,4,5,6,7,8,9,10,11,12
CADJ SUBROUTINE mds_write_field  OUTPUT =

C----------------------------------------
C subroutine mdsreadfield
C----------------------------------------
CADJ SUBROUTINE mdsreadfield  INPUT  = 1,2,3,4,  6,7
CADJ SUBROUTINE mdsreadfield  OUTPUT =         5
CADJ SUBROUTINE mdsreadfield  DEPEND = 1,2,3,4,5,6,7
CADJ SUBROUTINE mdsreadfield  REQUIRED

C----------------------------------------
C subroutine mdswritefield
C----------------------------------------
CADJ SUBROUTINE mdswritefield  INPUT  = 1,2,3,4,5,6,7,8,9
CADJ SUBROUTINE mdswritefield  OUTPUT =

C----------------------------------------
C subroutine mdsreadvector
C----------------------------------------
CADJ SUBROUTINE mdsreadvector  INPUT  = 1,2,3,4,  6,7,8,9
CADJ SUBROUTINE mdsreadvector  OUTPUT =         5

C----------------------------------------
C subroutine mdswritevector
C----------------------------------------
CADJ SUBROUTINE mdswritevector  INPUT  = 1,2,3,4,5,6,7,8,9,10,11
CADJ SUBROUTINE mdswritevector  OUTPUT =

C----------------------------------------
C subroutine mdsreadfieldxz
C----------------------------------------
CADJ SUBROUTINE mdsreadfieldxz  INPUT  = 1,2,3,4,  6,7
CADJ SUBROUTINE mdsreadfieldxz  OUTPUT =         5

C----------------------------------------
C subroutine mdswritefieldxz
C----------------------------------------
CADJ SUBROUTINE mdswritefieldxz  INPUT  = 1,2,3,4,5,6,7,8,9
CADJ SUBROUTINE mdswritefieldxz  OUTPUT =

C----------------------------------------
C subroutine mdsreadfieldyz
C----------------------------------------
CADJ SUBROUTINE mdsreadfieldyz  INPUT  = 1,2,3,4,  6,7
CADJ SUBROUTINE mdsreadfieldyz  OUTPUT =         5

C----------------------------------------
C subroutine mdswritefieldyz
C----------------------------------------
CADJ SUBROUTINE mdswritefieldyz  INPUT  = 1,2,3,4,5,6,7,8,9
CADJ SUBROUTINE mdswritefieldyz  OUTPUT =

C----------------------------------------
C subroutine mdsreadfield_loc
C----------------------------------------
CADJ SUBROUTINE mdsreadfield_loc  INPUT  = 1,2,3,4,  6,7
CADJ SUBROUTINE mdsreadfield_loc  OUTPUT =         5
CADJ SUBROUTINE mdsreadfield_loc  DEPEND = 1,2,3,4,5,6,7
CADJ SUBROUTINE mdsreadfield_loc  REQUIRED

C----------------------------------------
C subroutine mdswritefield_loc
C----------------------------------------
CADJ SUBROUTINE mdswritefield_loc  INPUT  = 1,2,3,4,5,6,7,8,9
CADJ SUBROUTINE mdswritefield_loc  OUTPUT =

C----------------------------------------
C subroutine mds_writevec_loc
C----------------------------------------
CADJ SUBROUTINE mds_writevec_loc  INPUT  = 1,2,3,4,5,6,7,8,9,10
CADJ SUBROUTINE mds_writevec_loc  OUTPUT =

C----------------------------------------
C subroutine mdsreadfieldxz_loc
C----------------------------------------
CADJ SUBROUTINE mdsreadfieldxz_loc  INPUT  = 1,2,3,4,  6,7
CADJ SUBROUTINE mdsreadfieldxz_loc  OUTPUT =         5

C----------------------------------------
C subroutine mdswritefieldxz_loc
C----------------------------------------
CADJ SUBROUTINE mdswritefieldxz_loc  INPUT  = 1,2,3,4,5,6,7,8,9
CADJ SUBROUTINE mdswritefieldxz_loc  OUTPUT =

C----------------------------------------
C subroutine mdsreadfieldyz_loc
C----------------------------------------
CADJ SUBROUTINE mdsreadfieldyz_loc  INPUT  = 1,2,3,4,  6,7
CADJ SUBROUTINE mdsreadfieldyz_loc  OUTPUT =         5

C----------------------------------------
C subroutine mdswritefieldyz_loc
C----------------------------------------
CADJ SUBROUTINE mdswritefieldyz_loc  INPUT  = 1,2,3,4,5,6,7,8,9
CADJ SUBROUTINE mdswritefieldyz_loc  OUTPUT =

C----------------------------------------
C subroutine MDS_FACEF_READ_RS
C----------------------------------------
CADJ SUBROUTINE MDS_FACEF_READ_RS  INPUT  = 1,2,3,4,5,6,7
CADJ SUBROUTINE MDS_FACEF_READ_RS  OUTPUT =       4
1	C $Header: /u/gcmpack/MITgcm/pkg/mdsio/mdsio_ad.flow,v 1.5 2008/05/30 19:43:18 heimbach Exp $
2	C $Name: $
3
4	C----------------------------------------
5	C subroutine mds_read_field
6	C----------------------------------------
7	CADJ SUBROUTINE mds_read_field INPUT = 1,2,3,4,5,6,7, 9,10
8	CADJ SUBROUTINE mds_read_field OUTPUT = 8
9	CADJ SUBROUTINE mds_read_field DEPEND = 1,2,3,4,5,6,7,8,9,10
10	CADJ SUBROUTINE mds_read_field REQUIRED
11
12	C----------------------------------------
13	C subroutine mds_write_field
14	C----------------------------------------
15	CADJ SUBROUTINE mds_write_field INPUT = 1,2,3,4,5,6,7,8,9,10,11,12
16	CADJ SUBROUTINE mds_write_field OUTPUT =
17
18	C----------------------------------------
19	C subroutine mdsreadfield
20	C----------------------------------------
21	CADJ SUBROUTINE mdsreadfield INPUT = 1,2,3,4, 6,7
22	CADJ SUBROUTINE mdsreadfield OUTPUT = 5
23	CADJ SUBROUTINE mdsreadfield DEPEND = 1,2,3,4,5,6,7
24	CADJ SUBROUTINE mdsreadfield REQUIRED
25
26	C----------------------------------------
27	C subroutine mdswritefield
28	C----------------------------------------
29	CADJ SUBROUTINE mdswritefield INPUT = 1,2,3,4,5,6,7,8,9
30	CADJ SUBROUTINE mdswritefield OUTPUT =
31
32	C----------------------------------------
33	C subroutine mdsreadvector
34	C----------------------------------------
35	CADJ SUBROUTINE mdsreadvector INPUT = 1,2,3,4, 6,7,8,9
36	CADJ SUBROUTINE mdsreadvector OUTPUT = 5
37
38	C----------------------------------------
39	C subroutine mdswritevector
40	C----------------------------------------
41	CADJ SUBROUTINE mdswritevector INPUT = 1,2,3,4,5,6,7,8,9,10,11
42	CADJ SUBROUTINE mdswritevector OUTPUT =
43
44	C----------------------------------------
45	C subroutine mdsreadfieldxz
46	C----------------------------------------
47	CADJ SUBROUTINE mdsreadfieldxz INPUT = 1,2,3,4, 6,7
48	CADJ SUBROUTINE mdsreadfieldxz OUTPUT = 5
49
50	C----------------------------------------
51	C subroutine mdswritefieldxz
52	C----------------------------------------
53	CADJ SUBROUTINE mdswritefieldxz INPUT = 1,2,3,4,5,6,7,8,9
54	CADJ SUBROUTINE mdswritefieldxz OUTPUT =
55
56	C----------------------------------------
57	C subroutine mdsreadfieldyz
58	C----------------------------------------
59	CADJ SUBROUTINE mdsreadfieldyz INPUT = 1,2,3,4, 6,7
60	CADJ SUBROUTINE mdsreadfieldyz OUTPUT = 5
61
62	C----------------------------------------
63	C subroutine mdswritefieldyz
64	C----------------------------------------
65	CADJ SUBROUTINE mdswritefieldyz INPUT = 1,2,3,4,5,6,7,8,9
66	CADJ SUBROUTINE mdswritefieldyz OUTPUT =
67
68	C----------------------------------------
69	C subroutine mdsreadfield_loc
70	C----------------------------------------
71	CADJ SUBROUTINE mdsreadfield_loc INPUT = 1,2,3,4, 6,7
72	CADJ SUBROUTINE mdsreadfield_loc OUTPUT = 5
73	CADJ SUBROUTINE mdsreadfield_loc DEPEND = 1,2,3,4,5,6,7
74	CADJ SUBROUTINE mdsreadfield_loc REQUIRED
75
76	C----------------------------------------
77	C subroutine mdswritefield_loc
78	C----------------------------------------
79	CADJ SUBROUTINE mdswritefield_loc INPUT = 1,2,3,4,5,6,7,8,9
80	CADJ SUBROUTINE mdswritefield_loc OUTPUT =
81
82	C----------------------------------------
83	C subroutine mds_writevec_loc
84	C----------------------------------------
85	CADJ SUBROUTINE mds_writevec_loc INPUT = 1,2,3,4,5,6,7,8,9,10
86	CADJ SUBROUTINE mds_writevec_loc OUTPUT =
87
88	C----------------------------------------
89	C subroutine mdsreadfieldxz_loc
90	C----------------------------------------
91	CADJ SUBROUTINE mdsreadfieldxz_loc INPUT = 1,2,3,4, 6,7
92	CADJ SUBROUTINE mdsreadfieldxz_loc OUTPUT = 5
93
94	C----------------------------------------
95	C subroutine mdswritefieldxz_loc
96	C----------------------------------------
97	CADJ SUBROUTINE mdswritefieldxz_loc INPUT = 1,2,3,4,5,6,7,8,9
98	CADJ SUBROUTINE mdswritefieldxz_loc OUTPUT =
99
100	C----------------------------------------
101	C subroutine mdsreadfieldyz_loc
102	C----------------------------------------
103	CADJ SUBROUTINE mdsreadfieldyz_loc INPUT = 1,2,3,4, 6,7
104	CADJ SUBROUTINE mdsreadfieldyz_loc OUTPUT = 5
105
106	C----------------------------------------
107	C subroutine mdswritefieldyz_loc
108	C----------------------------------------
109	CADJ SUBROUTINE mdswritefieldyz_loc INPUT = 1,2,3,4,5,6,7,8,9
110	CADJ SUBROUTINE mdswritefieldyz_loc OUTPUT =
111
112	C----------------------------------------
113	C subroutine MDS_FACEF_READ_RS
114	C----------------------------------------
115	CADJ SUBROUTINE MDS_FACEF_READ_RS INPUT = 1,2,3,4,5,6,7
116	CADJ SUBROUTINE MDS_FACEF_READ_RS OUTPUT = 4