Return a Logical 2-dimensional mask array for a given size, where the area of the pixels at (rInner radius rOuter) are True.
Note: Make sure to deallocate the returned array after use.
interface getAnnularMaskAry function getAnnularMaskAry(sizeX, sizeY, centX, centY & , rOuter, rInner) result(arMask) logical, allocatable :: arMask(:,:) integer(int32), intent(in) :: sizeX, sizeY real(double), intent(in) :: centX, centY, rOuter real(double), intent(in), optional :: rInner ! 0 in default. end function getAnnularMaskAry end interface