/[lmdze]/trunk/Sources/phylmd/clesphys2.f
ViewVC logotype

Contents of /trunk/Sources/phylmd/clesphys2.f

Parent Directory Parent Directory | Revision Log Revision Log


Revision 12 - (show annotations)
Mon Jul 21 16:05:07 2008 UTC (15 years, 9 months ago) by guez
Original Path: trunk/libf/phylmd/clesphys2.f90
File size: 1174 byte(s)
-- Minor modification of input/output:

Created procedure "read_logic". Variables of module "logic" are read
by "read_logic" instead of "conf_gcm". Variable "offline" of module
"conf_gcm" is read from namelist instead of "*.def".

Deleted arguments "dtime", "co2_ppm_etat0", "solaire_etat0",
"tabcntr0" and local variables "radpas", "tab_cntrl" of
"phyetat0". "phyetat0" does not read "controle" in "startphy.nc" any
longer. "phyetat0" now reads global attribute "itau_phy" from
"startphy.nc". "phyredem" does not create variable "controle" in
"startphy.nc" any longer. "phyredem" now writes global attribute
"itau_phy" of "startphy.nc". Deleted argument "tabcntr0" of
"printflag". Removed diagnostic messages written by "printflag" for
comparison of the variable "controle" of "startphy.nc" and the
variables read from "*.def" or namelist input.

-- Removing unwanted functionality:

Removed variable "lunout" from module "iniprint", replaced everywhere
by standard output.

Removed case "ocean == 'couple'" in "clmain", "interfsurf_hq" and
"physiq". Removed procedure "interfoce_cpl".

-- Should not change anything at run time:

Automated creation of graphs in documentation. More documentation on
input files.

Converted Fortran files to free format: "phyredem.f90", "printflag.f90".

Split module "clesphy" into "clesphys" and "clesphys2".

Removed variables "conser", "leapf", "forward", "apphys", "apdiss" and
"statcl" from module "logic". Added arguments "conser" to "advect",
"leapf" to "integrd". Added local variables "forward", "leapf",
"apphys", "conser", "apdiss" in "leapfrog".

Added intent attributes.

Deleted arguments "dtime" of "phyredem", "pdtime" of "flxdtdq", "sh"
of "phytrac", "dt" of "yamada".

Deleted local variables "dtime", "co2_ppm_etat0", "solaire_etat0",
"length", "tabcntr0" in "physiq". Replaced all references to "dtime"
by references to "pdtphys".

1 module clesphys2
2
3 ! v 1.3 2005/06/06 13:16:33 fairhead
4
5 implicit none
6
7 LOGICAL:: cycle_diurne= .TRUE.
8 ! Cette option permet d'éteindre le cycle diurne.
9 ! Peut être utile pour accélérer le code.
10
11 LOGICAL:: soil_model= .TRUE.
12 ! Help = Choix du modele de sol (Thermique ?)
13 ! Option qui pourait un string afin de pouvoir
14 ! plus de choix ! Ou meme une liste d'options
15
16 LOGICAL:: new_oliq= .TRUE.
17 ! Help = Permet de mettre en route la
18 ! nouvelle parametrisation de l'eau liquide
19
20 LOGICAL:: ok_orodr= .TRUE.
21 ! Desc = Orodr ou non pour l orographie
22
23 LOGICAL:: ok_orolf = .TRUE.
24 ! Desc = Orolf ou non pour l orographie
25
26 LOGICAL:: ok_limitvrai= .FALSE.
27 ! Help = On peut forcer le modele a lire le
28 ! fichier SST de la bonne annee. C'est une tres bonne
29 ! idee, pourquoi ne pas mettre toujours a y ?
30
31 INTEGER:: nbapp_rad= 12
32 ! (nombre d'appels des routines de rayonnements par jour)
33
34 INTEGER:: iflag_con = 2
35 ! Help = Flag pour la convection les options suivantes existent :
36 ! 1 pour LMD,
37 ! 2 pour Tiedtke,
38 ! 3 pour CCM(NCAR)
39 ! Flag pour la convection (1 pour LMD, 2 pour Tiedtke, 3 KE, 4 KE vect)
40
41 end module clesphys2

  ViewVC Help
Powered by ViewVC 1.1.21