|
Last change
on this file since 741 was
741,
checked in by jleconte, 13 years ago
|
|
Model now works without aerosols at all. You still need to compile it with -s 1 option. LK12
|
|
File size:
643 bytes
|
| Line | |
|---|
| 1 | !================================================================== |
|---|
| 2 | module aerosol_mod |
|---|
| 3 | !================================================================== |
|---|
| 4 | |
|---|
| 5 | ! aerosol indexes: these are initialized in iniaerosol.F and should be 0 if the |
|---|
| 6 | ! corresponding aerosol was not activated in callphys.def |
|---|
| 7 | integer, save :: iaero_co2 |
|---|
| 8 | integer, save :: iaero_h2o |
|---|
| 9 | integer, save :: iaero_dust |
|---|
| 10 | integer, save :: iaero_h2so4 |
|---|
| 11 | logical, save :: noaero |
|---|
| 12 | |
|---|
| 13 | !================================================================== |
|---|
| 14 | end module aerosol_mod |
|---|
| 15 | !================================================================== |
|---|
Note: See
TracBrowser
for help on using the repository browser.
