OutsideReverseFold Basic Example

OutsideReverse Fold

In[]:=
EosSession["Outside Reverse Fold"];
In[]:=
NewOrigami[10];
In[]:=
ValleyFold[Ray["C","A"]]
Outside Reverse Fold: Step 2
Out[]=
In[]:=
NewPoint[{"E"{7,7},"F"{10,3}}]
Outside Reverse Fold: Step 2
Out[]=
In[]:=
HO["EF",Handle"C"]!
Outside Reverse Fold: Step 4
Out[]=
In[]:=
Block[{$probeFold=True},​​OutsideReverseFold[{5,7},Ray["F","E"]]]
«
CutEdges[{{5,7}}]
»
«
YamaOri[5,Ray[F,E],InsertFace0]
»
«
TaniOri[7,Ray[F,E],InsertFace0]
»
«
GlueEdges[$cutEdges]
»
Outside Reverse Fold: Step 8
Out[]=
In[]:=
ShowLayers[Hinge{"Arc",0.5},Gap0.5,ShowFaceIdAll,ViewPoint$viewPoint3D]
Outside Reverse Fold: Step 8
Out[]=
In[]:=
​​ShowLayeredFace[]
Outside Reverse Fold: Step 8
Out[]=
1,{7},
,2,{6},
,3,{4},
,4,{5},

In[]:=
AdjacencyOGraph[]
Outside Reverse Fold: Step 8
Out[]=
In[]:=
SuperpositionOGraph[]
Outside Reverse Fold: Step 8
Out[]=
In[]:=
Unfold[ShowFaceIdAll];
In[]:=
UnfoldAll[ShowFaceIdAll];