InsideCrimpPleatFold: examples

InsideCrimpPleatFold - left-side

InsideCrimpPleat Fold

Example1

Preparation

In[]:=
EosSession["Pleat Fold"];
In[]:=
NewOrigami[10];
In[]:=
HO["C","A"]
Pleat Fold/Ori: Step 2
Out[]=
In[]:=
NewPoints[{"E"{0,6.0},"F"{0,4.5},"G"{6,4}}]
Pleat Fold/Ori: Step 2
Out[]=

Function call

In[]:=
Block[{$probeFold=False},InsideCrimpPleatFold[{4,6},"GD",{"E","F"}]]
Pleat Fold/Ori: Step 14
Out[]=
In[]:=
EndSession[];

Example2

Preparation

In[]:=
EosSession["Pleat Fold"];
In[]:=
NewOrigami[10];
In[]:=
HO["C","A"]
Pleat Fold/Ori: Step 2
Out[]=
In[]:=
NewPoints[{"E"{0,6.0},"F"{0,4.5},"G"{6,4}}]
Pleat Fold/Ori: Step 2
Out[]=

Function call 2

In[]:=
Block[{$probeFold=True},InsideCrimpPleatFold[{4,6},"GD",{"E","F"}]]
«
DuplicatePoints[{Ee2$,Ff2$}]
Pleat Fold/Ori: Step 3
»
〈e2$,f2$〉
«
HO[G-E]
Pleat Fold/Ori: Step 3
»
«
Unfold[]
Pleat Fold/Ori: Step 4
»
«
HO[G-F]
Pleat Fold/Ori: Step 5
»
«
Unfold[]
Pleat Fold/Ori: Step 6
»
«
FO[-π][{6,14,15},D-G]
Pleat Fold/Ori: Step 7
»
«
CutEdges[{{4,6}}]
Pleat Fold/Ori: Step 8
»
«
FO[-π][10,G-f2$]
Pleat Fold/Ori: Step 9
»

InsideCrimpPleatFold - right-side

InsideCrimpPleat Fold

Example1

Preparation

Function call

Example2

Preparation2

Function call2

Analysis

Example3

Preparation3

Function call 3

Load Eos

Extra