/[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.16 by jmc, Tue Mar 6 17:25:07 2001 UTC revision 1.23 by heimbach, Fri Jul 13 14:26:57 2001 UTC
# Line 63  C     In spherical polar distances are i Line 63  C     In spherical polar distances are i
63        phiMin               = 0.0        phiMin               = 0.0
64        thetaMin             = 0.        thetaMin             = 0.
65        rSphere              = 6370. * 1.D3        rSphere              = 6370. * 1.D3
66    C     General curvilinear coordinate system
67          usingCurvilinearGrid = .FALSE.
68    
69  C--   Set default "physical" parameters  C--   Set default "physical" parameters
70        DO K =1,Nr        DO K =1,Nr
# Line 72  C--   Set default "physical" parameters Line 74  C--   Set default "physical" parameters
74        rhoNil              = 999.8D0        rhoNil              = 999.8D0
75        f0                  = 1.D-4        f0                  = 1.D-4
76        beta                = 1.D-11        beta                = 1.D-11
77          omega               = 2.D0 * PI / ( 3600.D0 * 24.D0 )
78        viscAh              = 0.D3        viscAh              = 0.D3
79        diffKhT             = 0.D3        diffKhT             = 0.D3
80        diffKhS             = 0.D3        diffKhS             = 0.D3
# Line 95  C--   Set default "physical" parameters Line 98  C--   Set default "physical" parameters
98        implicDiv2DFlow     = 1.D0        implicDiv2DFlow     = 1.D0
99        hFacMin             = 1.D0        hFacMin             = 1.D0
100        hFacMinDrDefault    = 0.D0        hFacMinDrDefault    = 0.D0
101          exactConserv        = .FALSE.
102          uniformLin_PhiSurf  = .TRUE.
103          nonlinFreeSurf      = 0
104          hFacInf             = 1.D0
105          hFacSup             = 1.D0
106        staggerTimeStep     = .FALSE.        staggerTimeStep     = .FALSE.
107        momViscosity        = .TRUE.        momViscosity        = .TRUE.
108        momAdvection        = .TRUE.        momAdvection        = .TRUE.
# Line 104  C--   Set default "physical" parameters Line 112  C--   Set default "physical" parameters
112        momStepping         = .TRUE.        momStepping         = .TRUE.
113        tempStepping        = .TRUE.        tempStepping        = .TRUE.
114        saltStepping        = .TRUE.        saltStepping        = .TRUE.
115          tr1Stepping         = .FALSE.
116        metricTerms         = .TRUE.        metricTerms         = .TRUE.
117        implicitDiffusion   = .FALSE.        implicitDiffusion   = .FALSE.
118        implicitViscosity   = .FALSE.        implicitViscosity   = .FALSE.
# Line 112  C--   Set default "physical" parameters Line 121  C--   Set default "physical" parameters
121        allowFreezing       = .FALSE.        allowFreezing       = .FALSE.
122        ivdc_kappa          = 0.D0        ivdc_kappa          = 0.D0
123        groundAtK1          = .FALSE.        groundAtK1          = .FALSE.
       nShap               = 0  
124        zonal_filt_lat      = 90.        zonal_filt_lat      = 90.
125        zonal_filt_sinpow   = 2        zonal_filt_sinpow   = 2
126        zonal_filt_cospow   = 2        zonal_filt_cospow   = 2
127        bottomDragLinear    = 0.        bottomDragLinear    = 0.
128        bottomDragQuadratic = 0.        bottomDragQuadratic = 0.
129          usePickupBeforeC35    = .FALSE.
130          debugMode             = .FALSE.
131          readPickupWithTracer  = .FALSE.
132          writePickupWithTracer = .FALSE.
133    
134    C--   Atmospheric physical parameters (e.g.: EOS)
135          atm_po =  1.D5
136          atm_cp =  1004.D0
137          atm_kappa = 2.D0 / 7.D0
138          Integr_GeoPot = 2
139    
140  C--   Elliptic solver parameters  C--   Elliptic solver parameters
141        cg2dMaxIters       = 150        cg2dMaxIters       = 150
142        cg2dTargetResidual = 1.D-7        cg2dTargetResidual = 1.D-7
143          cg2dTargetResWunit = -1.
144        cg2dChkResFreq     = 1        cg2dChkResFreq     = 1
145        cg2dpcOffDFac      = 0.51D0        cg2dpcOffDFac      = 0.51D0
146        cg3dMaxIters       = 150        cg3dMaxIters       = 150
# Line 139  C--   Time stepping parameters Line 158  C--   Time stepping parameters
158        pchkPtFreq        = deltaT*0        pchkPtFreq        = deltaT*0
159        chkPtFreq         = deltaT*0        chkPtFreq         = deltaT*0
160        dumpFreq          = deltaT*0        dumpFreq          = deltaT*0
161          monitorFreq       = -1.
162        taveFreq          = deltaT*0        taveFreq          = deltaT*0
163        writeStatePrec    = precFloat64        writeStatePrec    = precFloat64
164        writeBinaryPrec   = precFloat32        writeBinaryPrec   = precFloat32
# Line 150  C--   Time stepping parameters Line 170  C--   Time stepping parameters
170        tauCD             =  0.D0        tauCD             =  0.D0
171        tauThetaClimRelax =  0.D0        tauThetaClimRelax =  0.D0
172        tauSaltClimRelax  =  0.D0        tauSaltClimRelax  =  0.D0
173          tauTr1ClimRelax   =  0.D0
174        periodicExternalForcing = .FALSE.        periodicExternalForcing = .FALSE.
175        externForcingPeriod     = 0.        externForcingPeriod     = 0.
176        externForcingCycle      = 0.        externForcingCycle      = 0.
177    
178  C--   Input files  C--   Input files
179        bathyFile       = ' '        bathyFile       = ' '
180          topoFile        = ' '
181        hydrogSaltFile  = ' '        hydrogSaltFile  = ' '
182        hydrogThetaFile = ' '        hydrogThetaFile = ' '
183        zonalWindFile   = ' '        zonalWindFile   = ' '
# Line 168  C--   Input files Line 190  C--   Input files
190        uVelInitFile    = ' '        uVelInitFile    = ' '
191        vVelInitFile    = ' '        vVelInitFile    = ' '
192        pSurfInitFile   = ' '        pSurfInitFile   = ' '
193          dQdTFile        = ' '
194    
195  C  C
196        RETURN        RETURN
Legend:
Removed from v.1.16  
changed lines
  Added in v.1.23
  ViewVC Help
Powered by ViewVC 1.1.22