8 REAL(
rprec),
DIMENSION(:,:),
ALLOCATABLE ::
r1
9 REAL(
rprec),
DIMENSION(:,:),
ALLOCATABLE ::
ru
10 REAL(
rprec),
DIMENSION(:,:),
ALLOCATABLE ::
rv
11 REAL(
rprec),
DIMENSION(:,:),
ALLOCATABLE,
TARGET ::
z1
12 REAL(
rprec),
DIMENSION(:,:),
ALLOCATABLE ::
zu
13 REAL(
rprec),
DIMENSION(:,:),
ALLOCATABLE ::
zv
real(rprec), dimension(:,:), allocatable rv
real(rprec), dimension(:), allocatable zu0
, even-m and odd-m added together appropriately
real(rprec), dimension(:), allocatable wint
two-dimensional array for normalizing angle integrations
real(rprec), dimension(:,:), allocatable zv
real(rprec), dimension(:,:), allocatable zcon
spectral condensation term in
real(rprec), dimension(:,:), allocatable ru
real(rprec), dimension(:), allocatable gvv
metric element
real(rprec), dimension(:), allocatable sqrts
sqrt(s), two-dimensional array on full-grid
real(rprec), dimension(:,:), allocatable, target extra3
real(rprec), dimension(:), allocatable guv
metric element
real(rprec), dimension(:,:), allocatable, target extra4
real(rprec), dimension(:), allocatable chip
radial derivative of chi/(2*pi) on half-grid
real(rprec), dimension(:,:), allocatable, target extra1
real(rprec), dimension(:), allocatable shalf
sqrt(s) ,two-dimensional array on half-grid
real(rprec), dimension(:), allocatable ru0
, even-m and odd-m added together appropriately
real(rprec), dimension(:), allocatable gcon
spectral condensation force; "alias force"
real(rprec), dimension(:,:), allocatable, target z1
real(rprec), dimension(:,:), allocatable rcon
spectral condensation term in
real(rprec), dimension(:), allocatable rcon0
spectral condensation term in at start of current multi-grid iteration
real(rprec), dimension(:,:), allocatable r1
real(rprec), dimension(:), allocatable guu
metric element
real(rprec), dimension(:,:), allocatable, target extra2
real(rprec), dimension(:), allocatable phip
radial derivative of phi/(2*pi) on half-grid
real(rprec), dimension(:), allocatable zcon0
spectral condensation term in at start of current multi-grid iteration
real(rprec), dimension(:,:), allocatable zu