/[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.7 by heimbach, Mon Jul 30 20:39:18 2001 UTC revision 1.8 by cnh, Wed Sep 26 18:09:16 2001 UTC
# Line 3  C $Name$ Line 3  C $Name$
3    
4  #include "CPP_OPTIONS.h"  #include "CPP_OPTIONS.h"
5    
6    CBOP
7    C     !ROUTINE: PACKAGES_INIT_VARIABLES
8    C     !INTERFACE:
9        SUBROUTINE PACKAGES_INIT_VARIABLES( myThid )        SUBROUTINE PACKAGES_INIT_VARIABLES( myThid )
 C     /==========================================================\  
 C     | SUBROUTINE PACKAGES_INIT_VARIABLES                       |  
 C     | o Does initialisation of package-related variable data   |  
 C     |==========================================================|  
 C     \==========================================================/  
       IMPLICIT NONE  
10    
11    C     !DESCRIPTION: \bv
12    C     *==========================================================*
13    C     | SUBROUTINE PACKAGES_INIT_VARIABLES                        
14    C     | o Does initialisation of package-related variable data    
15    C     *==========================================================*
16    C     \ev
17    
18    C     !CALLING SEQUENCE:
19    C     PACKAGES_INIT_VARIABLES
20    C       |
21    C       |-- GMREDI_INIT
22    C       |
23    C       |-- KPP_INIT
24    C       |-- KPP_OPEN_DIAGS
25    C       |
26    C       |-- OBCS_INIT_VARIABLES
27    C       |
28    C       |-- AIM_INIT
29    C       |
30    C       |-- CTRL_MAP_INI
31    C       |
32    C       |-- COST_INIT
33    C       |
34    C       |-- ECCO_INIT
35    C       |
36    C       |-- INI_FORCING
37    
38    C     !USES:
39          IMPLICIT NONE
40  C     === Global variables ===  C     === Global variables ===
41  #include "SIZE.h"  #include "SIZE.h"
42  #include "EEPARAMS.h"  #include "EEPARAMS.h"
43  #include "PARAMS.h"  #include "PARAMS.h"
44    
45    C     !INPUT/OUTPUT PARAMETERS:
46  C     === Routine arguments ===  C     === Routine arguments ===
47  C     myThid -  Number of this instances  C     myThid -  Number of this instances
48        INTEGER myThid        INTEGER myThid
49    CEOP
50    
51  #ifdef ALLOW_GMREDI  #ifdef ALLOW_GMREDI
52  C--   Initialize GM/Redi parameterization  C--   Initialize GM/Redi parameterization

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

  ViewVC Help
Powered by ViewVC 1.1.22