/[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.75 by heimbach, Thu Oct 8 19:44:23 2009 UTC revision 1.76 by jmc, Tue Nov 24 00:17:42 2009 UTC
# Line 68  C       |-- BULKF_INIT_VARIA Line 68  C       |-- BULKF_INIT_VARIA
68  C       |  C       |
69  C       |-- THSICE_INI_VARS  C       |-- THSICE_INI_VARS
70  C       |  C       |
71    C       |-- NEST_CHILD_INIT_VARIA
72    C       |-- NEST_PARENT_INIT_VARIA
73    C       |
74  C       |-- CPL_INI_VARS  C       |-- CPL_INI_VARS
75  C       |  C       |
76  C       |-- ATM2D_INIT_VARS  C       |-- ATM2D_INIT_VARS
# Line 353  C--   Open boundaries data Line 356  C--   Open boundaries data
356        ENDIF        ENDIF
357  #endif /* ALLOW_THSICE */  #endif /* ALLOW_THSICE */
358    
359    #ifdef ALLOW_NEST_CHILD
360    C--   Initialize NEST in CHILD configuration
361          IF (useNEST_CHILD) THEN
362    #ifdef ALLOW_DEBUG
363           IF (debugMode)
364         &       CALL DEBUG_CALL('NEST_CHILD_INIT_VARIA',myThid)
365    #endif
366           CALL NEST_CHILD_INIT_VARIA( myThid )
367          ENDIF
368    #endif /* ALLOW_NEST_CHILD */
369    C
370    #ifdef ALLOW_NEST_PARENT
371    C--   Initialize NEST in PARENT configuration
372          IF (useNEST_PARENT) THEN
373    #ifdef ALLOW_DEBUG
374           IF (debugMode)
375         &       CALL DEBUG_CALL('NEST_PARENT_INIT',myThid)
376    #endif
377           CALL NEST_PARENT_INIT_VARIA( myThid )
378          ENDIF
379    #endif /* ALLOW_NEST_PARENT */
380    
381  #ifdef COMPONENT_MODULE  #ifdef COMPONENT_MODULE
382        IF (useCoupler) THEN        IF (useCoupler) THEN
383  # ifdef ALLOW_DEBUG  # ifdef ALLOW_DEBUG
Legend:
Removed from v.1.75  
changed lines
  Added in v.1.76
  ViewVC Help
Powered by ViewVC 1.1.22