/[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.4 by cnh, Wed Sep 26 18:09:16 2001 UTC revision 1.5 by jmc, Sat Jun 15 03:28:39 2002 UTC
# Line 18  C     \ev Line 18  C     \ev
18  C     !CALLING SEQUENCE:  C     !CALLING SEQUENCE:
19  C     PACKAGES_INIT_FIXED  C     PACKAGES_INIT_FIXED
20  C       |  C       |
21    C       |-- GAD_INIT
22    C       |
23  C       |-- OBCS_INIT_FIXED  C       |-- OBCS_INIT_FIXED
24  C       |  C       |
25  C       |-- FLT_INIT  C       |-- FLT_INIT
# Line 35  C     myThid -  Number of this instances Line 37  C     myThid -  Number of this instances
37        INTEGER myThid        INTEGER myThid
38  CEOP  CEOP
39    
40    C--   Initialize fixed params for GAD
41          CALL GAD_INIT( myThid )
42    
43  C--   Initialize fixed arrays for OBCS  C--   Initialize fixed arrays for OBCS
44  #ifdef ALLOW_OBCS  #ifdef ALLOW_OBCS
45        IF (useOBCS) THEN        IF (useOBCS) THEN

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

  ViewVC Help
Powered by ViewVC 1.1.22