Draw Circle

Undo

move

turn

turn

move

fulcrum = (7.264578743916514, 2.623622538046191)
bigCircle = Circle(fulcrum, 5)
PointyEnd = Point(bigCircle)
PencilEnd = Point(bigCircle)
midpointOfRadius = Midpoint(PencilEnd, PointyEnd)
perpendicularLine = AngularBisector(PointyEnd, fulcrum, PencilEnd)
B = Point(perpendicularLine)
wholeCompass = PolyLine(PointyEnd, fulcrum, PencilEnd)
littleCircle = Circle(fulcrum, 1)
perpendicularRayPoint = Point(perpendicularLine)
perpendicularRay = Ray(fulcrum, perpendicularRayPoint)
top = Intersect(littleCircle, perpendicularRay)
topOfCompass = Segment(fulcrum, top)
metalSegment = Segment(PointyEnd, fulcrum)
pencilSegment = Segment(fulcrum, PencilEnd)
num = 0 (slider from 0 to 50, step 1)
center_2: (13, 5)
radius_2: (12, 5)
c_2 = Circle(center_2, radius_2)
center_3: (13, 4)
radius_3: (12, 4)
c_3 = Circle(center_3, radius_3)
center_4: (13, 3)
radius_4: (12, 3)
c_4 = Circle(center_4, radius_4)
center_5: (13, 2)
radius_5: (12, 2)
c_5 = Circle(center_5, radius_5)
center_6: (13, 1)
radius_6: (12, 1)
c_6 = Circle(center_6, radius_6)
center_7: (13, 0)
radius_7: (12, 0)
c_7 = Circle(center_7, radius_7)
center_8: (13, -1)
radius_8: (12, -1)
c_8 = Circle(center_8, radius_8)
center_9: (13, -2)
radius_9: (12, -2)
c_9 = Circle(center_9, radius_9)
center_{10}: (13, -3)
radius_{10}: (12, -3)
c_{10} = Circle(center_{10}, radius_{10})
center_{11}: (15, 6)
radius_{11}: (14, 6)
c_{11} = Circle(center_{11}, radius_{11})
center_{12}: (15, 5)
radius_{12}: (14, 5)
c_{12} = Circle(center_{12}, radius_{12})
center_{13}: (15, 4)
radius_{13}: (14, 4)
c_{13} = Circle(center_{13}, radius_{13})
center_{14}: (15, 3)
radius_{14}: (14, 3)
c_{14} = Circle(center_{14}, radius_{14})
center_{15}: (15, 2)
radius_{15}: (14, 2)
c_{15} = Circle(center_{15}, radius_{15})
center_{16}: (15, 1)
radius_{16}: (14, 1)
c_{16} = Circle(center_{16}, radius_{16})
center_{17}: (15, 0)
radius_{17}: (14, 0)
c_{17} = Circle(center_{17}, radius_{17})
center_{18}: (15, -1)
radius_{18}: (14, -1)
c_{18} = Circle(center_{18}, radius_{18})
center_{19}: (15, -2)
radius_{19}: (14, -2)
c_{19} = Circle(center_{19}, radius_{19})
center_{20}: (15, -3)
radius_{20}: (14, -3)
c_{20} = Circle(center_{20}, radius_{20})
center_{21}: (17, 6)
radius_{21}: (16, 6)
c_{21} = Circle(center_{21}, radius_{21})
center_{22}: (17, 5)
radius_{22}: (16, 5)
c_{22} = Circle(center_{22}, radius_{22})
center_{23}: (17, 4)
radius_{23}: (16, 4)
c_{23} = Circle(center_{23}, radius_{23})
center_{24}: (17, 3)
radius_{24}: (16, 3)
c_{24} = Circle(center_{24}, radius_{24})
center_{25}: (17, 2)
radius_{25}: (16, 2)
c_{25} = Circle(center_{25}, radius_{25})
center_{26}: (17, 1)
radius_{26}: (16, 1)
c_{26} = Circle(center_{26}, radius_{26})
center_{27}: (17, 0)
radius_{27}: (16, 0)
c_{27} = Circle(center_{27}, radius_{27})
center_{28}: (17, -1)
radius_{28}: (16, -1)
c_{28} = Circle(center_{28}, radius_{28})
center_{29}: (17, -2)
radius_{29}: (16, -2)
c_{29} = Circle(center_{29}, radius_{29})
center_{30}: (17, -3)
radius_{30}: (16, -3)
c_{30} = Circle(center_{30}, radius_{30})
center_{31}: (19, 6)
radius_{31}: (18, 6)
c_{31} = Circle(center_{31}, radius_{31})
center_{32}: (19, 5)
radius_{32}: (18, 5)
c_{32} = Circle(center_{32}, radius_{32})
center_{33}: (19, 4)
radius_{33}: (18, 4)
c_{33} = Circle(center_{33}, radius_{33})
center_{34}: (19, 3)
radius_{34}: (18, 3)
c_{34} = Circle(center_{34}, radius_{34})
center_{35}: (19, 2)
radius_{35}: (18, 2)
c_{35} = Circle(center_{35}, radius_{35})
center_{36}: (19, 1)
radius_{36}: (18, 1)
c_{36} = Circle(center_{36}, radius_{36})
center_{37}: (19, 0)
radius_{37}: (18, 0)
c_{37} = Circle(center_{37}, radius_{37})
center_{38}: (19, -1)
radius_{38}: (18, -1)
c_{38} = Circle(center_{38}, radius_{38})
center_{39}: (19, -2)
radius_{39}: (18, -2)
c_{39} = Circle(center_{39}, radius_{39})
center_{40}: (19, -3)
radius_{40}: (18, -3)
c_{40} = Circle(center_{40}, radius_{40})
center_{41}: (21, 6)
radius_{41}: (20, 6)
c_{41} = Circle(center_{41}, radius_{41})
center_{42}: (21, 5)
radius_{42}: (20, 5)
c_{42} = Circle(center_{42}, radius_{42})
center_{43}: (21, 4)
radius_{43}: (20, 4)
c_{43} = Circle(center_{43}, radius_{43})
center_{44}: (21, 3)
radius_{44}: (20, 3)
c_{44} = Circle(center_{44}, radius_{44})
center_{45}: (21, 2)
radius_{45}: (20, 2)
c_{45} = Circle(center_{45}, radius_{45})
center_{46}: (21, 1)
radius_{46}: (20, 1)
c_{46} = Circle(center_{46}, radius_{46})
center_{47}: (21, 0)
radius_{47}: (20, 0)
c_{47} = Circle(center_{47}, radius_{47})
center_{48}: (21, -1)
radius_{48}: (20, -1)
c_{48} = Circle(center_{48}, radius_{48})
center_{49}: (21, -2)
radius_{49}: (20, -2)
c_{49} = Circle(center_{49}, radius_{49})
center_{50}: (21, -3)
radius_{50}: (20, -3)
c_{50} = Circle(center_{50}, radius_{50})
radiusLength = Segment(PointyEnd, PencilEnd)
animationAngle = 6.283185307179586 rad (slider from 0° to 360°, step 10°)
PointyEnd_2 = Rotate(PointyEnd, (-animationAngle), PointyEnd)
fulcrum_2 = Rotate(fulcrum, (-animationAngle), PointyEnd)
PencilEnd_2 = Rotate(PencilEnd, (-animationAngle), PointyEnd)
wholeCompass_2 = PolyLine(PointyEnd_2, fulcrum_2, PencilEnd_2)
pencilSegment_2 = Segment(PencilEnd_2, fulcrum_2)
metalSegment_2 = Segment(PointyEnd, fulcrum_2)
animationArc = CircleArc(PointyEnd, PencilEnd_2, PencilEnd)
α = Angle(PointyEnd, fulcrum_2, PencilEnd_2)
perpendicularLine_2 = AngularBisector(PointyEnd, fulcrum_2, PencilEnd_2)
A = Point(perpendicularLine_2)
perpendicularRay_2 = Ray(fulcrum_2, A)
littleCircle_2 = Circle(fulcrum_2, 1)
top_2 = Intersect(littleCircle_2, perpendicularRay_2)
topOfCompass_2 = Segment(fulcrum_2, top_2)
β = Angle(PointyEnd_2, fulcrum_2, PencilEnd_2)
justAddedACircle = false
γ = 6.1086523819801535 rad (slider from 0 to 6.283185307179586, step 0.08726646259971647)
center_1 = (6.210978199293274, -1.7693641549549253)
radius_1 = (0.548358061578794, 0.18368335289589188)
c_1 = Circle(center_1, radius_1)
ruler_1 = (6.389400789347549, -12.392588263352547)
ruler_2 = Point(Circle[ruler_1, 10])
ruler_3: ruler_1 + Vector[ruler_1, ruler_2] + (0.3 * OrthogonalVector[Segment[ruler_1, ruler_2]])
ruler_4: ruler_1 + (-Vector[ruler_1, ruler_2]) + (0.3 * OrthogonalVector[Segment[ruler_1, ruler_2]])
ruler_5: ruler_1 + (-Vector[ruler_1, ruler_2]) + (-1.33226762955019E-16 * OrthogonalVector[Segment[ruler_1, ruler_2]])
rulerOutline, rulerTopLeft, rulerLeft, rulerBottom, rulerRight, rulerTopRight = Polygon(ruler_1, ruler_2, ruler_3, ruler_4, ruler_5)
radiusMidPoint = Midpoint(PencilEnd, PointyEnd)
radiusLengthLabel: "" + radiusLength + ""
perpendicularRayInverse = Ray(midpointOfRadius, B)
radiusLabelPoint_2 = Intersect(bigCircle, perpendicularRayInverse)
c = Circle(midpointOfRadius, 1)
radiusLabelPoint = Intersect(c, perpendicularRayInverse)
C = (19.010387781934224, -12.346526267029237)
D = (19.102511774580844, -14.281130112608217)