RabbitEarFold: Basic Example
RabbitEarFold: Basic Example
TsumamiOri
RabbitEarFold
RabbitEarFold
In[]:=
EosSession["Rabbit Ear Fold"];
In[]:=
NewOrigami[10]
Rabbit Ear Fold: Step 1
Out[]=
In[]:=
HO["B","D"]!
Rabbit Ear Fold: Step 3
Out[]=
In[]:=
HO["A","C",Mark->{{"AC","G"}}]!
Rabbit Ear Fold: Step 5
Out[]=
In[]:=
HO["CD","CA",Mark->{{"AD","Q"}},FoldLine1]
Rabbit Ear Fold: Step 6
Out[]=
In[]:=
HO["AQ","AC",Mark->{{"QC","P"}},FoldLine1]
Rabbit Ear Fold: Step 7
Out[]=
In[]:=
ShowLayeredFace[]
Rabbit Ear Fold: Step 7
Out[]=
1,{21},,2,{23},,3,{9,22},,4,{6,7,8,20},
{23,21} is used as the argument to RabbitEarFold
In[]:=
Block[{$probeFold=True},RabbitEarFold[{23,21},{Ray["P","A"],Ray["P","Q"],Ray["P","G"],Ray["P","D"]}]]
TaniOri[23,Ray[A,P]]
CutEdges[{{23,21}}]
HO[Ray[P,G],HandleD]
HO[Ray[D,P],HandleQ]
TaniOri[Ray[P,A]]
GlueEdges[$cutEdges]
Rabbit Ear Fold: Step 13
Out[]=
In[]:=
ShowLayers[Hinge{"Arc",0.5},Gap0.6,ViewPoint$viewPoint3D,ShowFrameFalse]
Load Eos
Load Eos