/[MITgcm]/MITgcm/model/src/set_defaults.F
ViewVC logotype

Diff of /MITgcm/model/src/set_defaults.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.48 by adcroft, Thu Jun 5 16:03:05 2003 UTC revision 1.51 by jmc, Fri Aug 1 01:45:45 2003 UTC
# Line 153  Cml      sBeta               = 7.4D-4 Line 153  Cml      sBeta               = 7.4D-4
153        useCDscheme         = .FALSE.        useCDscheme         = .FALSE.
154        useEnergyConservingCoriolis = .FALSE.        useEnergyConservingCoriolis = .FALSE.
155        useJamartWetPoints  = .FALSE.        useJamartWetPoints  = .FALSE.
156          debugLevel          = debLevA
157    
158  C--   Set (free)surface-related parameters  C--   Set (free)surface-related parameters
159        implicitFreeSurface = .TRUE.        implicitFreeSurface = .TRUE.
# Line 171  C--   Set (free)surface-related paramete Line 172  C--   Set (free)surface-related paramete
172        trac_EvPrRn = UNSET_RL        trac_EvPrRn = UNSET_RL
173    
174  C--   Atmospheric physical parameters (e.g.: EOS)  C--   Atmospheric physical parameters (e.g.: EOS)
175        atm_Po =  1.D5        celsius2K = 273.16 _d 0
176        atm_Cp =  1004.D0        atm_Po =  1. _d 5
177        atm_Rd =  UNSET_RL        atm_Cp = 1004. _d 0
178        atm_kappa = 2.D0 / 7.D0        atm_Rd = UNSET_RL
179          atm_kappa = 2. _d 0 / 7. _d 0
180          atm_Rq = 0. _d 0
181        integr_GeoPot = 2        integr_GeoPot = 2
182        selectFindRoSurf = 0        selectFindRoSurf = 0
183    
# Line 237  C--   Input files Line 240  C--   Input files
240        pSurfInitFile   = ' '        pSurfInitFile   = ' '
241        dQdTFile        = ' '        dQdTFile        = ' '
242        ploadFile       = ' '        ploadFile       = ' '
243          mdsioLocalDir   = ' '
244    
245  C  C
246        RETURN        RETURN
Legend:
Removed from v.1.48  
changed lines
  Added in v.1.51
  ViewVC Help
Powered by ViewVC 1.1.22