/[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.39 by jmc, Wed Feb 26 03:21:08 2003 UTC revision 1.40 by jmc, Mon Mar 17 17:10:42 2003 UTC
# Line 163  CEOP Line 163  CEOP
163       &'   /* Gravitational acceleration ( m/s^2 ) */')       &'   /* Gravitational acceleration ( m/s^2 ) */')
164        CALL WRITE_0D_R8( gBaro,   INDEX_NONE,'gBaro =',        CALL WRITE_0D_R8( gBaro,   INDEX_NONE,'gBaro =',
165       &'   /* Barotropic gravity ( m/s^2 ) */')       &'   /* Barotropic gravity ( m/s^2 ) */')
166          CALL WRITE_0D_R8(rotationPeriod,INDEX_NONE,'rotationPeriod =',
167         &'   /* Rotation Period ( s ) */')
168          CALL WRITE_0D_R8( omega,   INDEX_NONE,'omega =',
169         &'   /* Angular velocity ( rad/s ) */')
170        CALL WRITE_0D_R8( f0,      INDEX_NONE,'f0 =',        CALL WRITE_0D_R8( f0,      INDEX_NONE,'f0 =',
171       &'   /* Reference coriolis parameter ( 1/s ) */')       &'   /* Reference coriolis parameter ( 1/s ) */')
172        CALL WRITE_0D_R8( beta,    INDEX_NONE,'beta =',        CALL WRITE_0D_R8( beta,    INDEX_NONE,'beta =',
Legend:
Removed from v.1.39  
changed lines
  Added in v.1.40
  ViewVC Help
Powered by ViewVC 1.1.22