3D Cylindrical Interpolation Coefficients and indices
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public | :: | i | = | 0 | Index of R before |
|
integer, | public | :: | j | = | 0 | Index of Z before |
|
integer, | public | :: | k | = | 0 | Index of Phi before |
|
real(kind=Float64), | public | :: | b111 | = | 0.d0 | Coefficient for z(i,j,k) term |
|
real(kind=Float64), | public | :: | b121 | = | 0.d0 | Coefficient for z(i,j+1,k) term |
|
real(kind=Float64), | public | :: | b112 | = | 0.d0 | Coefficient for z(i,j,k+1) term |
|
real(kind=Float64), | public | :: | b122 | = | 0.d0 | Coefficient for z(i,j+1,k+1) term |
|
real(kind=Float64), | public | :: | b211 | = | 0.d0 | Coefficient for z(i+1,j,k) term |
|
real(kind=Float64), | public | :: | b212 | = | 0.d0 | Coefficient for z(i+1,j,k+1) term |
|
real(kind=Float64), | public | :: | b221 | = | 0.d0 | Coefficient for z(i+1,j+1,k) term |
|
real(kind=Float64), | public | :: | b222 | = | 0.d0 | Coefficient for z(i+1,j+1,k+1) term |
type InterpolCoeffs3D
!+ 3D Cylindrical Interpolation Coefficients and indices
integer :: i = 0
!+ Index of R before `rout`
integer :: j = 0
!+ Index of Z before `zout`
integer :: k = 0
!+ Index of Phi before `phiout`
real(Float64) :: b111 = 0.d0
!+ Coefficient for z(i,j,k) term
real(Float64) :: b121 = 0.d0
!+ Coefficient for z(i,j+1,k) term
real(Float64) :: b112 = 0.d0
!+ Coefficient for z(i,j,k+1) term
real(Float64) :: b122 = 0.d0
!+ Coefficient for z(i,j+1,k+1) term
real(Float64) :: b211 = 0.d0
!+ Coefficient for z(i+1,j,k) term
real(Float64) :: b212 = 0.d0
!+ Coefficient for z(i+1,j,k+1) term
real(Float64) :: b221 = 0.d0
!+ Coefficient for z(i+1,j+1,k) term
real(Float64) :: b222 = 0.d0
!+ Coefficient for z(i+1,j+1,k+1) term
end type InterpolCoeffs3D