Yacht
Yacht
Load Eos
Load Eos
In[]:=
<<EosLoader`
Eos3.7.1.1 (March 21,2023) running under Mathematica 13.2.0 for Mac OS X ARM (64-bit) (November 18, 2022) on Mon 27 Mar 2023 18:00:08.
Construction
Construction
In[]:=
EosSession["Yacht"];
In[]:=
NewOrigami[4];
In[]:=
HO["D","B"]
Yacht: Step 2
Out[]=
In[]:=
Unfold[]
Yacht: Step 3
Out[]=
In[]:=
HO["D","CA","C"]
Yacht: Step 3
Out[]=
,
In[]:=
HO["D","CA","C",FoldLine1]
Yacht: Step 4
Out[]=
In[]:=
Unfold[]
Yacht: Step 5
Out[]=
In[]:=
HO["D","CE","C"]
Yacht: Step 5
Out[]=
,
In[]:=
HO["D","CE","C",FoldLine1]
Yacht: Step 6
Out[]=
In[]:=
HO["CA",Handle"F"]
Yacht: Step 7
Out[]=
In[]:=
HO["AC","F",Handle"A"]
Yacht: Step 8
Out[]=
In[]:=
Unfold[]
Yacht: Step 9
Out[]=
In[]:=
HO["AF","IF"]
Yacht: Step 9
Out[]=
,
In[]:=
HO["AF","IF",FoldLine2]
Yacht: Step 10
Out[]=
In[]:=
Unfold[]
Yacht: Step 11
Out[]=
In[]:=
OutsideReverseFold[{11,27},Ray["K","F"]]
Yacht: Step 15
Out[]=