|
| integer, parameter | levsaer =72 |
| |
| integer, parameter | ntrcaerm =15 |
| |
| integer, parameter | timeaer =2 |
| |
| integer | latsaer |
| |
| integer | lonsaer |
| |
| integer | ntrcaer |
| |
| integer | levsw |
| |
| integer | n1sv |
| |
| integer | n2sv |
| |
| integer | iamin |
| |
| integer | iamax |
| |
| integer | jamin |
| |
| integer | jamax |
| |
| character *10, dimension(ntrcaerm) | specname |
| |
| real(kind=kind_phys), dimension(13) | aer_time |
| |
| real(kind=kind_phys), dimension(:), allocatable | aer_lat |
| |
| real(kind=kind_phys), dimension(:), allocatable | aer_lon |
| |
| real(kind=kind_io4), dimension(:,:,:,:), allocatable | aer_pres |
| |
| real(kind=kind_io4), dimension(:,:,:,:,:), allocatable | aerin |
| |