Flying Crane
Flying Crane
Tetsuo Ida
Flying crane
Flying crane
Start of construction
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",FrameFalse,Texture{textureY,texturePattern}];
In[]:=
NewOrigami[16]
Flying crane: Step 1
Out[]=
Petal fold
Petal fold
Preparation for a 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
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
Squash fold leftwards on the back side
In[]:=
SquashFold["L"]["Square"][{8,9},{"EB","CE"}]
Flying crane: Step 16
Out[]=
Preparation for constructing legs
Preparation for constructing legs
In[]:=
HO["F2B","EB"]
Flying crane: Step 16
Out[]=
,
Left leg by inside reverse fold
Left leg by inside reverse fold
Right leg by inside reverse fold
Right leg by inside reverse fold
Leg construction
Leg construction
Head-side
Head-side
Tail-side
Tail-side
More on head-side
More on head-side
More on tail-side
More on tail-side
Right leg
Right leg
Left leg
Left leg
Bill construction
Bill construction
Preparation for 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
Wing construction
Load Eos
Load Eos