![]() |
|
|||
File indexing completed on 2018-03-02 18:41:33 UTC
view on githubraw file Latest commit add29e06 on 2018-01-31 20:35:05 UTC2fa42a6013 Alis*0001 #ifdef ALLOW_KPP 0002 fefe253d88 Dimi*0003 CBOP 0004 C !ROUTINE: KPP.h 0005 0006 C !DESCRIPTION: \bv 2fa42a6013 Alis*0007 C /==========================================================\ 0008 C | KPP.h | 0009 C | o Basic header for KPP vertical mixing parameterization. | 0010 C | Contains all KPP field declarations. | 0011 C \==========================================================/ 0012 0013 C----------------------------------------------------------------------- 0014 C 0015 C Time varying parameters computed by subroutine kpp_calc 0016 C KPPviscAz - Vertical eddy viscosity coefficient (m^2/s) 0017 C KPPdiffKzS - Vertical diffusion coefficient for salt and tracers(m^2/s) 0018 C KPPdiffKzT - Vertical diffusion coefficient for heat (m^2/s) 0019 C KPPghat - Nonlocal transport coefficient (s/m^2) 0020 C KPPhbl - Mixing layer depth (m) 0021 C KPPfrac - Fraction of short-wave flux penetrating mixing layer 63ceaaa79c Dimi*0022 C KPPplumefrac - Fraction of saltplume penetrating mixing layer 2fa42a6013 Alis*0023 C 0024 C----------------------------------------------------------------------- fefe253d88 Dimi*0025 C \ev 0026 CEOP 2fa42a6013 Alis*0027 0028 _RL KPPviscAz (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) 0029 _RL KPPdiffKzS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) 0030 _RL KPPdiffKzT (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) 0031 _RL KPPghat (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) 0032 _RL KPPhbl (1-OLx:sNx+OLx,1-OLy:sNy+OLy, nSx,nSy) 956c0a5824 Patr*0033 _RL KPPfrac (1-OLx:sNx+OLx,1-OLy:sNy+OLy, nSx,nSy) 2fa42a6013 Alis*0034 COMMON /kpp/ KPPviscAz, KPPdiffKzT, KPPdiffKzS 0035 & , KPPghat, KPPhbl 63ceaaa79c Dimi*0036 #ifdef ALLOW_SALT_PLUME 0037 _RL KPPplumefrac(1-OLx:sNx+OLx,1-OLy:sNy+OLy, nSx,nSy) 0038 COMMON /kpp_short1/ KPPplumefrac 0039 #endif /* ALLOW_SALT_PLUME */ 2fa42a6013 Alis*0040 COMMON /kpp_short/ KPPfrac 0041 0042 #endif /* ALLOW_KPP */ c9c3d7103f Ed H*0043 0044 CEH3 ;;; Local Variables: *** 0045 CEH3 ;;; mode:fortran *** 0046 CEH3 ;;; End: ***
[ Source navigation ] | [ Diff markup ] | [ Identifier search ] | [ general search ] |
This page was automatically generated from https://github.com/MITgcm/MITgcm by the 2.2.1-MITgcm-0.1 LXR engine. The LXR team |
![]() ![]() |