/[lmdze]/trunk/phylmd/clesphys.f
ViewVC logotype

Annotation of /trunk/phylmd/clesphys.f

Parent Directory Parent Directory | Revision Log Revision Log


Revision 12 - (hide annotations)
Mon Jul 21 16:05:07 2008 UTC (15 years, 9 months ago) by guez
Original Path: trunk/libf/phylmd/clesphys.f90
File size: 861 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 guez 3 module clesphys
2    
3     ! v 1.3 2005/06/06 13:16:33 fairhead
4    
5     implicit none
6    
7     LOGICAL bug_ozone
8     REAL co2_ppm, solaire
9     double precision RCO2, RCH4, RN2O, RCFC11, RCFC12
10     double precision CH4_ppb, N2O_ppb, CFC11_ppt, CFC12_ppt
11     !IM simulateur ISCCP
12     INTEGER top_height, overlap
13     !IM seuils cdrm, cdrh
14     REAL cdmmax, cdhmax
15     !IM param. stabilite s/ terres et en dehors
16     REAL ksta, ksta_ter
17     !IM ok_kzmin : clef calcul Kzmin dans la CL de surface cf FH
18     LOGICAL ok_kzmin
19     INTEGER lev_histhf ! niveau sorties 6h
20     integer lev_histday ! niveau sorties journalieres
21     integer lev_histmth ! niveau sorties mensuelles
22     CHARACTER(len=4) type_run
23     LOGICAL ok_isccp, ok_regdyn
24     REAL lonmin_ins, lonmax_ins, latmin_ins, latmax_ins
25     INTEGER ecrit_ins, ecrit_hf, ecrit_hf2mth, ecrit_day
26     INTEGER ecrit_mth, ecrit_tra, ecrit_reg
27    
28     save
29    
30     end module clesphys

  ViewVC Help
Powered by ViewVC 1.1.21