Sindbad~EG File Manager

/**
 * Author: M. Beeson Geoscript for bisecting segment(A,B) This code is in the
 * public domain.
 */

package org.dynamicgeometry.scripts;

public class MidpointScript extends Scripts
{
	public MidpointScript()
	{
		super("Midpoint", "Point", new String[] {"A", "B"},
			new String[] {"Point", "Point"},
			new String[] {
				"s = Segment(A,B);",
				"C1 = Circle(A,B);",
				"C2 = Circle(B,A);",
				"D = intersectCircles1(C1,C2);",
				"E = intersectCircles2(C1,C2);",
//				"K = TestPoint(D,E);",
				"M = intersectLines(D,E,A,B);",
				"return M;"});
	}
}