Last change
on this file since 91 was
57,
checked in by aslmd, 15 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
|
Rev | Line | |
---|
[57] | 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.