|
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 |
|