XMM-Newton Science Analysis System


ssclib (ssclib-4.33) [xmmsas_20190531_1155-18.0.0]

normalizeVector

Given argument $\bar{v}$ returns $\hat{v}$.

  interface normalizeVector
    function normalizeVectorSingle(argument)
      real(single), intent(in) :: argument(:)
      real(single) :: normalizeVectorSingle(size(argument))
    end function normalizeVectorSingle

    function normalizeVectorDouble(argument)
      real(double), intent(in) :: argument(:)
      real(double)             :: normalizeVectorDouble(size(argument))
    end function normalizeVectorDouble
  end interface