You are using a browser not supported by the Wolfram Cloud
Supported browsers include recent versions of Chrome, Edge, Firefox and Safari.
I understand and wish to continue anyway »
WOLFRAM NOTEBOOK
Flying Crane
Flying Crane
(c) 2023- Tetsuo Ida
Load Eos
Load Eos
In[]:=
<<EosLoader.wl
Eos3.7.4 (December 16,2023) running under Mathematica 13.3.1 for Linux x86 (64-bit) (July 24, 2023) on 21/12/2023 7:17 pm.
This version is effective until June 30,2024.
Extra
Extra
In[]:=
$pointLabelSize=10;(*$gap=0.001;*)$foldLineStyle={Blue,Thickness[(*0.02*)0.01]};MarkOff[];
In[]:=
Off[Ori::select];
In[]:=
SetOptions[ShowOrigami,ShowFrameTrue];
In[]:=
SetOptions[ShowLayeredFace,BaseView->False];
In[]:=
Inexact[];
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[]:=
$gap=0.05;
In[]:=
NewOrigami[16]
Flying crane/Origami: Step 1
Out[]=
Petal fold
Petal fold
Preparation for a petal fold
Preparation for a petal fold
In[]:=
VFold["DB"]
Flying crane/Origami: Step 2
Out[]=
In[]:=
HO["D","B",Mark->{{"DB","E"}}]
Flying crane/Origami: Step 3
Out[]=
In[]:=
HO["B","C",Mark->{{"DC","F4","F3","F2","F1"}}]!
Flying crane/Origami: Step 5
Out[]=
In[]:=
ShowLayeredFace[]
Flying crane/Origami: 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/Origami: Step 10
Out[]=
In[]:=
TurnOver["EF3"]
Flying crane/Origami: Step 11
Out[]=
In[]:=
ShowLayeredFace[Level->{1}]
Flying crane/Origami: Step 11
Out[]=
1,{8,9,10},
Squash fold leftwards on the back side
Squash fold leftwards on the back side
Preparation for constructing legs
Preparation for constructing legs
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
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
The above graphics of flying crane is copy - righted . (C) 2003 - , Tetsuo ImageData