yönet‹m

Liste 9. Üç noktal› y›ld›z oluflturulmas›
$polygons = array();
// Front face
$polygons[] = array(
array(0, -120, 0), array(-18, -12, 0),
array(-86, 48, 0), array(0, 18, 0),
array(86, 48, 0), array(18, -12, 0)
);
// Back face
$polygons[] = array(
array(0, -120, 60), array(-18, -12, 60),
array(-86, 48, 60), array(0, 18, 60),
array(86, 48, 60), array(18, -12, 60)
);
// 3 Sides
$polygons[] = array(
array(0, -120, 0), array(-18, -12, 0),
array(-86, 48, 0), array(-86, 48, 60),
array(-18, -12, 60),array(0, -120, 60)
);
$polygons[] = array(
array(-86, 48, 0), array(0, 18, 0),
array(86, 48, 0), array(86, 48, 60),
array(0, 18, 60), array(-86, 48, 60)
);
$polygons[] = array(
array(86, 48, 0), array(18, -12, 0),
array(0, -120, 0), array(0, -120, 60),
array(18, -12, 60),array(86, 48, 60)
);
foreach ($polygons as $poly) {
$points = array();
foreach ($poly as $set) {
$points[] = new Image_3D_Point($set[0], $set[1], $set[2]);
}
$p = $world->createObject('polygon', $points);
$p->setColor(new Image_3D_Color(255, 255, 255));
}
$world->transform($world->createMatrix('Rotation',
array(0, -25, -15)));
de devreye girer. Hiç Calculus dersi almad›ysan›z
ya da bu konudaki bilgilerinizi
unuttuysan›z, bu yaz›da, körelmifl
becerilerinizi bilemeye çal›flmayaca-
¤›z. Ancak, afla¤›daki modellerde neler
olup bitti¤ine iliflkin temel bir fikir vermeye
çal›flaca¤›z.
Mathematica yaz›l›m›yla yüzeyleri
ve k›vr›mlar› tasarlama deneyiminiz
varsa, s›radaki iki örnek size tan›d›k
gelecektir.
Helezon
Bu iki listenin ilki yükselen bir sarmald›r.
Yüzeydeki her bir noktan›n, afla¤›-
daki parametrik fonksiyondan türeyen
X, Y ve Z koordinatlar› vard›r:
f[s,t] = {s * cos(2 t), s* sin(2 t),
t}
Bu yüzeyi yaratmak için, önce alan›n›zda
yeni bir "efllem" nesnesi yaratacaks›n›z.
$map = $world->createObject('map');
Efllem, yukar›daki özel çokgende
gördü¤ünüz gibi 3 boyutlu bir yüzey
oluflturmak için Image_3D_Point nesnelerinin
dizilimini al›r. Bu noktalar›n
her biri yukar›daki ifllevinize göre tan›mlanabilir:
new Image_3D_Point( ($s * cos(2 *
pi() * $t)),
($s * sin(2 * pi() * $t)),
($t) );
s ve t parametrelerini s›ras›yla 0-1
ve 0-6 aral›klar›nda de¤ifltireceksiniz.
Yüzeye uygun bir boyut vermek için,
her bir koordinat› $scale ayar›na atayaca¤›n›z
istedi¤iniz bir de¤erle çarpacaks›n›z.
Liste 10 içinde, efllem nesnesinin
nas›l oluflturuldu¤u gösterilir ve di¤er
örneklerde de oldu¤u gibi, nesnenin
son halinin rengini, döndürmesini ve
konumunu siz belirlersiniz
fiekil 13 içinde sonuçta ortaya ç›-
kan görüntü gösterilir. Helezonun ayr›nt›,
ölçek ve yükseklik düzeyleri
$scale, $detail ve $levels de¤iflkenleriyle
belirlenir.
fiekil 13. Image_3D
paketinin efllem
nesnesi kullan›larak
oluflturulmufl helezon.
Ortas› delik kek kal›b› flekli
Stokes teoreminin bir uygulamas› olan
ikinci yüzey integraliniz de ilginç bir
sonuç verir. Bu yüzeyi, Z ile ifade edilen
yüksekli¤i de¤iflken ve X ve Y düzlemlerinin
bafllang›ç noktas›ndan her
yöne yay›lan bir sinüs dalgas›n›n ürünü
olarak düflünebilirsiniz.
Calculus terimlerini bir yana b›rak›rsak,
bu fleklin ortas› delik bir kek kal›b›na
benzedi¤ini söyleyebiliriz.
Bu alan, afla¤›daki parametrik iflleve
göre tan›mlanacakt›r:
f[r,t] = {r * cos(t), r * sin(t), sin(4
r)}
Yine, bu yüzey için efllem nesnesine
eklenecek noktalar› iflaretleyeceksiniz.
Her nokta Liste 11'de tan›mlan›r.
Her bir noktay›, düzgün bir yüzey
HABER LINUX 57