Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=wp), | private, | dimension(:), allocatable | :: | mlonp | |||
real(kind=wp), | private, | dimension(:), allocatable | :: | mlatp | |||
integer, | private | :: | llon | ||||
integer, | private | :: | llat | ||||
real(kind=wp), | private, | dimension(:,:), allocatable | :: | Qp | |||
real(kind=wp), | private, | dimension(:,:), allocatable | :: | E0p | |||
real(kind=wp), | private, | dimension(:), allocatable | :: | precdatp | |||
real(kind=wp), | private, | dimension(:), allocatable | :: | mloni | |||
real(kind=wp), | private, | dimension(:), allocatable | :: | mlati | |||
real(kind=wp), | private, | dimension(:,:), allocatable | :: | Qiprev | |||
real(kind=wp), | private, | dimension(:,:), allocatable | :: | E0iprev | |||
real(kind=wp), | private, | dimension(:,:), allocatable | :: | Qinext | |||
real(kind=wp), | private, | dimension(:,:), allocatable | :: | E0inext | |||
integer, | private, | dimension(3) | :: | ymdprev | |||
integer, | private, | dimension(3) | :: | ymdnext | |||
real(kind=wp), | private | :: | UTsecprev | ||||
real(kind=wp), | private | :: | UTsecnext | ||||
real(kind=wp), | private | :: | tprev | ||||
real(kind=wp), | private | :: | tnext |
these need to be initialized so that something sensible happens at the beginning
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=wp), | intent(in) | :: | dt | |||
real(kind=wp), | intent(in) | :: | dtprec | |||
real(kind=wp), | intent(in) | :: | t | |||
integer, | intent(in), | dimension(3) | :: | ymd | date for which we wish to calculate perturbations |
|
real(kind=wp), | intent(in) | :: | UTsec | |||
character(len=*), | intent(in) | :: | precdir | directory where neutral simulation data is kept |
||
type(curvmesh) | :: | x | ||||
real(kind=wp), | intent(out), | dimension(:,:,:) | :: | W0 | last dimension is the number of particle populations |
|
real(kind=wp), | intent(out), | dimension(:,:,:) | :: | PhiWmWm2 | last dimension is the number of particle populations |
INITIALIZE SOME MODULE TIMING VARIABLES