min_max_sp Function

private pure function min_max_sp(array) result(mm)

Minimum and maximum of a real(sp) array.

Arguments

Type IntentOptional Attributes Name
real(kind=sp), intent(in) :: array(:)

Return Value real(kind=sp), (2)


Called by

proc~~min_max_sp~~CalledByGraph proc~min_max_sp min_max_sp interface~min_max min_max interface~min_max->proc~min_max_sp

Source Code

   pure function min_max_sp(array) result(mm)
      !! Minimum and maximum of a real(sp) array.
      real(sp), intent(in) :: array(:)
      real(sp) :: mm(2)
      mm(1) = minval(array)
      mm(2) = maxval(array)
   end function min_max_sp