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

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

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

Revision 1.5 - (show annotations) (download)
Fri Mar 24 22:58:24 2006 UTC (18 years, 6 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint59, checkpoint58f_post, checkpoint58d_post, checkpoint58y_post, checkpoint58t_post, checkpoint58m_post, checkpoint58w_post, checkpoint58o_post, checkpoint58p_post, checkpoint58q_post, checkpoint58e_post, checkpoint58r_post, checkpoint58n_post, checkpoint59e, checkpoint59d, checkpoint59g, checkpoint59f, checkpoint59a, checkpoint59c, checkpoint59b, checkpoint59h, checkpoint58k_post, checkpoint58v_post, checkpoint58l_post, checkpoint58g_post, checkpoint58x_post, checkpoint58h_post, checkpoint58j_post, checkpoint58i_post, checkpoint58u_post, checkpoint58s_post
Changes since 1.4: +1 -21 lines 
o package cost profiles routines to better modularize them.
1 C $Header: $
2
3 CBOP
4 C !ROUTINE: flow directives for active_file.F
5 C !INTERFACE:
6 C !DESCRIPTION: \bv
7 c ==================================================================
8 c active_file.flow
9 c ==================================================================
10 c provides flow directives for routines in active_file.F
11 c required by TAMC/TAF
12 c * active_read_xy
13 c * active_read_xyz
14 c * active_read_xz
15 c * active_read_yz
16 c * active_write_xy
17 c * active_write_xyz
18 c * active_write_xz
19 c * active_write_yz
20 c _tile_ routines are not used nd my not be up-to-date. PH
21 c ==================================================================
22 c active_file.flow
23 c ==================================================================
24 C \ev
25 CEOP
26
27 c----------------------------------------
28 c subroutine active_read_xy
29 c----------------------------------------
30 cadj SUBROUTINE active_read_xy FTLNAME = g_active_read_xy
31 cadj SUBROUTINE active_read_xy ADNAME = adactive_read_xy
32 cadj SUBROUTINE active_read_xy INPUT = 1 , 3, 4, 5, 6, 7, 8
33 cadj SUBROUTINE active_read_xy OUTPUT = 2
34 cadj SUBROUTINE active_read_xy ACTIVE = 2
35 cadj SUBROUTINE active_read_xy DEPEND = 1, 3, 4, 5, 6, 7
36
37 c----------------------------------------
38 c subroutine active_read_xyz
39 c----------------------------------------
40 cadj SUBROUTINE active_read_xyz FTLNAME = g_active_read_xyz
41 cadj SUBROUTINE active_read_xyz ADNAME = adactive_read_xyz
42 cadj SUBROUTINE active_read_xyz INPUT = 1 , 3, 4, 5, 6, 7, 8
43 cadj SUBROUTINE active_read_xyz OUTPUT = 2
44 cadj SUBROUTINE active_read_xyz ACTIVE = 2
45 cadj SUBROUTINE active_read_xyz DEPEND = 1, 3, 4, 5, 6, 7
46
47 c----------------------------------------
48 c subroutine active_read_xz
49 c----------------------------------------
50 cadj SUBROUTINE active_read_xz FTLNAME = g_active_read_xz
51 cadj SUBROUTINE active_read_xz ADNAME = adactive_read_xz
52 cadj SUBROUTINE active_read_xz INPUT = 1 , 3, 4, 5, 6, 7, 8
53 cadj SUBROUTINE active_read_xz OUTPUT = 2
54 cadj SUBROUTINE active_read_xz ACTIVE = 2
55 cadj SUBROUTINE active_read_xz DEPEND = 1, 3, 4, 5, 6, 7
56
57 c----------------------------------------
58 c subroutine active_read_yz
59 c----------------------------------------
60 cadj SUBROUTINE active_read_yz FTLNAME = g_active_read_yz
61 cadj SUBROUTINE active_read_yz ADNAME = adactive_read_yz
62 cadj SUBROUTINE active_read_yz INPUT = 1 , 3, 4, 5, 6, 7, 8
63 cadj SUBROUTINE active_read_yz OUTPUT = 2
64 cadj SUBROUTINE active_read_yz ACTIVE = 2
65 cadj SUBROUTINE active_read_yz DEPEND = 1, 3, 4, 5, 6, 7
66
67 c----------------------------------------
68 c subroutine active_write_xy
69 c----------------------------------------
70 cadj SUBROUTINE active_write_xy FTLNAME = g_active_write_xy
71 cadj SUBROUTINE active_write_xy ADNAME = adactive_write_xy
72 cadj SUBROUTINE active_write_xy INPUT = 1, 2, 3, 4, 5, 6
73 cadj SUBROUTINE active_write_xy OUTPUT = 6
74 cadj SUBROUTINE active_write_xy ACTIVE = 2 , 6
75 cadj SUBROUTINE active_write_xy DEPEND = 1, 3, 4, 5
76
77 c----------------------------------------
78 c subroutine active_write_xyz
79 c----------------------------------------
80 cadj SUBROUTINE active_write_xyz FTLNAME = g_active_write_xyz
81 cadj SUBROUTINE active_write_xyz ADNAME = adactive_write_xyz
82 cadj SUBROUTINE active_write_xyz INPUT = 1, 2, 3, 4, 5, 6
83 cadj SUBROUTINE active_write_xyz OUTPUT = 6
84 cadj SUBROUTINE active_write_xyz ACTIVE = 2 , 6
85 cadj SUBROUTINE active_write_xyz DEPEND = 1, 3, 4, 5
86
87 c----------------------------------------
88 c subroutine active_write_xz
89 c----------------------------------------
90 cadj SUBROUTINE active_write_xz FTLNAME = g_active_write_xz
91 cadj SUBROUTINE active_write_xz ADNAME = adactive_write_xz
92 cadj SUBROUTINE active_write_xz INPUT = 1 , 3, 4, 5, 6, 7, 8
93 cadj SUBROUTINE active_write_xz OUTPUT = 2
94 cadj SUBROUTINE active_write_xz ACTIVE = 2
95 cadj SUBROUTINE active_write_xz DEPEND = 1, 3, 4, 5, 6, 7
96
97 c----------------------------------------
98 c subroutine active_write_yz
99 c----------------------------------------
100 cadj SUBROUTINE active_write_yz FTLNAME = g_active_write_yz
101 cadj SUBROUTINE active_write_yz ADNAME = adactive_write_yz
102 cadj SUBROUTINE active_write_yz INPUT = 1 , 3, 4, 5, 6, 7, 8
103 cadj SUBROUTINE active_write_yz OUTPUT = 2
104 cadj SUBROUTINE active_write_yz ACTIVE = 2
105 cadj SUBROUTINE active_write_yz DEPEND = 1, 3, 4, 5, 6, 7
106
107 c----------------------------------------
108 c subroutine active_read_tile_xy
109 c----------------------------------------
110 cadj SUBROUTINE active_read_tile_xy FTLNAME = g_active_read_tile_xy
111 cadj SUBROUTINE active_read_tile_xy ADNAME = adactive_read_tile_xy
112 cadj SUBROUTINE active_read_tile_xy INPUT = 1 , 3, 4, 5, 6, 7, 8, 9
113 cadj SUBROUTINE active_read_tile_xy OUTPUT = 2
114 cadj SUBROUTINE active_read_tile_xy ACTIVE = 2
115 cadj SUBROUTINE active_read_tile_xy DEPEND = 1, 3, 4, 5, 6, 7, 8, 9
116
117 c----------------------------------------
118 c subroutine active_read_tile_xyz
119 c----------------------------------------
120 cadj SUBROUTINE active_read_tile_xyz FTLNAME = g_active_read_tile_xyz
121 cadj SUBROUTINE active_read_tile_xyz ADNAME = adactive_read_tile_xyz
122 cadj SUBROUTINE active_read_tile_xyz INPUT = 1 , 3, 4, 5, 6, 7, 8, 9
123 cadj SUBROUTINE active_read_tile_xyz OUTPUT = 2
124 cadj SUBROUTINE active_read_tile_xyz ACTIVE = 2
125 cadj SUBROUTINE active_read_tile_xyz DEPEND = 1, 3, 4, 5, 6, 7, 8, 9
126
127 c----------------------------------------
128 c subroutine active_write_tile_xy
129 c----------------------------------------
130 cadj SUBROUTINE active_write_tile_xy FTLNAME = g_active_write_tile_xy
131 cadj SUBROUTINE active_write_tile_xy ADNAME = adactive_write_tile_xy
132 cadj SUBROUTINE active_write_tile_xy INPUT = 1, 2, 3, 4, 5, 6, 7
133 cadj SUBROUTINE active_write_tile_xy OUTPUT =
134 cadj SUBROUTINE active_write_tile_xy ACTIVE = 2
135 cadj SUBROUTINE active_write_tile_xy DEPEND = 1, 3, 4, 5, 6, 7
136
137 c----------------------------------------
138 c subroutine active_write_tile_xyz
139 c----------------------------------------
140 cadj SUBROUTINE active_write_tile_xyz FTLNAME = g_active_write_tile_xyz
141 cadj SUBROUTINE active_write_tile_xyz ADNAME = adactive_write_tile_xyz
142 cadj SUBROUTINE active_write_tile_xyz INPUT = 1, 2, 3, 4, 5, 6, 7
143 cadj SUBROUTINE active_write_tile_xyz OUTPUT =
144 cadj SUBROUTINE active_write_tile_xyz ACTIVE = 2
145 cadj SUBROUTINE active_write_tile_xyz DEPEND = 1, 3, 4, 5, 6, 7
  ViewVC Help
Powered by ViewVC 1.1.22