/[MITgcm]/MITgcm/model/src/packages_init_variables.F
ViewVC logotype

Diff of /MITgcm/model/src/packages_init_variables.F

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

revision 1.18 by dimitri, Sat Dec 28 10:11:10 2002 UTC revision 1.19 by jmc, Thu Jun 12 18:21:34 2003 UTC
# Line 27  C       |-- OBCS_INIT_VARIABLES Line 27  C       |-- OBCS_INIT_VARIABLES
27  C       |  C       |
28  C       |-- PTRACERS_INIT  C       |-- PTRACERS_INIT
29  C       |  C       |
30    C       |-- LAND_INI_VARS
31    C       |
32  C       |-- CTRL_MAP_INI  C       |-- CTRL_MAP_INI
33  C       |  C       |
34  C       |-- EXF_INIT  C       |-- EXF_INIT
# Line 83  C--   Open boundaries data Line 85  C--   Open boundaries data
85        IF ( usePTRACERS ) CALL PTRACERS_INIT( mythid )        IF ( usePTRACERS ) CALL PTRACERS_INIT( mythid )
86  #endif  #endif
87    
88    #ifdef ALLOW_LAND
89          IF ( useLAND ) CALL LAND_INI_VARS( mythid )
90    #endif
91    
92  #if (defined (ALLOW_ADJOINT_RUN) || defined (ALLOW_TANGENTLINEAR_RUN))  #if (defined (ALLOW_ADJOINT_RUN) || defined (ALLOW_TANGENTLINEAR_RUN))
93  c--   Map the control variables onto the model state.  c--   Map the control variables onto the model state.
94        call ctrl_map_ini( mythid )        call ctrl_map_ini( mythid )
Legend:
Removed from v.1.18  
changed lines
  Added in v.1.19
  ViewVC Help
Powered by ViewVC 1.1.22