text: /**
   * Author: Ulf Lundstrom
   * Date: 2009-03-21
   * License: CC0
   * Source:
   * Description:\\
  \begin{minipage}{75mm}
  If a unique intersetion point between the line segments going from s1 to e1 and from s2 to e2 exists r1 is set to this point and 1 is returned.
  If no intersection point exists 0 is returned and if infinitely many exists 2 is returned and r1 and r2 are set to the two ends of the common line.
  The wrong position will be returned if P is Point<int> and the intersection point does not have integer coordinates.
  Products of three coordinates are used in intermediate steps so watch out for overflow if using int or long long.
  Use segmentIntersectionQ to get just a true/false answer.
  \end{minipage}
  \begin{minipage}{15mm}
  \includegraphics[width=\textwidth]{../content/geometry/SegmentIntersection}
  \end{minipage}
   * Status: Well tested with unitTest and with Kattis problem intersection.
   */
  #pragma once
  
  #include "Point.h"
  
  template<class P>
  int segmentIntersection(const P& s1, const P& e1,
  		const P& s2, const P& e2, P& r1, P& r2) {
  	if (e1==s1) {
  		if (e2==s2) {
  			if (e1==e2) { r1 = e1; return 1; } //all equal
  			else return 0; //different point segments
  		} else return segmentIntersection(s2,e2,s1,e1,r1,r2);//swap
  	}
  	//segment directions and separation
  	P v1 = e1-s1, v2 = e2-s2, d = s2-s1;
  	auto a = v1.cross(v2), a1 = v1.cross(d), a2 = v2.cross(d);
  	if (a == 0) { //if parallel
  		auto b1=s1.dot(v1), c1=e1.dot(v1),
  		     b2=s2.dot(v1), c2=e2.dot(v1);
  		if (a1 || a2 || max(b1,min(b2,c2))>min(c1,max(b2,c2)))
  			return 0;
  		r1 = min(b2,c2)<b1 ? s1 : (b2<c2 ? s2 : e2);
  		r2 = max(b2,c2)>c1 ? e1 : (b2>c2 ? s2 : e2);
  		return 2-(r1==r2);
  	}
  	if (a < 0) { a = -a; a1 = -a1; a2 = -a2; }
  	if (0<a1 || a<-a1 || 0<a2 || a<-a2)
  		return 0;
  	r1 = s1-v1*a2/a;
  	return 1;
  }
  