to_SPAC_COEFF Function

public function to_SPAC_COEFF(Center_x, Circle_x, FFT_SIZE) result(rho)

!$OMP parallel do default(shared) reduction(+:rho) !$OMP end parallel do

Arguments

Type IntentOptional Attributes Name
real(kind=real64), intent(in) :: Center_x(:)
real(kind=real64), intent(in) :: Circle_x(:,:)
integer(kind=int32), intent(in) :: FFT_SIZE

Return Value real(kind=real64), allocatable, (:)