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

Diff of /MITgcm/pkg/autodiff/active_file_control.flow

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

revision 1.4 by heimbach, Sat Nov 5 19:20:42 2011 UTC revision 1.5 by jmc, Thu Aug 2 22:09:15 2012 UTC
# Line 2  C $Header$ Line 2  C $Header$
2  C $Name$  C $Name$
3    
4  CBOP  CBOP
5  C     !ROUTINE: flow directives for active_file_control.F  C     !ROUTINE: flow directives for active_file_control[_slice].F
6  C     !INTERFACE:  C     !INTERFACE:
7  C     !DESCRIPTION: \bv  C     !DESCRIPTION: \bv
8  c     ==================================================================  c     ==================================================================
9  c     active_file_control.flow  c     active_file_control.flow
10  c     ==================================================================  c     ==================================================================
11  c     provides flow directives for routines in active_file_control.F  c     provides flow directives for routines in active_file_control.F
12    c                                       and in active_file_control_slice.F
13  c     required by TAMC/TAF  c     required by TAMC/TAF
14  c     * active_read_rl  c     * active_read_3d_rl , active_read_3d_rs
15  c     * active_write_rl  c     * active_read_xz_rl , active_read_xz_rs
16    c     * active_read_yz_rl , active_read_yz_rs
17    c     * active_write_3d_rl, active_write_3d_rl
18    c     * active_write_xz_rl, active_write_xz_rl
19    c     * active_write_yz_rl, active_write_yz_rl
20  c     ==================================================================  c     ==================================================================
21  c     active_file_control.flow  c     active_file_control.flow
22  c     ==================================================================  c     ==================================================================
# Line 19  C     \ev Line 24  C     \ev
24  CEOP  CEOP
25    
26  c----------------------------------------  c----------------------------------------
27  c subroutine active_read_rl  c subroutine active_read_3d_rl
28  c----------------------------------------  c----------------------------------------
29  cadj SUBROUTINE active_read_rl INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9  cadj SUBROUTINE active_read_3d_rl INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9, 10
30  cadj SUBROUTINE active_read_rl OUTPUT  =    2  cadj SUBROUTINE active_read_3d_rl OUTPUT  =    2
31    
32  c----------------------------------------  c----------------------------------------
33  c subroutine active_write_rl  c subroutine active_read_3d_rs
34  c----------------------------------------  c----------------------------------------
35  cadj SUBROUTINE active_write_rl INPUT   = 1, 2, 3, 4, 5, 6, 7, 8  cadj SUBROUTINE active_read_3d_rs INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9, 10
36  cadj SUBROUTINE active_write_rl OUTPUT  =    2  cadj SUBROUTINE active_read_3d_rs OUTPUT  =    2
37    
38    c----------------------------------------
39    c subroutine active_read_xz_rl
40    c----------------------------------------
41    cadj SUBROUTINE active_read_xz_rl INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9, 10
42    cadj SUBROUTINE active_read_xz_rl OUTPUT  =    2
43    
44    c----------------------------------------
45    c subroutine active_read_xz_rs
46    c----------------------------------------
47    cadj SUBROUTINE active_read_xz_rs INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9, 10
48    cadj SUBROUTINE active_read_xz_rs OUTPUT  =    2
49    
50    c----------------------------------------
51    c subroutine active_read_yz_rl
52    c----------------------------------------
53    cadj SUBROUTINE active_read_yz_rl INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9, 10
54    cadj SUBROUTINE active_read_yz_rl OUTPUT  =    2
55    
56    c----------------------------------------
57    c subroutine active_read_yz_rs
58    c----------------------------------------
59    cadj SUBROUTINE active_read_yz_rs INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9, 10
60    cadj SUBROUTINE active_read_yz_rs OUTPUT  =    2
61    
62    c----------------------------------------
63    c subroutine active_write_3d_rl
64    c----------------------------------------
65    cadj SUBROUTINE active_write_3d_rl INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9
66    cadj SUBROUTINE active_write_3d_rl OUTPUT  =    2
67    
68    c----------------------------------------
69    c subroutine active_write_3d_rs
70    c----------------------------------------
71    cadj SUBROUTINE active_write_3d_rs INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9
72    cadj SUBROUTINE active_write_3d_rs OUTPUT  =    2
73    
74    c----------------------------------------
75    c subroutine active_write_xz_rl
76    c----------------------------------------
77    cadj SUBROUTINE active_write_xz_rl INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9
78    cadj SUBROUTINE active_write_xz_rl OUTPUT  =    2
79    
80    c----------------------------------------
81    c subroutine active_write_xz_rs
82    c----------------------------------------
83    cadj SUBROUTINE active_write_xz_rs INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9
84    cadj SUBROUTINE active_write_xz_rs OUTPUT  =    2
85    
86    c----------------------------------------
87    c subroutine active_write_yz_rl
88    c----------------------------------------
89    cadj SUBROUTINE active_write_yz_rl INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9
90    cadj SUBROUTINE active_write_yz_rl OUTPUT  =    2
91    
92    c----------------------------------------
93    c subroutine active_write_yz_rs
94    c----------------------------------------
95    cadj SUBROUTINE active_write_yz_rs INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9
96    cadj SUBROUTINE active_write_yz_rs OUTPUT  =    2
97    

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

  ViewVC Help
Powered by ViewVC 1.1.22