Last change
on this file since 135 was
135,
checked in by aslmd, 14 years ago
|
CHANGEMENT ARBORESCENCE ETAPE 2 -- NON COMPLET
|
File size:
738 bytes
|
Rev | Line | |
---|
[135] | 1 | c----------------------------------------------------------------------- |
---|
| 2 | c INCLUDE fisice.h |
---|
| 3 | |
---|
| 4 | COMMON/fisice/dqsf,rice,nuice,rdust,zcondicea |
---|
| 5 | |
---|
| 6 | REAL dqsf(nqmx) ! tendance of tracer on surface (e.g. kg.m-2) |
---|
| 7 | REAL rice(ngridmx,nlayermx) ! Estimated ice crystal radius (m) |
---|
| 8 | REAL nuice(ngridmx,nlayermx) ! Estimated effective variance |
---|
| 9 | ! of the size distribution |
---|
| 10 | ! MODIF_JBM_08W45 |
---|
| 11 | REAL rdust(ngridmx,nlayermx) ! Prescribed dust radius in each layer (m) |
---|
| 12 | c Variables used to define water ice scavenging by atmos. CO2 condensing |
---|
| 13 | REAL zcondicea(ngridmx,nlayermx) |
---|
| 14 | c----------------------------------------------------------------------- |
---|
Note: See
TracBrowser
for help on using the repository browser.