| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| logical, | public | :: | ready | = | .false. | ||
| integer(kind=i32), | public | :: | axis1 | = | 0_i32 | ||
| integer(kind=i32), | public | :: | axis2 | = | 0_i32 | ||
| integer(kind=i32), | public | :: | axis_free | = | 0_i32 | ||
| integer(kind=i32), | public | :: | nimg | = | 0_i32 | ||
| integer(kind=i32), | public | :: | img_outer | = | 0_i32 | ||
| integer(kind=i32), | public | :: | kmax | = | 0_i32 | ||
| real(kind=dp), | public | :: | alpha | = | 0.0d0 | ||
| real(kind=dp), | public | :: | soft2 | = | 0.0d0 | ||
| real(kind=dp), | public | :: | cell_area | = | 0.0d0 | ||
| real(kind=dp), | public | :: | k0_pref | = | 0.0d0 | ||
| integer(kind=i32), | public | :: | screen_count | = | 0_i32 | ||
| integer(kind=i32), | public | :: | inner_count | = | 0_i32 | ||
| integer(kind=i32), | public | :: | k_count | = | 0_i32 | ||
| real(kind=dp), | public, | allocatable | :: | screen_shift1(:) | |||
| real(kind=dp), | public, | allocatable | :: | screen_shift2(:) | |||
| real(kind=dp), | public, | allocatable | :: | inner_shift1(:) | |||
| real(kind=dp), | public, | allocatable | :: | inner_shift2(:) | |||
| real(kind=dp), | public, | allocatable | :: | k1(:) | |||
| real(kind=dp), | public, | allocatable | :: | k2(:) | |||
| real(kind=dp), | public, | allocatable | :: | kmag(:) | |||
| real(kind=dp), | public, | allocatable | :: | karg0(:) | |||
| real(kind=dp), | public, | allocatable | :: | kpref1(:) | |||
| real(kind=dp), | public, | allocatable | :: | kpref2(:) | |||
| real(kind=dp), | public, | allocatable | :: | kprefz(:) |
type :: periodic2_ewald_data_type logical :: ready = .false. integer(i32) :: axis1 = 0_i32 integer(i32) :: axis2 = 0_i32 integer(i32) :: axis_free = 0_i32 integer(i32) :: nimg = 0_i32 integer(i32) :: img_outer = 0_i32 integer(i32) :: kmax = 0_i32 real(dp) :: alpha = 0.0d0 real(dp) :: soft2 = 0.0d0 real(dp) :: cell_area = 0.0d0 real(dp) :: k0_pref = 0.0d0 integer(i32) :: screen_count = 0_i32 integer(i32) :: inner_count = 0_i32 integer(i32) :: k_count = 0_i32 real(dp), allocatable :: screen_shift1(:), screen_shift2(:) real(dp), allocatable :: inner_shift1(:), inner_shift2(:) real(dp), allocatable :: k1(:), k2(:), kmag(:), karg0(:), kpref1(:), kpref2(:), kprefz(:) end type periodic2_ewald_data_type