findIndicesVector Module Function

pure module function findIndicesVector(mask) result(indices)

Find locations of .true. values in logical mask of rank 1

Arguments

Type IntentOptional Attributes Name
logical, intent(in), dimension(:) :: mask

Return Value integer(kind=ik), dimension(:), allocatable