67 |
C hydrogThetaFile :: File containing initial hydrographic data for potential |
C hydrogThetaFile :: File containing initial hydrographic data for potential |
68 |
C temperature. |
C temperature. |
69 |
C hydrogSaltFile :: File containing initial hydrographic data for salinity. |
C hydrogSaltFile :: File containing initial hydrographic data for salinity. |
70 |
|
C diffKr3dSfile :: File containing 3D specification of vertical salt diffusivity |
71 |
|
C diffKr3dTfile :: File containing 3D specification of vertical heat diffusivity |
72 |
C zonalWindFile :: File containing zonal wind data |
C zonalWindFile :: File containing zonal wind data |
73 |
C meridWindFile :: File containing meridional wind data |
C meridWindFile :: File containing meridional wind data |
74 |
C thetaClimFile :: File containing theta climataology used |
C thetaClimFile :: File containing theta climataology used |
96 |
& delXFile, delYFile, horizGridFile, |
& delXFile, delYFile, horizGridFile, |
97 |
& bathyFile, topoFile, shelfIceFile, |
& bathyFile, topoFile, shelfIceFile, |
98 |
& hydrogThetaFile, hydrogSaltFile, |
& hydrogThetaFile, hydrogSaltFile, |
99 |
|
& diffKr3dSfile, diffKr3dTfile, |
100 |
& zonalWindFile, meridWindFile, thetaClimFile, |
& zonalWindFile, meridWindFile, thetaClimFile, |
101 |
& saltClimFile, buoyancyRelation, |
& saltClimFile, buoyancyRelation, |
102 |
& EmPmRfile, saltFluxFile, |
& EmPmRfile, saltFluxFile, |
118 |
CHARACTER*(MAX_LEN_FNAM) delYFile |
CHARACTER*(MAX_LEN_FNAM) delYFile |
119 |
CHARACTER*(MAX_LEN_FNAM) horizGridFile |
CHARACTER*(MAX_LEN_FNAM) horizGridFile |
120 |
CHARACTER*(MAX_LEN_FNAM) bathyFile, topoFile, shelfIceFile |
CHARACTER*(MAX_LEN_FNAM) bathyFile, topoFile, shelfIceFile |
121 |
CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile |
CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile, hydrogSaltFile |
122 |
CHARACTER*(MAX_LEN_FNAM) hydrogSaltFile |
CHARACTER*(MAX_LEN_FNAM) diffKr3dSfile, diffKr3dTfile |
123 |
CHARACTER*(MAX_LEN_FNAM) zonalWindFile |
CHARACTER*(MAX_LEN_FNAM) zonalWindFile |
124 |
CHARACTER*(MAX_LEN_FNAM) meridWindFile |
CHARACTER*(MAX_LEN_FNAM) meridWindFile |
125 |
CHARACTER*(MAX_LEN_FNAM) thetaClimFile |
CHARACTER*(MAX_LEN_FNAM) thetaClimFile |
561 |
C heat laterally ( m^2/s ) |
C heat laterally ( m^2/s ) |
562 |
C diffKrNrT :: vertical profile of Laplacian diffusion coeff. |
C diffKrNrT :: vertical profile of Laplacian diffusion coeff. |
563 |
C for mixing of heat vertically ( units of r^2/s ) |
C for mixing of heat vertically ( units of r^2/s ) |
564 |
|
C diffKr3dT :: full 3D specification of Laplacian diffusion coeff. |
565 |
|
C for mixing of heat vertically ( units of r^2/s ) |
566 |
C diffK4T :: Biharmonic diffusion coeff. for mixing of |
C diffK4T :: Biharmonic diffusion coeff. for mixing of |
567 |
C heat laterally ( m^4/s ) |
C heat laterally ( m^4/s ) |
568 |
C diffKhS :: Laplacian diffusion coeff. for mixing of |
C diffKhS :: Laplacian diffusion coeff. for mixing of |
569 |
C salt laterally ( m^2/s ) |
C salt laterally ( m^2/s ) |
570 |
C diffKrNrS :: vertical profile of Laplacian diffusion coeff. |
C diffKrNrS :: vertical profile of Laplacian diffusion coeff. |
571 |
C for mixing of salt vertically ( units of r^2/s ), |
C for mixing of salt vertically ( units of r^2/s ), |
572 |
|
C diffKr3dS :: full 3D specification of Laplacian diffusion coeff. |
573 |
|
C for mixing of salt vertically ( units of r^2/s ) |
574 |
C diffK4S :: Biharmonic diffusion coeff. for mixing of |
C diffK4S :: Biharmonic diffusion coeff. for mixing of |
575 |
C salt laterally ( m^4/s ) |
C salt laterally ( m^4/s ) |
576 |
C diffKrBL79surf :: T/S surface diffusivity (m^2/s) Bryan and Lewis, 1979 |
C diffKrBL79surf :: T/S surface diffusivity (m^2/s) Bryan and Lewis, 1979 |
673 |
& viscA4Max, viscA4Grid, viscA4GridMax, viscA4GridMin, |
& viscA4Max, viscA4Grid, viscA4GridMax, viscA4GridMin, |
674 |
& viscAhRemax, viscA4Remax, |
& viscAhRemax, viscA4Remax, |
675 |
& viscC4leith, viscC4leithD, viscAr, |
& viscC4leith, viscC4leithD, viscAr, |
676 |
& diffKhT, diffK4T, diffKrNrT, |
& diffKhT, diffK4T, diffKrNrT, diffKr3dT, |
677 |
& diffKhS, diffK4S, diffKrNrS, |
& diffKhS, diffK4S, diffKrNrS, diffKr3dS, |
678 |
& diffKrBL79surf, diffKrBL79deep, diffKrBL79scl, diffKrBL79Ho, |
& diffKrBL79surf, diffKrBL79deep, diffKrBL79scl, diffKrBL79Ho, |
679 |
& delT, tauCD, rCD, freeSurfFac, implicSurfPress, implicDiv2Dflow, |
& delT, tauCD, rCD, freeSurfFac, implicSurfPress, implicDiv2Dflow, |
680 |
& hFacMin, hFacMinDz, hFacInf, hFacSup, |
& hFacMin, hFacMinDz, hFacInf, hFacSup, |
753 |
_RL viscC4leithD |
_RL viscC4leithD |
754 |
_RL diffKhT |
_RL diffKhT |
755 |
_RL diffKrNrT(Nr) |
_RL diffKrNrT(Nr) |
756 |
|
_RL diffKr3dT(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
757 |
_RL diffK4T |
_RL diffK4T |
758 |
_RL diffKhS |
_RL diffKhS |
759 |
_RL diffKrNrS(Nr) |
_RL diffKrNrS(Nr) |
760 |
|
_RL diffKr3dS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
761 |
_RL diffK4S |
_RL diffK4S |
762 |
_RL diffKrBL79surf |
_RL diffKrBL79surf |
763 |
_RL diffKrBL79deep |
_RL diffKrBL79deep |