/[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.30 by jmc, Mon Dec 15 02:07:29 2003 UTC revision 1.31 by molod, Mon Dec 15 23:00:44 2003 UTC
# Line 151  C--   Open boundaries data Line 151  C--   Open boundaries data
151        IF ( useCoupler ) CALL CPL_INI_VARS( mythid )        IF ( useCoupler ) CALL CPL_INI_VARS( mythid )
152  #endif  #endif
153    
154    C AMM
155    #ifdef ALLOW_FIZHI
156    C Initialize FIZHI state variables
157          IF (useFIZHI) CALL FIZHI_INIT_VARS( mythid)
158    #endif
159    C AMM
160    
161        RETURN        RETURN
162        END        END
Legend:
Removed from v.1.30  
changed lines
  Added in v.1.31
  ViewVC Help
Powered by ViewVC 1.1.22