/[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.28 by jmc, Sun Nov 23 01:28:05 2003 UTC revision 1.29 by jmc, Sun Dec 14 23:24:55 2003 UTC
# Line 19  C     \ev Line 19  C     \ev
19  C     !CALLING SEQUENCE:  C     !CALLING SEQUENCE:
20  C     PACKAGES_INIT_VARIABLES  C     PACKAGES_INIT_VARIABLES
21  C       |  C       |
22    C       |-- CD_CODE_INI_VARS
23    C       |
24  C       |-- GMREDI_INIT  C       |-- GMREDI_INIT
25  C       |  C       |
26  C       |-- KPP_INIT  C       |-- KPP_INIT
# Line 59  C     myThid -  Number of this instances Line 61  C     myThid -  Number of this instances
61        INTEGER myThid        INTEGER myThid
62  CEOP  CEOP
63    
64    #ifdef ALLOW_CD_CODE
65    C--   Initialize CD_CODE variables:
66    C- note(jmc): before packaging CD_CODE, was done within ini_fields (=called before),
67    C             therefore call CD-ini-vars before others pkg.
68          IF (useCDscheme) CALL CD_CODE_INI_VARS( myThid )
69    #endif
70    
71  #ifdef ALLOW_GMREDI  #ifdef ALLOW_GMREDI
72  C--   Initialize GM/Redi parameterization  C--   Initialize GM/Redi parameterization
73        IF (useGMRedi) CALL GMREDI_INIT( myThid )        IF (useGMRedi) CALL GMREDI_INIT( myThid )

Legend:
Removed from v.1.28  
changed lines
  Added in v.1.29

  ViewVC Help
Powered by ViewVC 1.1.22