484 |
C viscAhW :: Eddy viscosity coeff. for mixing of vertical |
C viscAhW :: Eddy viscosity coeff. for mixing of vertical |
485 |
C momentum laterally, no effect for hydrostatic |
C momentum laterally, no effect for hydrostatic |
486 |
C model, defaults to viscAh if unset ( m^2/s ) |
C model, defaults to viscAh if unset ( m^2/s ) |
487 |
|
C Not used if variable horiz. viscosity is used. |
488 |
C viscAr :: Eddy viscosity coeff. for mixing of |
C viscAr :: Eddy viscosity coeff. for mixing of |
489 |
C momentum vertically ( units of r^2/s ) |
C momentum vertically ( units of r^2/s ) |
490 |
C viscA4 :: Biharmonic viscosity coeff. for mixing of |
C viscA4 :: Biharmonic viscosity coeff. for mixing of |
492 |
C viscA4W :: Biharmonic viscosity coeff. for mixing of vertical |
C viscA4W :: Biharmonic viscosity coeff. for mixing of vertical |
493 |
C momentum laterally, no effect for hydrostatic |
C momentum laterally, no effect for hydrostatic |
494 |
C model, defaults to viscA4 if unset ( m^2/s ) |
C model, defaults to viscA4 if unset ( m^2/s ) |
495 |
|
C Not used if variable horiz. viscosity is used. |
496 |
C viscAhD :: Eddy viscosity coeff. for mixing of momentum laterally |
C viscAhD :: Eddy viscosity coeff. for mixing of momentum laterally |
497 |
C (act on Divergence part) ( m^2/s ) |
C (act on Divergence part) ( m^2/s ) |
498 |
C viscAhZ :: Eddy viscosity coeff. for mixing of momentum laterally |
C viscAhZ :: Eddy viscosity coeff. for mixing of momentum laterally |
610 |
C starting value (k=1) for vertical coordinate (rf(1)=Ro_SeaLevel) |
C starting value (k=1) for vertical coordinate (rf(1)=Ro_SeaLevel) |
611 |
C sideDragFactor :: side-drag scaling factor (used only if no_slip_sides) |
C sideDragFactor :: side-drag scaling factor (used only if no_slip_sides) |
612 |
C (default=2: full drag ; =1: gives half-slip BC) |
C (default=2: full drag ; =1: gives half-slip BC) |
613 |
C bottomDragLinear :: Drag coefficient built in to core dynamics |
C bottomDragLinear :: Linear bottom-drag coefficient (units of [r]/s) |
614 |
C bottomDragQuadratic ( linear: 1/s, quadratic: 1/m ) |
C bottomDragQuadratic :: Quadratic bottom-drag coefficient (units of [r]/m) |
615 |
|
C (if using zcoordinate, units becomes linear: m/s, quadratic: [-]) |
616 |
|
C smoothAbsFuncRange :: 1/2 of interval around zero, for which FORTRAN ABS |
617 |
|
C is to be replace by a smoother function |
618 |
|
C (affects myabs, mymin, mymax) |
619 |
C nh_Am2 :: scales the non-hydrostatic terms and changes internal scales |
C nh_Am2 :: scales the non-hydrostatic terms and changes internal scales |
620 |
C (i.e. allows convection at different Rayleigh numbers) |
C (i.e. allows convection at different Rayleigh numbers) |
621 |
COMMON /PARM_R/ cg2dTargetResidual, cg2dTargetResWunit, |
COMMON /PARM_R/ cg2dTargetResidual, cg2dTargetResWunit, |
654 |
& horiVertRatio, recip_horiVertRatio, |
& horiVertRatio, recip_horiVertRatio, |
655 |
& ivdc_kappa, Ro_SeaLevel, |
& ivdc_kappa, Ro_SeaLevel, |
656 |
& sideDragFactor, bottomDragLinear, bottomDragQuadratic, nh_Am2, |
& sideDragFactor, bottomDragLinear, bottomDragQuadratic, nh_Am2, |
657 |
|
& smoothAbsFuncRange, |
658 |
& tCylIn, tCylOut |
& tCylIn, tCylOut |
659 |
|
|
660 |
_RL cg2dTargetResidual |
_RL cg2dTargetResidual |
774 |
_RL sideDragFactor |
_RL sideDragFactor |
775 |
_RL bottomDragLinear |
_RL bottomDragLinear |
776 |
_RL bottomDragQuadratic |
_RL bottomDragQuadratic |
777 |
|
_RL smoothAbsFuncRange |
778 |
_RL nh_Am2 |
_RL nh_Am2 |
779 |
_RL tCylIn |
_RL tCylIn |
780 |
_RL tCylOut |
_RL tCylOut |
838 |
LOGICAL useMNC |
LOGICAL useMNC |
839 |
LOGICAL useRunClock |
LOGICAL useRunClock |
840 |
LOGICAL useEMBED_FILES |
LOGICAL useEMBED_FILES |
841 |
|
LOGICAL useMYPACKAGE |
842 |
COMMON /PARM_PACKAGES/ |
COMMON /PARM_PACKAGES/ |
843 |
& useOPPS, usePP81, useMY82, useGGL90, useKPP, |
& useOPPS, usePP81, useMY82, useGGL90, useKPP, |
844 |
& useGMRedi, useOBCS, useAIM, useLand, |
& useGMRedi, useOBCS, useAIM, useLand, |
847 |
& usePTRACERS, useGCHEM, useRBCS, useOffLine, useMATRIX, |
& usePTRACERS, useGCHEM, useRBCS, useOffLine, useMATRIX, |
848 |
& useSBO, useSEAICE, useShelfIce, useThSIce, useBulkForce, |
& useSBO, useSEAICE, useShelfIce, useThSIce, useBulkForce, |
849 |
& usefizhi, usegridalt, useDiagnostics, useMNC, |
& usefizhi, usegridalt, useDiagnostics, useMNC, |
850 |
& useRunClock, useEMBED_FILES |
& useRunClock, useEMBED_FILES, useMYPACKAGE |
851 |
|
|
852 |
CEH3 ;;; Local Variables: *** |
CEH3 ;;; Local Variables: *** |
853 |
CEH3 ;;; mode:fortran *** |
CEH3 ;;; mode:fortran *** |