if get('geometry,'version)=false then load(geometry);

/* Points */
A:[0,0];
B:[u1,0];
C:[0,u2];
M1:[x1,0];
M2:[0,x2];
M3:[x3,x4];
H:[x5,x6];
O:[x7,x8];

/* Equations */
eqns:append(
	append(
		midpoint(M1,A,B),
		midpoint(M2,A,C),
		midpoint(M3,B,C)
	),
	[
		perp(A,H,B,C),
		collinear(B,H,C),
		eqlen(O,A,O,M1),
		eqlen(O,A,O,M2),
		eqlen(O,A,O,M3),
		eqlen(O,A,O,H)
	]);