24 COMPLEX(KIND=dp),
DIMENSION(:, :),
POINTER :: ex => null(), ey => null(), ez => null()
25 COMPLEX(KIND=dp),
DIMENSION(:, :),
POINTER :: shell_ex => null(), shell_ey => null(), shell_ez => null()
26 COMPLEX(KIND=dp),
DIMENSION(:, :),
POINTER :: core_ex => null(), core_ey => null(), core_ez => null()
27 INTEGER,
DIMENSION(:, :),
POINTER :: centre => null(), core_centre => null(), shell_centre => null()
28 REAL(kind=
dp),
DIMENSION(:, :),
POINTER :: delta => null(), core_delta => null(), shell_delta => null()