34 |
NAMELIST /KPP_PARM01/ |
NAMELIST /KPP_PARM01/ |
35 |
& kpp_freq, kpp_dumpFreq, kpp_taveFreq, |
& kpp_freq, kpp_dumpFreq, kpp_taveFreq, |
36 |
& KPPmixingMaps, KPPwriteState, |
& KPPmixingMaps, KPPwriteState, |
37 |
& minKPPhbl, |
& minKPPhbl, maxKPPhbl, |
38 |
& epsln, phepsi, epsilon, vonk, dB_dz, |
& epsln, phepsi, epsilon, vonk, dB_dz, |
39 |
& conc1, conam, concm, conc2, zetam, |
& conc1, conam, concm, conc2, zetam, |
40 |
& conas, concs, conc3, zetas, |
& conas, concs, conc3, zetas, |
65 |
KPPmixingMaps = .FALSE. |
KPPmixingMaps = .FALSE. |
66 |
KPPwriteState = .FALSE. |
KPPwriteState = .FALSE. |
67 |
minKPPhbl = drF(1)*0.5 |
minKPPhbl = drF(1)*0.5 |
68 |
|
maxKPPhbl = drF(1)*0.5 |
69 |
|
|
70 |
C----------------------------------------------------------------------- |
C----------------------------------------------------------------------- |
71 |
C define some non-dimensional constants and |
C define some non-dimensional constants and |