/[MITgcm]/MITgcm/pkg/offline/offline_readparms.F
ViewVC logotype

Diff of /MITgcm/pkg/offline/offline_readparms.F

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

revision 1.8 by jmc, Sat Apr 3 22:34:26 2010 UTC revision 1.9 by jmc, Sun Apr 4 14:16:32 2010 UTC
# Line 16  C     === Global variables === Line 16  C     === Global variables ===
16  #include "SIZE.h"  #include "SIZE.h"
17  #include "EEPARAMS.h"  #include "EEPARAMS.h"
18  #include "PARAMS.h"  #include "PARAMS.h"
 c#include "GRID.h"  
19  #ifdef ALLOW_OFFLINE  #ifdef ALLOW_OFFLINE
20  #include "OFFLINE.h"  #include "OFFLINE.h"
21  #endif  #endif
# Line 25  C     === Routine arguments === Line 24  C     === Routine arguments ===
24        INTEGER myThid        INTEGER myThid
25    
26  #ifdef ALLOW_OFFLINE  #ifdef ALLOW_OFFLINE
27    C     === Local variables ===
28    C     msgBuf     :: Informational/error message buffer
29    C     iUnit      :: Work variable for IO unit number
30          CHARACTER*(MAX_LEN_MBUF) msgBuf
31          INTEGER iUnit
32    C     Retired main data.offline file parameters
33          CHARACTER*(MAX_LEN_FNAM) KPP_ghatFile
34    
35  C--   Bulk Formula parameter  C--   Bulk Formula parameter
36        NAMELIST /OFFLINE_PARM01/        NAMELIST /OFFLINE_PARM01/
37       &         UvelFile, VvelFile, WvelFile, ThetFile,       &         UvelFile, VvelFile, WvelFile, ThetFile,
# Line 38  C--   Bulk Formula parameter Line 45  C--   Bulk Formula parameter
45       &         deltaToffline, offlineForcingPeriod,       &         deltaToffline, offlineForcingPeriod,
46       &         offlineForcingCycle, offlineLoadPrec       &         offlineForcingCycle, offlineLoadPrec
47    
48  C     === Local variables ===  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
 C     msgBuf     :: Informational/error message buffer  
 C     iUnit      :: Work variable for IO unit number  
       CHARACTER*(MAX_LEN_MBUF) msgBuf  
       INTEGER iUnit  
 C     Retired main data.offline file parameters  
       CHARACTER*(MAX_LEN_FNAM) KPP_ghatFile  
49    
50        _BEGIN_MASTER(myThid)        _BEGIN_MASTER(myThid)
51    
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9
  ViewVC Help
Powered by ViewVC 1.1.22