/[MITgcm]/MITgcm/pkg/autodiff/mdsio.flow
ViewVC logotype

Contents of /MITgcm/pkg/autodiff/mdsio.flow

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

Revision 1.4 - (show annotations) (download)
Fri Jul 18 21:09:04 2003 UTC (20 years, 11 months ago) by heimbach
Branch: MAIN
CVS Tags: branchpoint-genmake2, checkpoint51i_post, checkpoint51e_post, checkpoint51f_pre, checkpoint51h_pre, checkpoint51g_post, checkpoint51f_post, checkpoint51d_post, checkpoint51i_pre
Branch point for: branch-genmake2
Changes since 1.3: +50 -1 lines 
Merging from ecco-branch:
Use cluster local disks for purely local I/O
vs. globally visible disks needed for ctrl stuff.
1
2 C----------------------------------------
3 C subroutine mdsfindunit
4 C----------------------------------------
5 CADJ SUBROUTINE mdsfindunit INPUT = 2
6 CADJ SUBROUTINE mdsfindunit OUTPUT = 1
7
8 C----------------------------------------
9 C subroutine mdsreadfield
10 C----------------------------------------
11 CADJ SUBROUTINE mdsreadfield INPUT = 1,2,3,4, 6,7
12 CADJ SUBROUTINE mdsreadfield OUTPUT = 5
13 CADJ SUBROUTINE mdsreadfield DEPEND = 1,2,3,4,5,6,7
14 CADJ SUBROUTINE mdsreadfield REQUIRED
15
16 C----------------------------------------
17 C subroutine mdswritefield
18 C----------------------------------------
19 CADJ SUBROUTINE mdswritefield INPUT = 1,2,3,4,5,6,7,8,9
20 CADJ SUBROUTINE mdswritefield OUTPUT =
21
22 C----------------------------------------
23 C subroutine mdsreadvector
24 C----------------------------------------
25 CADJ SUBROUTINE mdsreadvector INPUT = 1,2,3,4, 6,7,8,9
26 CADJ SUBROUTINE mdsreadvector OUTPUT = 5
27
28 C----------------------------------------
29 C subroutine mdswritevector
30 C----------------------------------------
31 CADJ SUBROUTINE mdswritevector INPUT = 1,2,3,4,5,6,7,8,9,10,11
32 CADJ SUBROUTINE mdswritevector OUTPUT =
33
34 C----------------------------------------
35 C subroutine mds_byteswapr8
36 C----------------------------------------
37 CADJ SUBROUTINE mds_byteswapr8 INPUT = 1,2
38 CADJ SUBROUTINE mds_byteswapr8 OUTPUT = 2
39
40 C----------------------------------------
41 C subroutine mds_byteswapr4
42 C----------------------------------------
43 CADJ SUBROUTINE mds_byteswapr4 INPUT = 1,2
44 CADJ SUBROUTINE mds_byteswapr4 OUTPUT = 2
45
46 C----------------------------------------
47 C subroutine mdsreadfieldxz
48 C----------------------------------------
49 CADJ SUBROUTINE mdsreadfieldxz INPUT = 1,2,3,4, 6,7
50 CADJ SUBROUTINE mdsreadfieldxz OUTPUT = 5
51
52 C----------------------------------------
53 C subroutine mdswritefieldxz
54 C----------------------------------------
55 CADJ SUBROUTINE mdswritefieldxz INPUT = 1,2,3,4,5,6,7,8,9
56 CADJ SUBROUTINE mdswritefieldxz OUTPUT =
57
58 C----------------------------------------
59 C subroutine mdsreadfieldyz
60 C----------------------------------------
61 CADJ SUBROUTINE mdsreadfieldyz INPUT = 1,2,3,4, 6,7
62 CADJ SUBROUTINE mdsreadfieldyz OUTPUT = 5
63
64 C----------------------------------------
65 C subroutine mdswritefieldyz
66 C----------------------------------------
67 CADJ SUBROUTINE mdswritefieldyz INPUT = 1,2,3,4,5,6,7,8,9
68 CADJ SUBROUTINE mdswritefieldyz OUTPUT =
69
70 C----------------------------------------
71 C subroutine mdsreadfield_loc
72 C----------------------------------------
73 CADJ SUBROUTINE mdsreadfield_loc INPUT = 1,2,3,4, 6,7
74 CADJ SUBROUTINE mdsreadfield_loc OUTPUT = 5
75 CADJ SUBROUTINE mdsreadfield_loc DEPEND = 1,2,3,4,5,6,7
76 CADJ SUBROUTINE mdsreadfield_loc REQUIRED
77
78 C----------------------------------------
79 C subroutine mdswritefield_loc
80 C----------------------------------------
81 CADJ SUBROUTINE mdswritefield_loc INPUT = 1,2,3,4,5,6,7,8,9
82 CADJ SUBROUTINE mdswritefield_loc OUTPUT =
83
84 C----------------------------------------
85 C subroutine mdsreadvector_loc
86 C----------------------------------------
87 CADJ SUBROUTINE mdsreadvector_loc INPUT = 1,2,3,4, 6,7,8,9
88 CADJ SUBROUTINE mdsreadvector_loc OUTPUT = 5
89
90 C----------------------------------------
91 C subroutine mdswritevector_loc
92 C----------------------------------------
93 CADJ SUBROUTINE mdswritevector_loc INPUT = 1,2,3,4,5,6,7,8,9,10,11
94 CADJ SUBROUTINE mdswritevector_loc OUTPUT =
95
96 C----------------------------------------
97 C subroutine mdsreadfieldxz_loc
98 C----------------------------------------
99 CADJ SUBROUTINE mdsreadfieldxz_loc INPUT = 1,2,3,4, 6,7
100 CADJ SUBROUTINE mdsreadfieldxz_loc OUTPUT = 5
101
102 C----------------------------------------
103 C subroutine mdswritefieldxz_loc
104 C----------------------------------------
105 CADJ SUBROUTINE mdswritefieldxz_loc INPUT = 1,2,3,4,5,6,7,8,9
106 CADJ SUBROUTINE mdswritefieldxz_loc OUTPUT =
107
108 C----------------------------------------
109 C subroutine mdsreadfieldyz_loc
110 C----------------------------------------
111 CADJ SUBROUTINE mdsreadfieldyz_loc INPUT = 1,2,3,4, 6,7
112 CADJ SUBROUTINE mdsreadfieldyz_loc OUTPUT = 5
113
114 C----------------------------------------
115 C subroutine mdswritefieldyz_loc
116 C----------------------------------------
117 CADJ SUBROUTINE mdswritefieldyz_loc INPUT = 1,2,3,4,5,6,7,8,9
118 CADJ SUBROUTINE mdswritefieldyz_loc OUTPUT =
  ViewVC Help
Powered by ViewVC 1.1.22