Essays/Isometric Surfaces/Isometric Surfaces02
< Essays | Isometric Surfaces
Jump to navigation
Jump to search
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