/[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.2 - (show annotations) (download)
Fri Sep 28 04:19:27 2001 UTC (22 years, 8 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint46n_post, checkpoint44e_post, checkpoint46l_post, checkpoint46g_pre, checkpoint47c_post, release1_p13_pre, checkpoint46f_post, checkpoint44f_post, checkpoint46b_post, checkpoint43a-release1mods, release1_p13, checkpoint46l_pre, chkpt44d_post, release1_p8, release1_p9, release1_p1, release1_p2, release1_p3, release1_p4, release1_p5, release1_p6, release1_p7, checkpoint44e_pre, release1_b1, checkpoint43, checkpoint47d_pre, release1_chkpt44d_post, checkpoint47a_post, checkpoint47d_post, icebear5, icebear4, icebear3, icebear2, checkpoint46d_pre, release1-branch_tutorials, checkpoint45d_post, checkpoint46j_pre, chkpt44a_post, checkpoint44h_pre, checkpoint46a_post, checkpoint46j_post, checkpoint46k_post, chkpt44c_pre, checkpoint45a_post, ecco_c44_e19, ecco_c44_e18, ecco_c44_e17, ecco_c44_e16, release1_p12, release1_p10, release1_p11, release1_p16, release1_p17, release1_p14, release1_p15, checkpoint44g_post, checkpoint46e_pre, checkpoint45b_post, checkpoint46b_pre, release1-branch-end, release1_final_v1, checkpoint46c_pre, checkpoint46, checkpoint47b_post, checkpoint44b_post, checkpoint46h_pre, checkpoint46m_post, checkpoint46a_pre, checkpoint45c_post, ecco_ice2, ecco_ice1, checkpoint44h_post, checkpoint46g_post, release1_p12_pre, ecco_c44_e22, ecco_c44_e25, chkpt44a_pre, checkpoint46i_post, ecco_c44_e23, ecco_c44_e20, ecco_c44_e21, ecco_c44_e26, ecco_c44_e27, ecco_c44_e24, checkpoint46c_post, ecco-branch-mod1, ecco-branch-mod2, ecco-branch-mod3, ecco-branch-mod4, ecco-branch-mod5, checkpoint46e_post, release1_beta1, checkpoint44b_pre, checkpoint47, checkpoint44, checkpoint45, checkpoint46h_post, chkpt44c_post, checkpoint44f_pre, checkpoint46d_post, release1-branch_branchpoint
Branch point for: c24_e25_ice, release1_final, release1-branch, release1, ecco-branch, release1_50yr, icebear, release1_coupled
Changes since 1.1: +24 -0 lines 
Started to add comments...
1
2 CBOP
3 C !ROUTINE: flow directives for active_file.F
4 C !INTERFACE:
5 C !DESCRIPTION: \bv
6 c ==================================================================
7 c active_file.flow
8 c ==================================================================
9 c provides flow directives for routines in active_file.F
10 c required by TAMC/TAF
11 c * active_read_xy
12 c * active_read_xyz
13 c * active_read_xz
14 c * active_read_yz
15 c * active_write_xy
16 c * active_write_xyz
17 c * active_write_xz
18 c * active_write_yz
19 c _tile_ routines are not used nd my not be up-to-date. PH
20 c ==================================================================
21 c active_file.flow
22 c ==================================================================
23 C \ev
24 CEOP
25
26 c----------------------------------------
27 c subroutine active_read_xy
28 c----------------------------------------
29 cadj SUBROUTINE active_read_xy FTLNAME = active_read_xy
30 cadj SUBROUTINE active_read_xy ADNAME = adactive_read_xy
31 cadj SUBROUTINE active_read_xy INPUT = 1 , 3, 4, 5, 6, 7, 8
32 cadj SUBROUTINE active_read_xy OUTPUT = 2
33 cadj SUBROUTINE active_read_xy ACTIVE = 2
34 cadj SUBROUTINE active_read_xy DEPEND = 1, 3, 4, 5, 6, 7
35
36 c----------------------------------------
37 c subroutine active_read_xyz
38 c----------------------------------------
39 cadj SUBROUTINE active_read_xyz FTLNAME = active_read_xyz
40 cadj SUBROUTINE active_read_xyz ADNAME = adactive_read_xyz
41 cadj SUBROUTINE active_read_xyz INPUT = 1 , 3, 4, 5, 6, 7, 8
42 cadj SUBROUTINE active_read_xyz OUTPUT = 2
43 cadj SUBROUTINE active_read_xyz ACTIVE = 2
44 cadj SUBROUTINE active_read_xyz DEPEND = 1, 3, 4, 5, 6, 7
45
46 c----------------------------------------
47 c subroutine active_read_xz
48 c----------------------------------------
49 cadj SUBROUTINE active_read_xz FTLNAME = active_read_xz
50 cadj SUBROUTINE active_read_xz ADNAME = adactive_read_xz
51 cadj SUBROUTINE active_read_xz INPUT = 1 , 3, 4, 5, 6, 7, 8
52 cadj SUBROUTINE active_read_xz OUTPUT = 2
53 cadj SUBROUTINE active_read_xz ACTIVE = 2
54 cadj SUBROUTINE active_read_xz DEPEND = 1, 3, 4, 5, 6, 7
55
56 c----------------------------------------
57 c subroutine active_read_yz
58 c----------------------------------------
59 cadj SUBROUTINE active_read_yz FTLNAME = active_read_yz
60 cadj SUBROUTINE active_read_yz ADNAME = adactive_read_yz
61 cadj SUBROUTINE active_read_yz INPUT = 1 , 3, 4, 5, 6, 7, 8
62 cadj SUBROUTINE active_read_yz OUTPUT = 2
63 cadj SUBROUTINE active_read_yz ACTIVE = 2
64 cadj SUBROUTINE active_read_yz DEPEND = 1, 3, 4, 5, 6, 7
65
66 c----------------------------------------
67 c subroutine active_write_xy
68 c----------------------------------------
69 cadj SUBROUTINE active_write_xy FTLNAME = active_write_xy
70 cadj SUBROUTINE active_write_xy ADNAME = adactive_write_xy
71 cadj SUBROUTINE active_write_xy INPUT = 1, 2, 3, 4, 5, 6
72 cadj SUBROUTINE active_write_xy OUTPUT = 6
73 cadj SUBROUTINE active_write_xy ACTIVE = 2 , 6
74 cadj SUBROUTINE active_write_xy DEPEND = 1, 3, 4, 5
75
76 c----------------------------------------
77 c subroutine active_write_xyz
78 c----------------------------------------
79 cadj SUBROUTINE active_write_xyz FTLNAME = active_write_xyz
80 cadj SUBROUTINE active_write_xyz ADNAME = adactive_write_xyz
81 cadj SUBROUTINE active_write_xyz INPUT = 1, 2, 3, 4, 5, 6
82 cadj SUBROUTINE active_write_xyz OUTPUT = 6
83 cadj SUBROUTINE active_write_xyz ACTIVE = 2 , 6
84 cadj SUBROUTINE active_write_xyz DEPEND = 1, 3, 4, 5
85
86 c----------------------------------------
87 c subroutine active_write_xz
88 c----------------------------------------
89 cadj SUBROUTINE active_write_xz FTLNAME = active_write_xz
90 cadj SUBROUTINE active_write_xz ADNAME = adactive_write_xz
91 cadj SUBROUTINE active_write_xz INPUT = 1 , 3, 4, 5, 6, 7, 8
92 cadj SUBROUTINE active_write_xz OUTPUT = 2
93 cadj SUBROUTINE active_write_xz ACTIVE = 2
94 cadj SUBROUTINE active_write_xz DEPEND = 1, 3, 4, 5, 6, 7
95
96 c----------------------------------------
97 c subroutine active_write_yz
98 c----------------------------------------
99 cadj SUBROUTINE active_write_yz FTLNAME = active_write_yz
100 cadj SUBROUTINE active_write_yz ADNAME = adactive_write_yz
101 cadj SUBROUTINE active_write_yz INPUT = 1 , 3, 4, 5, 6, 7, 8
102 cadj SUBROUTINE active_write_yz OUTPUT = 2
103 cadj SUBROUTINE active_write_yz ACTIVE = 2
104 cadj SUBROUTINE active_write_yz DEPEND = 1, 3, 4, 5, 6, 7
105
106 c----------------------------------------
107 c subroutine active_read_tile_xy
108 c----------------------------------------
109 cadj SUBROUTINE active_read_tile_xy FTLNAME = active_read_tile_xy
110 cadj SUBROUTINE active_read_tile_xy ADNAME = adactive_read_tile_xy
111 cadj SUBROUTINE active_read_tile_xy INPUT = 1 , 3, 4, 5, 6, 7, 8, 9
112 cadj SUBROUTINE active_read_tile_xy OUTPUT = 2
113 cadj SUBROUTINE active_read_tile_xy ACTIVE = 2
114 cadj SUBROUTINE active_read_tile_xy DEPEND = 1, 3, 4, 5, 6, 7, 8, 9
115
116 c----------------------------------------
117 c subroutine active_read_tile_xyz
118 c----------------------------------------
119 cadj SUBROUTINE active_read_tile_xyz FTLNAME = active_read_tile_xyz
120 cadj SUBROUTINE active_read_tile_xyz ADNAME = adactive_read_tile_xyz
121 cadj SUBROUTINE active_read_tile_xyz INPUT = 1 , 3, 4, 5, 6, 7, 8, 9
122 cadj SUBROUTINE active_read_tile_xyz OUTPUT = 2
123 cadj SUBROUTINE active_read_tile_xyz ACTIVE = 2
124 cadj SUBROUTINE active_read_tile_xyz DEPEND = 1, 3, 4, 5, 6, 7, 8, 9
125
126 c----------------------------------------
127 c subroutine active_write_tile_xy
128 c----------------------------------------
129 cadj SUBROUTINE active_write_tile_xy FTLNAME = active_write_tile_xy
130 cadj SUBROUTINE active_write_tile_xy ADNAME = adactive_write_tile_xy
131 cadj SUBROUTINE active_write_tile_xy INPUT = 1, 2, 3, 4, 5, 6, 7
132 cadj SUBROUTINE active_write_tile_xy OUTPUT =
133 cadj SUBROUTINE active_write_tile_xy ACTIVE = 2
134 cadj SUBROUTINE active_write_tile_xy DEPEND = 1, 3, 4, 5, 6, 7
135
136 c----------------------------------------
137 c subroutine active_write_tile_xyz
138 c----------------------------------------
139 cadj SUBROUTINE active_write_tile_xyz FTLNAME = active_write_tile_xyz
140 cadj SUBROUTINE active_write_tile_xyz ADNAME = adactive_write_tile_xyz
141 cadj SUBROUTINE active_write_tile_xyz INPUT = 1, 2, 3, 4, 5, 6, 7
142 cadj SUBROUTINE active_write_tile_xyz OUTPUT =
143 cadj SUBROUTINE active_write_tile_xyz ACTIVE = 2
144 cadj SUBROUTINE active_write_tile_xyz DEPEND = 1, 3, 4, 5, 6, 7
  ViewVC Help
Powered by ViewVC 1.1.22