OutsideReverseFold: Example

Load Eos

In[]:=
<<EosLoader`
Eos3.7.3 (October 1,2023) running under Mathematica 13.3.0 for Mac OS X ARM (64-bit) (June 3, 2023) on Mon 2 Oct 2023 10:33:20.
This version is effective until March 31,2024.

OutsideReverse Fold (1)

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

OutsideReverse Fold (2)

OutsideReverse Fold (3)

This is a more general case of OutsideReverseFold

OutsideReverse Fold (4)