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

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

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

revision 1.1 by heimbach, Mon Sep 11 20:42:57 2000 UTC revision 1.2 by adcroft, Fri Feb 2 21:04:48 2001 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2    C $Name$
3    
4  #include "CPP_OPTIONS.h"  #include "CPP_OPTIONS.h"
5    
6        SUBROUTINE PACKAGES_BOOT( myThid )        SUBROUTINE PACKAGES_BOOT( myThid )
7  C     /==========================================================\  C     /==========================================================\
8  C     | SUBROUTINE PACKAGES_BOOT                                 |  C     | SUBROUTINE PACKAGES_BOOT                                 |
9  C     | o Routine to initialize package configuration            |  C     | o Routine to parse runtime package selection file        |
10  C     |==========================================================|  C     |==========================================================|
11    C     | Routine reads a flat file which contains a single flag   |
12    C     | for each known "package". Flag can enables runtime       |
13    C     | activation or deactivation of a package. The data is read|
14    C     | from a file called data.pkg.                             |
15    C     | Note - If a runtime activation flag is set on but the    |
16    C     |        package code was not included in the build then   |
17    C     |        the default behavior is to stop with an error.    |
18  C     \==========================================================/  C     \==========================================================/
19        IMPLICIT NONE        IMPLICIT NONE
20    
# Line 23  C--   data.pkg namelists Line 31  C--   data.pkg namelists
31        NAMELIST /PACKAGES/        NAMELIST /PACKAGES/
32       &          useKPP,       &          useKPP,
33       &          useGMRedi,       &          useGMRedi,
34         &          useOBCS,
35       &          useECCO       &          useECCO
36    
37  C     === Local variables ===  C     === Local variables ===
# Line 46  C     iUnit       - Work variable for IO Line 55  C     iUnit       - Work variable for IO
55  C--   Default package configuration  C--   Default package configuration
56        useGMRedi=.FALSE.        useGMRedi=.FALSE.
57        useKPP=.FALSE.        useKPP=.FALSE.
58          useOBCS=.FALSE.
59        useECCO=.FALSE.        useECCO=.FALSE.
60    
   
61  C--   Read parameters from open data file  C--   Read parameters from open data file
62        READ(UNIT=iUnit,NML=PACKAGES)        READ(UNIT=iUnit,NML=PACKAGES)
63    
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22