/[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.32 by jmc, Thu Mar 7 14:09:02 2002 UTC revision 1.33 by jmc, Sat Jun 15 03:28:39 2002 UTC
# Line 196  CEOP Line 196  CEOP
196       &' /* convert F.W. Flux to Salt Flux (-1=use local S)(ppt)*/')       &' /* convert F.W. Flux to Salt Flux (-1=use local S)(ppt)*/')
197        ENDIF        ENDIF
198    
199          CALL WRITE_0D_L( multiDimAdvection, INDEX_NONE,
200         & 'multiDimAdvection =',
201         &'   /* enable/disable Multi-Dim Advection */')
202        CALL WRITE_0D_L( staggerTimeStep, INDEX_NONE,        CALL WRITE_0D_L( staggerTimeStep, INDEX_NONE,
203       &                 'staggerTimeStep =',       &                 'staggerTimeStep =',
204       &'   /* Stagger time stepping on/off flag */')       &'   /* Stagger time stepping on/off flag */')
# Line 214  CEOP Line 217  CEOP
217       & '  /* Momentum pressure term on/off flag */')       & '  /* Momentum pressure term on/off flag */')
218        CALL WRITE_0D_L( tempStepping,  INDEX_NONE,        CALL WRITE_0D_L( tempStepping,  INDEX_NONE,
219       & 'tempStepping =', '  /* Temperature equation on/off flag */')       & 'tempStepping =', '  /* Temperature equation on/off flag */')
220          CALL WRITE_0D_L( tempAdvection,  INDEX_NONE,
221         & 'tempAdvection=', '  /* Temperature advection on/off flag */')
222          CALL WRITE_0D_L( tempForcing,  INDEX_NONE,
223         & 'tempForcing  =', '  /* Temperature forcing on/off flag */')
224          CALL WRITE_0D_L( saltStepping,  INDEX_NONE,
225         & 'saltStepping =', '  /* Salinity equation on/off flag */')
226          CALL WRITE_0D_L( saltAdvection,  INDEX_NONE,
227         & 'saltAdvection=', '  /* Salinity advection on/off flag */')
228          CALL WRITE_0D_L( saltForcing,  INDEX_NONE,
229         & 'saltForcing  =', '  /* Salinity forcing on/off flag */')
230        CALL WRITE_0D_L( nonHydrostatic, INDEX_NONE,        CALL WRITE_0D_L( nonHydrostatic, INDEX_NONE,
231       & 'nonHydrostatic =', '  /* Non-Hydrostatic on/off flag */')       & 'nonHydrostatic =', '  /* Non-Hydrostatic on/off flag */')
232        WRITE(msgBuf,'(A)') '//  '        WRITE(msgBuf,'(A)') '//  '
# Line 257  CEOP Line 270  CEOP
270       &'   /* Model clock timestep ( s ) */')       &'   /* Model clock timestep ( s ) */')
271        CALL WRITE_0D_R8( cAdjFreq, INDEX_NONE,'cAdjFreq =',        CALL WRITE_0D_R8( cAdjFreq, INDEX_NONE,'cAdjFreq =',
272       &'   /* Convective adjustment interval ( s ) */')       &'   /* Convective adjustment interval ( s ) */')
273          CALL WRITE_0D_L( forcing_In_AB,INDEX_NONE,'forcing_In_AB =',
274         &'   /* put T,S Forcing in Adams-Bash. stepping */')
275        CALL WRITE_0D_R8( abeps, INDEX_NONE,'abeps =',        CALL WRITE_0D_R8( abeps, INDEX_NONE,'abeps =',
276       &'   /* Adams-Bashforth stabilizing weight */')       &'   /* Adams-Bashforth stabilizing weight */')
277        CALL WRITE_0D_R8( tauCD, INDEX_NONE,'tauCD =',        CALL WRITE_0D_R8( tauCD, INDEX_NONE,'tauCD =',
Legend:
Removed from v.1.32  
changed lines
  Added in v.1.33
  ViewVC Help
Powered by ViewVC 1.1.22