/[MITgcm]/MITgcm/pkg/mypackage/mypackage_readparms.F
ViewVC logotype

Diff of /MITgcm/pkg/mypackage/mypackage_readparms.F

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

revision 1.1 by heimbach, Wed Jun 28 21:26:21 2006 UTC revision 1.2 by edhill, Mon Aug 7 21:13:52 2006 UTC
# Line 3  C $Name$ Line 3  C $Name$
3    
4  #include "MYPACKAGE_OPTIONS.h"  #include "MYPACKAGE_OPTIONS.h"
5    
6    C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
7    CBOP 0
8    C !ROUTINE: MYPACKAGE_READPARMS
9    
10    C !INTERFACE:
11        SUBROUTINE MYPACKAGE_READPARMS( myThid )        SUBROUTINE MYPACKAGE_READPARMS( myThid )
 C     /==========================================================\  
 C     | SUBROUTINE MYPACKAGE_READPARMS                              |  
 C     | o Routine to initialize MYPACKAGE variables and constants.  |  
 C     |==========================================================|  
 C     | Initialize MYPACKAGE parameters, read in data.mypackage     |  
 C     \==========================================================/  
       IMPLICIT NONE  
12    
13  C     === Global variables ===  C     !DESCRIPTION:
14    C     Initialize MYPACKAGE variables and constants.
15    
16    C     !USES:
17          IMPLICIT NONE
18  #include "SIZE.h"  #include "SIZE.h"
19  #include "EEPARAMS.h"  #include "EEPARAMS.h"
20  #include "PARAMS.h"  #include "PARAMS.h"
21  #include "GRID.h"  #include "GRID.h"
22  #include "MYPACKAGE.h"  #include "MYPACKAGE.h"
23    
24  C     === Routine arguments ===  C     !INPUT PARAMETERS:
25        INTEGER myThid        INTEGER myThid
26    CEOP
27    
28  #ifdef ALLOW_MYPACKAGE  #ifdef ALLOW_MYPACKAGE
29    
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22