145 |
C =0 Linear free surface ; >0 Non-linear |
C =0 Linear free surface ; >0 Non-linear |
146 |
C select_rStar :: option related to r* vertical coordinate |
C select_rStar :: option related to r* vertical coordinate |
147 |
C =0 (default) use r coord. ; > 0 use r* |
C =0 (default) use r coord. ; > 0 use r* |
148 |
|
C selectAddFluid :: option to add mass source/sink of fluid in the interior |
149 |
|
C (3-D generalisation of oceanic real-fresh water flux) |
150 |
|
C =0 off ; =1 add fluid ; =-1 virtual flux (no mass added) |
151 |
C momForcingOutAB :: =1: take momentum forcing contribution |
C momForcingOutAB :: =1: take momentum forcing contribution |
152 |
C out of (=0: in) Adams-Bashforth time stepping. |
C out of (=0: in) Adams-Bashforth time stepping. |
153 |
C tracForcingOutAB :: =1: take tracer (Temp,Salt,pTracers) forcing contribution |
C tracForcingOutAB :: =1: take tracer (Temp,Salt,pTracers) forcing contribution |
171 |
& writeStatePrec, |
& writeStatePrec, |
172 |
& writeBinaryPrec, readBinaryPrec, |
& writeBinaryPrec, readBinaryPrec, |
173 |
& nonlinFreeSurf, select_rStar, |
& nonlinFreeSurf, select_rStar, |
174 |
|
& selectAddFluid, |
175 |
& momForcingOutAB, tracForcingOutAB, |
& momForcingOutAB, tracForcingOutAB, |
176 |
& tempAdvScheme, tempVertAdvScheme, |
& tempAdvScheme, tempVertAdvScheme, |
177 |
& saltAdvScheme, saltVertAdvScheme, |
& saltAdvScheme, saltVertAdvScheme, |
190 |
INTEGER readBinaryPrec |
INTEGER readBinaryPrec |
191 |
INTEGER nonlinFreeSurf |
INTEGER nonlinFreeSurf |
192 |
INTEGER select_rStar |
INTEGER select_rStar |
193 |
|
INTEGER selectAddFluid |
194 |
INTEGER momForcingOutAB, tracForcingOutAB |
INTEGER momForcingOutAB, tracForcingOutAB |
195 |
INTEGER tempAdvScheme, tempVertAdvScheme |
INTEGER tempAdvScheme, tempVertAdvScheme |
196 |
INTEGER saltAdvScheme, saltVertAdvScheme |
INTEGER saltAdvScheme, saltVertAdvScheme |
267 |
C useRealFreshWaterFlux :: if True (=Natural BCS), treats P+R-E flux |
C useRealFreshWaterFlux :: if True (=Natural BCS), treats P+R-E flux |
268 |
C as a real Fresh Water (=> changes the Sea Level) |
C as a real Fresh Water (=> changes the Sea Level) |
269 |
C if F, converts P+R-E to salt flux (no SL effect) |
C if F, converts P+R-E to salt flux (no SL effect) |
|
C useAddFluid :: add mass source or sink of fluid in the interior |
|
270 |
C- Time-stepping params: |
C- Time-stepping params: |
271 |
C rigidLid :: Set to true to use rigid lid |
C rigidLid :: Set to true to use rigid lid |
272 |
C implicitFreeSurface :: Set to true to use implicit free surface |
C implicitFreeSurface :: Set to true to use implicit free surface |
341 |
& momStepping, tempStepping, saltStepping, |
& momStepping, tempStepping, saltStepping, |
342 |
& tempAdvection, tempIsActiveTr, tempForcing, |
& tempAdvection, tempIsActiveTr, tempForcing, |
343 |
& saltAdvection, saltIsActiveTr, saltForcing, |
& saltAdvection, saltIsActiveTr, saltForcing, |
344 |
& useRealFreshWaterFlux, useAddFluid, |
& useRealFreshWaterFlux, |
345 |
& rigidLid, implicitFreeSurface, exactConserv, linFSConserveTr, |
& rigidLid, implicitFreeSurface, exactConserv, linFSConserveTr, |
346 |
& uniformLin_PhiSurf, |
& uniformLin_PhiSurf, |
347 |
& quasiHydrostatic, nonHydrostatic, |
& quasiHydrostatic, nonHydrostatic, |
390 |
LOGICAL saltIsActiveTr |
LOGICAL saltIsActiveTr |
391 |
LOGICAL saltForcing |
LOGICAL saltForcing |
392 |
LOGICAL useRealFreshWaterFlux |
LOGICAL useRealFreshWaterFlux |
|
LOGICAL useAddFluid |
|
393 |
LOGICAL useFullLeith |
LOGICAL useFullLeith |
394 |
LOGICAL useStrainTensionVisc |
LOGICAL useStrainTensionVisc |
395 |
LOGICAL useAreaViscLength |
LOGICAL useAreaViscLength |