Mercury

Venus

Earth

Mars

Jupiter

Saturn

Uranus

Neptune

D = (36.993753135733556, -9.039883734874914)
C = (35.78040047092975, -9.046817178673793)
distanceCD = Distance(C, D)
a: 20 / distanceCD
b: (a * 27.27)
A: (0, 0)
B: (b, 0)
TextCD: Name[C] + (Name[D]) + " = " + distanceCD
distanceAB = Distance(A, B)
TextAB: Name[A] + (Name[B]) + " = " + distanceAB
Sun = (252.145525806847, 58.99566097509337)
c = Circle(Sun, 3)
d = Circle(Sun, 5.598)
e = Circle(Sun, 7.7422)
f = Circle(Sun, 11.7936)
g = Circle(Sun, 40.289)
h = Circle(Sun, 74.129)
k = Circle(Sun, 148.881)
p = Circle(Sun, 233)
P_1 = Point(c)
P_2 = Point(d)
P_3 = Point(e)
P_4 = Point(f)
P_5 = Point(g)
P_6 = Point(h)
P_7 = Point(k)
P_8 = (120, 240)