pkg/autodiff/active_file_loc_control_slice.flow

C $Header: /u/gcmpack/MITgcm/pkg/autodiff/active_file_loc_control_slice.flow,v 1.3 2007/10/08 23:50:53 jmc Exp $
C $Name:  $

CBOP
C     !ROUTINE: flow directives for active_file_loc_control_slice.F
C     !INTERFACE:
C     !DESCRIPTION: \bv
c     ==================================================================
c     active_file_loc_control_slice.flow
c     ==================================================================
c     provides flow directives for routines in active_file_loc_control.F
c     required by TAMC/TAF
c     * active_read_xz_rl_loc
c     * active_read_yz_rl_loc
c     * active_write_xz_rl_loc
c     * active_write_yz_rl_loc
c     ==================================================================
c     active_file_loc_control_slice.flow
c     ==================================================================
C     \ev
CEOP

c----------------------------------------
c subroutine active_read_xz_rl_loc
c----------------------------------------
cadj SUBROUTINE active_read_xz_rl_loc INPUT  = 1, 2, 3, 4, 5, 6, 7, 8, 9
cadj SUBROUTINE active_read_xz_rl_loc OUTPUT =    2

c----------------------------------------
c subroutine active_write_xz_rl_loc
c----------------------------------------
cadj SUBROUTINE active_write_xz_rl_loc INPUT  = 1, 2, 3, 4, 5, 6, 7, 8
cadj SUBROUTINE active_write_xz_rl_loc OUTPUT =    2

c----------------------------------------
c subroutine active_read_yz_rl_loc
c----------------------------------------
cadj SUBROUTINE active_read_yz_rl_loc INPUT  = 1, 2, 3, 4, 5, 6, 7, 8, 9
cadj SUBROUTINE active_read_yz_rl_loc OUTPUT =    2

c----------------------------------------
c subroutine active_write_yz_rl_loc
c----------------------------------------
cadj SUBROUTINE active_write_yz_rl_loc INPUT  = 1, 2, 3, 4, 5, 6, 7, 8
cadj SUBROUTINE active_write_yz_rl_loc OUTPUT =    2
1	C $Header: /u/gcmpack/MITgcm/pkg/autodiff/active_file_loc_control_slice.flow,v 1.3 2007/10/08 23:50:53 jmc Exp $
2	C $Name: $
3
4	CBOP
5	C !ROUTINE: flow directives for active_file_loc_control_slice.F
6	C !INTERFACE:
7	C !DESCRIPTION: \bv
8	c ==================================================================
9	c active_file_loc_control_slice.flow
10	c ==================================================================
11	c provides flow directives for routines in active_file_loc_control.F
12	c required by TAMC/TAF
13	c * active_read_xz_rl_loc
14	c * active_read_yz_rl_loc
15	c * active_write_xz_rl_loc
16	c * active_write_yz_rl_loc
17	c ==================================================================
18	c active_file_loc_control_slice.flow
19	c ==================================================================
20	C \ev
21	CEOP
22
23	c----------------------------------------
24	c subroutine active_read_xz_rl_loc
25	c----------------------------------------
26	cadj SUBROUTINE active_read_xz_rl_loc INPUT = 1, 2, 3, 4, 5, 6, 7, 8, 9
27	cadj SUBROUTINE active_read_xz_rl_loc OUTPUT = 2
28
29	c----------------------------------------
30	c subroutine active_write_xz_rl_loc
31	c----------------------------------------
32	cadj SUBROUTINE active_write_xz_rl_loc INPUT = 1, 2, 3, 4, 5, 6, 7, 8
33	cadj SUBROUTINE active_write_xz_rl_loc OUTPUT = 2
34
35	c----------------------------------------
36	c subroutine active_read_yz_rl_loc
37	c----------------------------------------
38	cadj SUBROUTINE active_read_yz_rl_loc INPUT = 1, 2, 3, 4, 5, 6, 7, 8, 9
39	cadj SUBROUTINE active_read_yz_rl_loc OUTPUT = 2
40
41	c----------------------------------------
42	c subroutine active_write_yz_rl_loc
43	c----------------------------------------
44	cadj SUBROUTINE active_write_yz_rl_loc INPUT = 1, 2, 3, 4, 5, 6, 7, 8
45	cadj SUBROUTINE active_write_yz_rl_loc OUTPUT = 2