147 |
REAL termq3m2 |
REAL termq3m2 |
148 |
|
|
149 |
! q2min : borne inferieure de q2 |
! q2min : borne inferieure de q2 |
|
! q2max : borne superieure de q2 |
|
|
|
|
150 |
REAL q2min |
REAL q2min |
|
REAL q2max |
|
151 |
|
|
152 |
! knmin : borne inferieure de kn |
! knmin : borne inferieure de kn |
153 |
! kmmin : borne inferieure de km |
! kmmin : borne inferieure de km |
171 |
PARAMETER (knmin=1.E-5) |
PARAMETER (knmin=1.E-5) |
172 |
PARAMETER (kmmin=1.E-5) |
PARAMETER (kmmin=1.E-5) |
173 |
PARAMETER (q2min=1.e-5) |
PARAMETER (q2min=1.e-5) |
|
PARAMETER (q2max=1.E+2) |
|
174 |
PARAMETER (nlay=klev) |
PARAMETER (nlay=klev) |
175 |
PARAMETER (nlev=klev+1) |
PARAMETER (nlev=klev+1) |
176 |
|
|