/[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.106 by jmc, Sun Mar 30 21:45:11 2008 UTC revision 1.107 by jmc, Sat Apr 5 21:24:08 2008 UTC
# Line 398  c     CALL PRINT_MESSAGE( msgBuf, ioUnit Line 398  c     CALL PRINT_MESSAGE( msgBuf, ioUnit
398       &                '/* Temp. implicit vert. advection on/off */')       &                '/* Temp. implicit vert. advection on/off */')
399        CALL WRITE_0D_L( tempForcing,  INDEX_NONE,        CALL WRITE_0D_L( tempForcing,  INDEX_NONE,
400       & 'tempForcing  =', '  /* Temperature forcing on/off flag */')       & 'tempForcing  =', '  /* Temperature forcing on/off flag */')
401          CALL WRITE_0D_L( tempIsActiveTr, INDEX_NONE, 'tempIsActiveTr =',
402         & ' /* Temp. is a dynamically Active Tracer */')
403        CALL WRITE_0D_L( saltStepping,  INDEX_NONE,        CALL WRITE_0D_L( saltStepping,  INDEX_NONE,
404       & 'saltStepping =', '  /* Salinity equation on/off flag */')       & 'saltStepping =', '  /* Salinity equation on/off flag */')
405        CALL WRITE_0D_L( saltAdvection,  INDEX_NONE,        CALL WRITE_0D_L( saltAdvection,  INDEX_NONE,
# Line 406  c     CALL PRINT_MESSAGE( msgBuf, ioUnit Line 408  c     CALL PRINT_MESSAGE( msgBuf, ioUnit
408       &                '/* Sali. implicit vert. advection on/off */')       &                '/* Sali. implicit vert. advection on/off */')
409        CALL WRITE_0D_L( saltForcing,  INDEX_NONE,        CALL WRITE_0D_L( saltForcing,  INDEX_NONE,
410       & 'saltForcing  =', '  /* Salinity forcing on/off flag */')       & 'saltForcing  =', '  /* Salinity forcing on/off flag */')
411          CALL WRITE_0D_L( saltIsActiveTr, INDEX_NONE, 'saltIsActiveTr =',
412         & ' /* Salt  is a dynamically Active Tracer */')
413        CALL WRITE_0D_I( readBinaryPrec, INDEX_NONE, ' readBinaryPrec =',        CALL WRITE_0D_I( readBinaryPrec, INDEX_NONE, ' readBinaryPrec =',
414       &  ' /* Precision used for reading binary files */')       &  ' /* Precision used for reading binary files */')
415        CALL WRITE_0D_I(writeBinaryPrec, INDEX_NONE, 'writeBinaryPrec =',        CALL WRITE_0D_I(writeBinaryPrec, INDEX_NONE, 'writeBinaryPrec =',
Legend:
Removed from v.1.106  
changed lines
  Added in v.1.107
  ViewVC Help
Powered by ViewVC 1.1.22