!$OMP parallel do default(shared) reduction(+:rho) !$OMP end parallel do
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=real64), | intent(in) | :: | Center_x(:) | |||
real(kind=real64), | intent(in) | :: | Circle_x(:,:) | |||
integer(kind=int32), | intent(in) | :: | FFT_SIZE |