/[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.9 by heimbach, Fri Jan 11 19:24:24 2002 UTC revision 1.10 by heimbach, Thu Jan 17 16:55:25 2002 UTC
# Line 72  C--   Open boundaries data Line 72  C--   Open boundaries data
72        IF ( useAIM ) CALL AIM_INIT( mythid )        IF ( useAIM ) CALL AIM_INIT( mythid )
73  #endif  #endif
74    
75  #ifdef ALLOW_ADJOINT_RUN  #if (defined (ALLOW_ADJOINT_RUN) || defined (ALLOW_TANGENTLINEAR_RUN))
76  c--   Map the control variables onto the model state.  c--   Map the control variables onto the model state.
77        call ctrl_map_ini( mythid )        call ctrl_map_ini( mythid )
78        _BARRIER        _BARRIER
Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10
  ViewVC Help
Powered by ViewVC 1.1.22