/[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.97 by jmc, Mon May 7 23:20:01 2007 UTC revision 1.98 by jmc, Fri Jun 1 21:13:11 2007 UTC
# Line 175  C     ycoord :: varying parameters. Line 175  C     ycoord :: varying parameters.
175       &'   /* Depth scale for Bryan and Lewis 1979 ( m ) */')       &'   /* Depth scale for Bryan and Lewis 1979 ( m ) */')
176        CALL WRITE_0D_R8( diffKrBL79Ho, INDEX_NONE,'diffKrBL79Ho =',        CALL WRITE_0D_R8( diffKrBL79Ho, INDEX_NONE,'diffKrBL79Ho =',
177       &'   /* Turning depth for Bryan and Lewis 1979 ( m ) */')       &'   /* Turning depth for Bryan and Lewis 1979 ( m ) */')
178          CALL WRITE_0D_R8( ivdc_kappa, INDEX_NONE,'ivdc_kappa =',
179         &  ' /* Implicit Vertical Diffusivity for Convection ( m^2/s ) */')
180          CALL WRITE_0D_R8( hMixCriteria, INDEX_NONE,'hMixCriteria=',
181         & '  /* Criteria for mixed-layer diagnostic */')
182        CALL WRITE_0D_C( eosType, 0, INDEX_NONE, 'eosType =',        CALL WRITE_0D_C( eosType, 0, INDEX_NONE, 'eosType =',
183       & '  /* Type of Equation of State */')       & '  /* Type of Equation of State */')
184        CALL WRITE_0D_R8( tAlpha,  INDEX_NONE,'tAlpha =',        CALL WRITE_0D_R8( tAlpha,  INDEX_NONE,'tAlpha =',
Legend:
Removed from v.1.97  
changed lines
  Added in v.1.98
  ViewVC Help
Powered by ViewVC 1.1.22