/[lmdze]/trunk/phylmd/CV_routines/cv_param.f
ViewVC logotype

Contents of /trunk/phylmd/CV_routines/cv_param.f

Parent Directory Parent Directory | Revision Log Revision Log


Revision 103 - (show annotations)
Fri Aug 29 13:00:05 2014 UTC (9 years, 8 months ago) by guez
File size: 1972 byte(s)
Renamed module cvparam to cv_param. Deleted procedure
cv_param. Changed variables of module cv_param into parameters.

In procedures cv_driver, cv_uncompress and cv3_uncompress, removed
some arguments giving dimensions and used module variables klon and
klev instead.

In procedures gradiv2, laplacien_gam and laplacien, changed
declarations of local variables because klevel is not always klev.

Removed code for nudging surface pressure.

Removed arguments pim and pjm of tau2alpha. Added assignment of false
to variable first.

Replaced real argument del of procedures foeew and FOEDE by logical
argument.

1 module cv_param
2
3 ! From LMDZ4/libf/phylmd/cvparam.h,v 1.1.1.1 2004/05/19 12:53:08
4 ! and LMDZ4/libf/phylmd/cv_routines.F, version 1.1.1.1, 2004/05/19 12:53:08
5
6 ! Parameters for convectL: includes microphysical parameters, and
7 ! parameters that control the rate of approach to quasi-equilibrium.
8
9 use dimphy, only: klev
10
11 implicit none
12
13 integer, parameter:: noff= 2, minorig= 2, nl=klev-noff, nlp=nl+1, nlm=nl-1
14 ! noff: integer limit for convection (klev-noff)
15 ! minorig: First level of convection
16 real, parameter:: elcrit=0.0011, tlcrit=-55.
17 ! ELCRIT IS THE AUTOCONVERSION THERSHOLD WATER CONTENT (gm/gm)
18 ! TLCRIT IS CRITICAL TEMPERATURE BELOW WHICH THE AUTO-
19 ! CONVERSION THRESHOLD IS ASSUMED TO BE ZERO
20 ! (THE AUTOCONVERSION THRESHOLD VARIES LINEARLY
21 ! BETWEEN 0 C AND TLCRIT)
22 real, parameter:: entp=1.5
23 ! ENTP IS THE COEFFICIENT OF MIXING IN THE ENTRAINMENT
24 ! FORMULATION
25 real, parameter:: sigs=0.12, sigd=0.05
26 ! SIGD IS THE FRACTIONAL AREA COVERED BY UNSATURATED DNDRAFT
27 ! SIGS IS THE FRACTION OF PRECIPITATION FALLING OUTSIDE
28 ! OF CLOUD
29 real, parameter:: omtrain=50., omtsnow=5.5, coeffr=1., coeffs=0.8
30 ! OMTRAIN IS THE ASSUMED FALL SPEED (P/s) OF RAIN
31 ! OMTSNOW IS THE ASSUMED FALL SPEED (P/s) OF SNOW
32 ! COEFFR IS A COEFFICIENT GOVERNING THE RATE OF EVAPORATION
33 ! OF RAIN
34 ! COEFFS IS A COEFFICIENT GOVERNING THE RATE OF EVAPORATION
35 ! OF SNOW
36 real, parameter:: dtmax=0.9
37 ! DTMAX IS THE MAXIMUM NEGATIVE TEMPERATURE PERTURBATION
38 ! A LIFTED PARCEL IS ALLOWED TO HAVE BELOW ITS LFC
39 real, parameter:: cu=0.70
40 ! CU IS THE COEFFICIENT GOVERNING CONVECTIVE MOMENTUM
41 ! TRANSPORT
42 real, parameter:: betad=10.
43 real, parameter:: alpha=0.2, damp=0.1
44 ! ALPHA AND DAMP ARE PARAMETERS THAT CONTROL THE RATE OF
45 ! APPROACH TO QUASI-EQUILIBRIUM
46 ! (THEIR STANDARD VALUES ARE 0.20 AND 0.1, RESPECTIVELY)
47 ! (DAMP MUST BE LESS THAN 1)
48 real, parameter:: delta=0.01
49
50 end module cv_param

  ViewVC Help
Powered by ViewVC 1.1.21