SwivelFold: examples
SwivelFold: examples
Collection of examples of swivel folds. Swivel fold is called Hikiyose Ori (meaning pull left / pull right fold) in Japanese.
Load Eos
Load Eos
<<EosLoader.wl
Eos3.7.4 (December 16,2023) running under Mathematica 13.3.0 for Mac OS X ARM (64-bit) (June 3, 2023) on Sun 17 Dec 2023 15:11:08.
This version is effective until June 30,2024.
EosNotations
EosNotations
Extra
Extra
SwivelFold[“R”]
SwivelFold[“R”]
Example 1
Example 1
Preparation
Preparation
EosSession["Swivel Fold Right"];
In[]:=
MarkOff[];
In[]:=
NewOrigami[15];
In[]:=
NewPoint[{"E"{0,8},"F"{0,12}}]
Swivel Fold/Origami: Step 1
Out[]=
In[]:=
HO["AC"]!
Swivel Fold/Origami: Step 3
Out[]=
In[]:=
HO["AC","E",Mark{{"AB","G"}}]!
Swivel Fold/Origami: Step 5
Out[]=
In[]:=
HO["AC","F",Mark{{"AB","H"}}]
Swivel Fold/Origami: Step 6
Out[]=
In[]:=
ShowOrigami[ShowFaceId->All]
Swivel Fold/Origami: Step 6
Out[]=
In[]:=
ValleyFold[{5,7},"GE"]
Swivel Fold/Origami: Step 7
Out[]=
In[]:=
ShowLayeredFace[]
Swivel Fold/Origami: Step 7
Out[]=
1,{5,7},
,2,{9,13},
,3,{8,12},
SwivelFold[“R”]
SwivelFold[“R”]
In[]:=
SwivelFold["R"][{"FH","EG"},{"A",5}]
Swivel Fold/Origami: Step 15
Out[]=
Example 2
Example 2
Preparation
Preparation
In[]:=
NewOrigami[15];
In[]:=
NewPoint[{"E"{0,8},"F"{0,12}}]
Swivel Fold/Origami: Step 1
Out[]=
In[]:=
HO["AC"]!
Swivel Fold/Origami: Step 3
Out[]=
In[]:=
HO["AC","E",Mark{{"AB","G"}}]!
Swivel Fold/Origami: Step 5
Out[]=
SwivelFold[“R”]
SwivelFold[“R”]
SwivelFold[“L”]
SwivelFold[“L”]
Example 3
Example 3
Preparation
Preparation
SwivelFold[“L”]
SwivelFold[“L”]
Example 4
Example 4
SwivelFold[“L”]
SwivelFold[“L”]