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

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

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

revision 1.72 by mlosch, Sat Sep 25 23:09:55 2010 UTC revision 1.73 by jmc, Mon Feb 21 22:26:50 2011 UTC
# Line 32  C       |-- CD_CODE_INIT_FIXED Line 32  C       |-- CD_CODE_INIT_FIXED
32  C       |  C       |
33  C       |-- EXF_INIT_FIXED  C       |-- EXF_INIT_FIXED
34  C       |  C       |
35    C       |-- CHEAPAML_INIT_FIXED
36    C       |
37  C       |-- GMREDI_INIT_FIXED  C       |-- GMREDI_INIT_FIXED
38  C       |  C       |
39  C       |-- DWNSLP_INIT_FIXED  C       |-- DWNSLP_INIT_FIXED
# Line 106  C     === Global variables === Line 108  C     === Global variables ===
108    
109  C     !INPUT/OUTPUT PARAMETERS:  C     !INPUT/OUTPUT PARAMETERS:
110  C     === Routine arguments ===  C     === Routine arguments ===
111  C     myThid -  Number of this instances  C     myThid :: my Thread Id Number
112        INTEGER myThid        INTEGER myThid
113  CEOP  CEOP
114    
# Line 149  C--   Initialize fixed arrays for EXF Line 151  C--   Initialize fixed arrays for EXF
151        ENDIF        ENDIF
152  #endif  #endif
153    
154    #ifdef ALLOW_CHEAPAML
155          IF ( useCheapAML ) CALL CHEAPAML_INIT_FIXED( myThid )
156    #endif
157    
158  #ifdef ALLOW_GMREDI  #ifdef ALLOW_GMREDI
159  C--   Initialize fixed arrays for GM-Redi  C--   Initialize fixed arrays for GM-Redi
160        IF ( useGMRedi ) THEN        IF ( useGMRedi ) THEN
# Line 250  C--   in order to provide the weight fil Line 256  C--   in order to provide the weight fil
256        IF (useSEAICE) CALL SEAICE_COST_INIT_FIXED( myThid )        IF (useSEAICE) CALL SEAICE_COST_INIT_FIXED( myThid )
257  #endif  #endif
258    
259  #ifdef ALLOW_SMOOTH  #ifdef ALLOW_SMOOTH
260        CALL SMOOTH_INIT_FIXED(myThid)        CALL SMOOTH_INIT_FIXED(myThid)
261  #endif /* ALLOW_SMOOTH */  #endif /* ALLOW_SMOOTH */
262    
Legend:
Removed from v.1.72  
changed lines
  Added in v.1.73
  ViewVC Help
Powered by ViewVC 1.1.22