Last change
on this file since 1242 was
57,
checked in by aslmd, 14 years ago
|
mineur LMD_MM_MARS: ajout du GCM ancienne physique, systeme maintenant complet sur SVN (ne manque que la base de donnees d'etats initiaux)
|
-
Property svn:executable set to
*
|
File size:
1.1 KB
|
Line | |
---|
1 | C* Radiative characteristics of the aerosols |
---|
2 | C |
---|
3 | C Shortwave |
---|
4 | c ~~~~~~~~~ |
---|
5 | c |
---|
6 | c tauvis: dust optical depth at reference wavelength ("longrefvis" set |
---|
7 | c in dimradmars.h : typically longrefvis = 0.67E-6 m, as measured by Viking ) |
---|
8 | |
---|
9 | c For the "naerkind" kind of aerosol radiative properties : |
---|
10 | C QVISsQREF : Qext / Qext("longrefvis") <--- For both solar bands |
---|
11 | C omegavis : sinle scattering albedo <--- For both solar bands |
---|
12 | C gvis : assymetry factor <--- For both solar bands |
---|
13 | c |
---|
14 | C Longwave |
---|
15 | c ~~~~~~~~ |
---|
16 | c |
---|
17 | c For the "naerkind" kind of aerosol radiative properties : |
---|
18 | c QIRsQREF : Qext / Qext("longrefvis") <--- For the nir bandes IR |
---|
19 | c omegaIR : mean single scattering albedo <--- For the nir bandes IR |
---|
20 | c gIR : mean assymetry factor <--- For the nir bandes IR |
---|
21 | c |
---|
22 | real tauvis |
---|
23 | real QVISsQREF(nsun,naerkind) |
---|
24 | real omegavis(nsun,naerkind),gvis(nsun,naerkind) |
---|
25 | real QIRsQREF(nir,naerkind) |
---|
26 | real omegaIR(nir,naerkind),gIR(nir,naerkind) |
---|
27 | |
---|
28 | COMMON/YOMAER/tauvis,QVISsQREF,omegavis,gvis, |
---|
29 | & QIRsQREF,omegaIR,gIR |
---|
Note: See
TracBrowser
for help on using the repository browser.