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

Annotation of /MITgcm/pkg/mdsio/mdsio_ad.flow

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

Revision 1.2 - (hide annotations) (download)
Tue Aug 23 13:19:34 2005 UTC (18 years, 10 months ago) by jmc
Branch: MAIN
CVS Tags: checkpoint58l_post, checkpoint57t_post, checkpoint58e_post, mitgcm_mapl_00, checkpoint58u_post, checkpoint58w_post, checkpoint57s_post, checkpoint58r_post, checkpoint57y_post, checkpoint58n_post, checkpoint58x_post, checkpoint58t_post, checkpoint58h_post, checkpoint57y_pre, checkpoint58q_post, checkpoint57v_post, checkpoint58j_post, checkpoint59e, checkpoint59d, checkpoint59g, checkpoint59f, checkpoint59a, checkpoint59c, checkpoint59b, checkpoint59h, checkpoint57r_post, checkpoint59, checkpoint58, checkpoint58f_post, checkpoint57x_post, checkpoint58d_post, checkpoint58c_post, checkpoint57w_post, checkpint57u_post, checkpoint58a_post, checkpoint58i_post, checkpoint58g_post, checkpoint58o_post, checkpoint57z_post, checkpoint58y_post, checkpoint58k_post, checkpoint58v_post, checkpoint58s_post, checkpoint58p_post, checkpoint58b_post, checkpoint58m_post
Changes since 1.1: +0 -18 lines 
move basic S/R (with no I/O, + used outside of pkg/mdsio) to eesupp/src
 to allow to compile the code without pkg/mdsio.
1 heimbach 1.1
2     C----------------------------------------
3     C subroutine mdsreadfield
4     C----------------------------------------
5     CADJ SUBROUTINE mdsreadfield INPUT = 1,2,3,4, 6,7
6     CADJ SUBROUTINE mdsreadfield OUTPUT = 5
7     CADJ SUBROUTINE mdsreadfield DEPEND = 1,2,3,4,5,6,7
8     CADJ SUBROUTINE mdsreadfield REQUIRED
9    
10     C----------------------------------------
11     C subroutine mdswritefield
12     C----------------------------------------
13     CADJ SUBROUTINE mdswritefield INPUT = 1,2,3,4,5,6,7,8,9
14     CADJ SUBROUTINE mdswritefield OUTPUT =
15    
16     C----------------------------------------
17     C subroutine mdsreadvector
18     C----------------------------------------
19     CADJ SUBROUTINE mdsreadvector INPUT = 1,2,3,4, 6,7,8,9
20     CADJ SUBROUTINE mdsreadvector OUTPUT = 5
21    
22     C----------------------------------------
23     C subroutine mdswritevector
24     C----------------------------------------
25     CADJ SUBROUTINE mdswritevector INPUT = 1,2,3,4,5,6,7,8,9,10,11
26     CADJ SUBROUTINE mdswritevector OUTPUT =
27    
28     C----------------------------------------
29     C subroutine mdsreadfieldxz
30     C----------------------------------------
31     CADJ SUBROUTINE mdsreadfieldxz INPUT = 1,2,3,4, 6,7
32     CADJ SUBROUTINE mdsreadfieldxz OUTPUT = 5
33    
34     C----------------------------------------
35     C subroutine mdswritefieldxz
36     C----------------------------------------
37     CADJ SUBROUTINE mdswritefieldxz INPUT = 1,2,3,4,5,6,7,8,9
38     CADJ SUBROUTINE mdswritefieldxz OUTPUT =
39    
40     C----------------------------------------
41     C subroutine mdsreadfieldyz
42     C----------------------------------------
43     CADJ SUBROUTINE mdsreadfieldyz INPUT = 1,2,3,4, 6,7
44     CADJ SUBROUTINE mdsreadfieldyz OUTPUT = 5
45    
46     C----------------------------------------
47     C subroutine mdswritefieldyz
48     C----------------------------------------
49     CADJ SUBROUTINE mdswritefieldyz INPUT = 1,2,3,4,5,6,7,8,9
50     CADJ SUBROUTINE mdswritefieldyz OUTPUT =
51    
52     C----------------------------------------
53     C subroutine mdsreadfield_loc
54     C----------------------------------------
55     CADJ SUBROUTINE mdsreadfield_loc INPUT = 1,2,3,4, 6,7
56     CADJ SUBROUTINE mdsreadfield_loc OUTPUT = 5
57     CADJ SUBROUTINE mdsreadfield_loc DEPEND = 1,2,3,4,5,6,7
58     CADJ SUBROUTINE mdsreadfield_loc REQUIRED
59    
60     C----------------------------------------
61     C subroutine mdswritefield_loc
62     C----------------------------------------
63     CADJ SUBROUTINE mdswritefield_loc INPUT = 1,2,3,4,5,6,7,8,9
64     CADJ SUBROUTINE mdswritefield_loc OUTPUT =
65    
66     C----------------------------------------
67     C subroutine mdsreadvector_loc
68     C----------------------------------------
69     CADJ SUBROUTINE mdsreadvector_loc INPUT = 1,2,3,4, 6,7,8,9
70     CADJ SUBROUTINE mdsreadvector_loc OUTPUT = 5
71    
72     C----------------------------------------
73     C subroutine mdswritevector_loc
74     C----------------------------------------
75     CADJ SUBROUTINE mdswritevector_loc INPUT = 1,2,3,4,5,6,7,8,9,10,11
76     CADJ SUBROUTINE mdswritevector_loc OUTPUT =
77    
78     C----------------------------------------
79     C subroutine mdsreadfieldxz_loc
80     C----------------------------------------
81     CADJ SUBROUTINE mdsreadfieldxz_loc INPUT = 1,2,3,4, 6,7
82     CADJ SUBROUTINE mdsreadfieldxz_loc OUTPUT = 5
83    
84     C----------------------------------------
85     C subroutine mdswritefieldxz_loc
86     C----------------------------------------
87     CADJ SUBROUTINE mdswritefieldxz_loc INPUT = 1,2,3,4,5,6,7,8,9
88     CADJ SUBROUTINE mdswritefieldxz_loc OUTPUT =
89    
90     C----------------------------------------
91     C subroutine mdsreadfieldyz_loc
92     C----------------------------------------
93     CADJ SUBROUTINE mdsreadfieldyz_loc INPUT = 1,2,3,4, 6,7
94     CADJ SUBROUTINE mdsreadfieldyz_loc OUTPUT = 5
95    
96     C----------------------------------------
97     C subroutine mdswritefieldyz_loc
98     C----------------------------------------
99     CADJ SUBROUTINE mdswritefieldyz_loc INPUT = 1,2,3,4,5,6,7,8,9
100     CADJ SUBROUTINE mdswritefieldyz_loc OUTPUT =
  ViewVC Help
Powered by ViewVC 1.1.22