33 |
NAMELIST /KPP_PARM01/ |
NAMELIST /KPP_PARM01/ |
34 |
& kpp_freq, kpp_dumpFreq, kpp_taveFreq, |
& kpp_freq, kpp_dumpFreq, kpp_taveFreq, |
35 |
& KPPmixingMaps, KPPwriteState, |
& KPPmixingMaps, KPPwriteState, |
|
& minKPPviscAz, maxKPPviscAz, minKPPghat, maxKPPghat, |
|
|
& minKPPdiffKzT, maxKPPdiffKzT, minKPPdiffKzS, maxKPPdiffKzS, |
|
36 |
& minKPPhbl, |
& minKPPhbl, |
37 |
& epsln, phepsi, epsilon, vonk, dB_dz, |
& epsln, phepsi, epsilon, vonk, dB_dz, |
38 |
& conc1, conam, concm, conc2, zetam, |
& conc1, conam, concm, conc2, zetam, |
63 |
kpp_taveFreq = 0. |
kpp_taveFreq = 0. |
64 |
KPPmixingMaps = .FALSE. |
KPPmixingMaps = .FALSE. |
65 |
KPPwriteState = .FALSE. |
KPPwriteState = .FALSE. |
|
minKPPghat = 0. |
|
|
maxKPPghat = 1.e10 |
|
|
minKPPviscAz = 0. |
|
|
DO k = 1,Nr |
|
|
maxKPPviscAz(k) = 100. |
|
|
ENDDO |
|
|
minKPPdiffKzT = 0. |
|
|
maxKPPdiffKzT = 100. |
|
|
minKPPdiffKzS = 0. |
|
|
maxKPPdiffKzS = 100. |
|
66 |
minKPPhbl = delZ(1)*0.5 |
minKPPhbl = delZ(1)*0.5 |
67 |
|
|
68 |
C----------------------------------------------------------------------- |
C----------------------------------------------------------------------- |