In[]:=
In the commands below, type the new coordinates of the points. Evaluate the notebook.
In[]:=
ReuleauxTriangle1[Vertices={{-2,5},{7,12}}]​​ReuleauxTriangle2[Vertices={{-2,5},{7,12}}]​​
Out[]=
​
Reuleaux Triangle 1:
Value (θ)
Circumferences data
{CenterVertex11,Radius}
{CenterVertex2,Radius}
{CenterVertex3FirstTriangle,Radius}
AreaReuleauxTriangle1
{-2,5},
130

{7,12},
130


1
2
5-7
3
,
1
2
17+9
3
,
130

65
3
2
+390-
3
4
+
π
6
Out[]=
​
Reuleaux Triangle 2:
Value (θ)
Circumferences data
{CenterVertex1,Radius}
{CenterVertex2,Radius}
{CenterVertex3SecondTriangle,Radius}
AreaReuleauxTriangle2
{-2,5},
130

{7,12},
130


1
2
5+7
3
,
1
2
17-9
3
,
130

65
3
2
+390-
3
4
+
π
6