source: trunk/LMDZ.GENERIC/libf/phystd/callkeys.h @ 603

Last change on this file since 603 was 596, checked in by jleconte, 13 years ago
  • Added double gray case (if graybody=true in callphys.def):
    • opacities are set to a constant value in sugas_corrk.
    • the values are kappa_IR m2/kg in the infrared (to be read in callphys.def)

kappa_VI m2/kg in the visible (to be read in callphys.def)

  • Cleaned continuum part in optc*
  • Added .def files for a typical 1d earth case in deftank (dry case for the moment)
File size: 4.7 KB
Line 
1!
2! For Fortran 77/Fortran 90 compliance always use line continuation
3! symbols '&' in columns 73 and 6
4!
5      COMMON/callkeys/callrad,corrk,calldifv,UseTurbDiff,calladj        &
6     &   , co2cond,callsoil                                             &
7     &   , season,diurnal,tlocked,iradia,lwrite                         &
8     &   , iaervar,iddist,topdustref,callstats,calleofdump              &
9     &   , enertest                                                     &
10     &   , callgasvis,Continuum, graybody                               &
11     &   , Nmix_co2, Nmix_h2o                                           &
12     &   , dusttau                                                      &
13     &   , nonideal                                                     &
14     &   , meanOLR                                                      &
15     &   , specOLR                                                      &
16     &   , kastprof                                                     &
17     &   , noradsurf                                                    &
18     &   , Tstrat                                                       &
19     &   , newtonian                                                    &
20     &   , check_cpp_match                                              &
21     &   , force_cpp                                                    &
22     &   , tau_relax                                                    &
23     &   , testradtimes                                                 &
24     &   , rayleigh                                                     &
25     &   , stelbbody                                                    &
26     &   , stelTbb                                                      &
27     &   , tplanet                                                      &
28     &   , startype                                                     &
29     &   , Fat1AU                                                       &
30     &   , nearco2cond                                                  &
31     &   , tracer                                                       &
32     &   , varactive                                                    &
33     &   , varfixed                                                     &
34     &   , satval                                                       &
35     &   , sedimentation,water,watercond,waterrain                      &
36     &   , rainthreshold                                                &
37     &   , aerofixed                                                    &
38     &   , hydrology                                                    &
39     &   , sourceevol                                                   &
40     &   , icetstep                                                     &
41     &   , albedosnow                                                   &
42     &   , maxicethick                                                  &
43     &   , Tsaldiff                                                     &
44     &   , CLFfixval                                                    &
45     &   , CLFvarying                                                   &
46     &   , n2mixratio                                                   &
47     &   , co2supsat                                                    &
48     &   , cloudlvl                                                     &
49     &   , pceil                                                   
50
51      logical callrad,corrk,calldifv,UseTurbDiff                        &
52     &   , calladj,co2cond,callsoil                                     &
53     &   , season,diurnal,tlocked,lwrite                                &
54     &   , callstats,calleofdump                                        &
55     &   , callgasvis,Continuum,graybody
56
57      logical enertest
58      logical nonideal
59      logical meanOLR
60      logical specOLR
61      logical kastprof
62      logical newtonian
63      logical check_cpp_match
64      logical force_cpp
65      logical testradtimes
66      logical rayleigh
67      logical stelbbody
68      logical ozone
69      logical nearco2cond
70      logical tracer
71      logical varactive
72      logical varfixed
73      logical sedimentation
74      logical water,watercond,waterrain
75      logical aerofixed
76      logical hydrology
77      logical sourceevol
78      logical CLFvarying
79      logical noradsurf
80
81      integer iddist
82      integer iaervar
83      integer iradia
84      integer startype
85
86      real topdustref
87      real Nmix_co2
88      real Nmix_h2o
89      real dusttau
90      real Fat1AU
91      real stelTbb
92      real Tstrat
93      real tplanet
94      real satval
95      real rainthreshold
96      real CLFfixval
97      real n2mixratio
98      real co2supsat
99      real pceil
100      real albedosnow
101      real maxicethick
102      real Tsaldiff
103      real tau_relax
104      real cloudlvl
105      real icetstep
106
Note: See TracBrowser for help on using the repository browser.