/[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.63 by jmc, Fri Oct 29 16:30:11 2004 UTC revision 1.64 by jmc, Tue Nov 2 00:38:46 2004 UTC
# Line 113  C     zcoord :: Line 113  C     zcoord ::
113       & CALL WRITE_0D_R8( viscA4D, INDEX_NONE,'viscA4D =',       & CALL WRITE_0D_R8( viscA4D, INDEX_NONE,'viscA4D =',
114       & '  /* Lateral biharmonic viscosity (Divergence)( m^4/s ) */')       & '  /* Lateral biharmonic viscosity (Divergence)( m^4/s ) */')
115        IF ( viscA4Z.NE.viscA4 )        IF ( viscA4Z.NE.viscA4 )
116       & CALL WRITE_0D_R8( viscA4D, INDEX_NONE,'viscA4Z =',       & CALL WRITE_0D_R8( viscA4Z, INDEX_NONE,'viscA4Z =',
117       & '  /* Lateral biharmonic viscosity (Vorticity) ( m^4/s ) */')       & '  /* Lateral biharmonic viscosity (Vorticity) ( m^4/s ) */')
118        CALL WRITE_0D_R8( viscA4Max, INDEX_NONE,'viscA4Max =',        CALL WRITE_0D_R8( viscA4Max, INDEX_NONE,'viscA4Max =',
119       &'   /* Maximum biharmonic viscosity ( m^2/s ) */')       &'   /* Maximum biharmonic viscosity ( m^2/s ) */')
Legend:
Removed from v.1.63  
changed lines
  Added in v.1.64
  ViewVC Help
Powered by ViewVC 1.1.22