XMM-Newton Science Analysis System


ssclib (ssclib-4.36.1) [xmmsas_20230412_1735-21.0.0]

vectorCross

Performs a vector cross product.

  interface vectorCross
    function vectorCrossSingle(vectorA, vectorB)
      real(single), intent(in) :: vectorA(3), vectorB(3)
      real(single)             :: vectorCrossSingle(3)
    end function vectorCrossSingle

    function vectorCrossDouble(vectorA, vectorB)
      real(double), intent(in) :: vectorA(3), vectorB(3)
      real(double)             :: vectorCrossDouble(3)
    end function vectorCrossDouble
  end interface