Flying Crane

​
Tetsuo Ida
​
​

Flying crane

Start of construction

In[]:=
EosSession["Flying crane"];
In[]:=
$displacement=0;Inexact[];​​LabelDisplacement=True;​​$probeFold=False;​​$showLayeredFace=True;
In[]:=
textureY=Graphics[{Yellow,Rectangle[{0,0},{16,16}]}];
In[]:=
texturePattern=$chiyogami[[8]];
In[]:=
SetOptions[ShowOrigami,Lighting"Neutral",FrameFalse,Texture{textureY,texturePattern}];​​
In[]:=
NewOrigami[16]
Flying crane: Step 1
Out[]=

Petal fold

Preparation for a petal fold

In[]:=
VFold["DB"]
Flying crane: Step 2
Out[]=
In[]:=
HO["D","B",Mark->{{"DB","E"}}]
Flying crane: Step 3
Out[]=
In[]:=
HO["B","C",Mark->{{"DC","F4","F3","F2","F1"}}]!
Flying crane: Step 5
Out[]=
In[]:=
ShowLayeredFace[]
Flying crane: Step 5
Out[]=
1,{10,11},
,2,{14,15},
,3,{12,13},
,4,{8,9},


Squash fold rightwards on the front side

In[]:=
SquashFold["R"]["Square"][{10,11},{"EC","DE"}]
Flying crane: Step 10
Out[]=
In[]:=
TurnOver["EF3"]
Flying crane: Step 11
Out[]=
In[]:=
ShowLayeredFace[Level->{1}]
Flying crane: Step 11
Out[]=
1,{8,9,10},


Squash fold leftwards on the back side

In[]:=
SquashFold["L"]["Square"][{8,9},{"EB","CE"}]
Flying crane: Step 16
Out[]=

Preparation for constructing legs

In[]:=
HO["F2B","EB"]
Flying crane: Step 16
Out[]=

,


Left leg by inside reverse fold

Right leg by inside reverse fold

Leg construction

Head-side

Tail-side

More on head-side

More on tail-side

Right leg

Left leg

Bill construction

Preparation for bill construction

NewVec[P-> V], where P is a point name and V is a 1-vector that associates P with V.

Wing construction

Load Eos

​