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

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

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

revision 1.90 by jmc, Fri Jul 7 17:06:18 2006 UTC revision 1.91 by jmc, Thu Jul 13 02:58:03 2006 UTC
# Line 304  c     WRITE(msgBuf,'(2A)') ' Equation of Line 304  c     WRITE(msgBuf,'(2A)') ' Equation of
304       &                '  /* metric-Terms on/off flag */')       &                '  /* metric-Terms on/off flag */')
305        CALL WRITE_0D_L( useNHMTerms,  INDEX_NONE, 'useNHMTerms =',        CALL WRITE_0D_L( useNHMTerms,  INDEX_NONE, 'useNHMTerms =',
306       &              ' /* Non-Hydrostatic Metric-Terms on/off */')       &              ' /* Non-Hydrostatic Metric-Terms on/off */')
307          CALL WRITE_0D_L( useConstantF,  INDEX_NONE,
308         & 'useConstantF =', '  /* use Constant f0 Coriolis flag */')
309          CALL WRITE_0D_L( useBetaPlaneF,  INDEX_NONE,
310         & 'useBetaPlaneF =', ' /* use Beta-Plane Coriolis flag */')
311          CALL WRITE_0D_L( useSphereF,  INDEX_NONE,
312         & 'useSphereF  =', '   /* use Spherical Coriolis flag */')
313          CALL WRITE_0D_L( use3dCoriolis,  INDEX_NONE,
314         & 'use3dCoriolis =', ' /* 3-D Coriolis on/off flag */')
315        CALL WRITE_0D_L( useCoriolis,  INDEX_NONE,        CALL WRITE_0D_L( useCoriolis,  INDEX_NONE,
316       & 'useCoriolis =', '  /* Coriolis on/off flag */')       & 'useCoriolis =', '  /* Coriolis on/off flag */')
317        CALL WRITE_0D_L( useCDscheme,  INDEX_NONE,        CALL WRITE_0D_L( useCDscheme,  INDEX_NONE,
Legend:
Removed from v.1.90  
changed lines
  Added in v.1.91
  ViewVC Help
Powered by ViewVC 1.1.22