/[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.3 - (show annotations) (download)
Thu Dec 19 14:02:23 2002 UTC (21 years, 4 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint51k_post, checkpoint47e_post, checkpoint57m_post, checkpoint52l_pre, hrcube4, hrcube5, checkpoint57g_pre, checkpoint50c_post, checkpoint57s_post, checkpoint58b_post, checkpoint57b_post, checkpoint52d_pre, checkpoint57g_post, checkpoint48e_post, checkpoint56b_post, checkpoint50c_pre, checkpoint57y_post, checkpoint52j_pre, checkpoint51o_pre, checkpoint54d_post, checkpoint54e_post, checkpoint51l_post, checkpoint48i_post, checkpoint57r_post, checkpoint57d_post, checkpoint57i_post, checkpoint52l_post, checkpoint52k_post, checkpoint58, checkpoint55, checkpoint54, checkpoint57, checkpoint56, checkpoint51, checkpoint50, checkpoint53, checkpoint52, checkpoint50d_post, checkpoint52f_post, checkpoint57n_post, checkpoint58a_post, checkpoint50b_pre, checkpoint57z_post, checkpoint54f_post, checkpoint51f_post, checkpoint48b_post, checkpoint51d_post, checkpoint48c_pre, checkpoint51t_post, c49_autodiff, checkpoint51n_post, checkpoint55i_post, checkpoint57l_post, checkpoint52i_pre, hrcube_1, hrcube_2, hrcube_3, checkpoint51s_post, checkpoint57t_post, checkpoint55c_post, checkpoint48d_pre, checkpoint51j_post, checkpoint47i_post, checkpoint52e_pre, checkpoint57v_post, checkpoint57f_post, checkpoint52e_post, checkpoint51n_pre, checkpoint53d_post, checkpoint57a_post, checkpoint48d_post, checkpoint57h_pre, checkpoint48f_post, checkpoint52b_pre, checkpoint54b_post, checkpoint57h_post, checkpoint51l_pre, checkpoint52m_post, checkpoint57y_pre, checkpoint55g_post, checkpoint48h_post, checkpoint51q_post, checkpoint51b_pre, checkpoint47g_post, checkpoint52b_post, checkpoint52c_post, checkpoint51h_pre, checkpoint48a_post, checkpoint57c_post, checkpoint50f_post, checkpoint50a_post, checkpoint50f_pre, checkpoint52f_pre, checkpoint55d_post, checkpoint47j_post, checkpoint54a_pre, checkpoint53c_post, checkpoint55d_pre, checkpoint57c_pre, checkpoint55j_post, branch-exfmods-tag, branchpoint-genmake2, checkpoint54a_post, checkpoint55h_post, checkpoint51r_post, checkpoint48c_post, checkpoint51i_post, checkpoint57e_post, checkpoint55b_post, checkpoint51b_post, checkpoint51c_post, checkpoint53a_post, checkpoint55f_post, checkpoint52d_post, checkpoint53g_post, checkpoint57p_post, checkpint57u_post, checkpoint50g_post, checkpoint57q_post, eckpoint57e_pre, checkpoint52a_pre, checkpoint50h_post, checkpoint52i_post, checkpoint50e_pre, checkpoint50i_post, checkpoint51i_pre, checkpoint52h_pre, checkpoint56a_post, checkpoint53f_post, checkpoint57h_done, checkpoint52j_post, checkpoint47f_post, checkpoint50e_post, checkpoint57j_post, checkpoint57f_pre, branch-netcdf, checkpoint50d_pre, checkpoint52n_post, checkpoint53b_pre, checkpoint56c_post, checkpoint51e_post, checkpoint57a_pre, checkpoint55a_post, checkpoint48, checkpoint49, checkpoint57o_post, checkpoint51o_post, checkpoint57k_post, checkpoint51f_pre, checkpoint48g_post, checkpoint53b_post, checkpoint47h_post, checkpoint52a_post, checkpoint57w_post, checkpoint51g_post, ecco_c52_e35, checkpoint57x_post, checkpoint50b_post, checkpoint58c_post, checkpoint51m_post, checkpoint53d_pre, checkpoint55e_post, checkpoint54c_post, checkpoint51a_post, checkpoint51p_post, checkpoint51u_post
Branch point for: branch-exfmods-curt, branch-genmake2, branch-nonh, tg2-branch, netcdf-sm0, checkpoint51n_branch
Changes since 1.2: +12 -12 lines 
Forgot to commit active I/O directives for tangent linear run.
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 = g_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 = g_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 = g_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 = g_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 = g_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 = g_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 = g_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 = g_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 = g_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 = g_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 = g_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 = g_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