Essays/Isometric Surfaces/Isometric Surfaces02

Isometric Surfaces

...

... the surfaces can be viewed from the top for the purpose of visualization ...

...

load 'plot'
load 'numeric'

u1=:steps 0 6 30
u2=:steps 0 2p1 30

p=:1

y1=:u1(%:@(*:@[+p*p"_)*/2&o.@])u2
y2=:u1(%:@(*:@[+p*p"_)*/1&o.@])u2
y3=:u1((p*_6&o.@(p%~%:@(*:@[+p*p"_)))*/$@]$1:)u2

pd 'type surface'
pd 'viewpoint 0.1 0 100'
pd y1;y2;y3
pd 'pdf'
pd 'show'

load 'plot'
load 'numeric'

u1=:steps 0 6 30
u2=:steps 0 2p1 30

p=:1

y1=:u1([*/2&o.@])u2
y2=:u1([*/1&o.@])u2
y3=:u1(($@[$1:)*/p*])u2

pd 'type surface'
pd 'viewpoint 0.1 0 100'
pd y1;y2;y3
pd 'pdf'
pd 'show'

---

Download: File:LIS0200C.txt

---

---

Download MoinMoin source: File:IsometricSurfaces02.ijs

---

---

Prev Page: Essays/Isometric Surfaces/Isometric Surfaces01

---