Math-Trig Sweep by Perim and Radius

From Vectorlab
Jump to: navigation, search


Given PERIMETER and RADIUS of an arc, returns the SWEEP. By Orso B. Schmid


{ Orso ***************************** }
{ given arc perimeter and radius, result is an arc sweep }
FUNCTION M_Trig_ArcSweepByLenRadius(arcLen, radius: REAL): REAL;
	BEGIN
		{ arc perim / radius) }
		M_Trig_ArcSweepByLenRadius := Rad2Deg(arcLen / radius);
	END;