crtanje

f[u_, v_] := {xuv[u, v], yuv[u, v], zuv[u, v]}

GZ[f][u, v]

-(4 Cos[u]^2)/(2 + v^2 + 2 Cos[2 u])^2

SZ[f][u, v]

(v Sin[u])/(2 + v^2 + 2 Cos[2 u])^(3/2)

RowBox[{prvo[f][u, v][u0, u1, du][v0, v1, dv], [, RowBox[{BoxedFalse, ,, AxesFalse, ,, RowBox[{ViewPoint, , RowBox[{{, RowBox[{1.3, ,, -1, ,, 2}], }}]}]}], ]}]

[Graphics:../HTMLFiles/index_315.gif]

Prikaz plohe f(u,v) u podrucju [ u , u ]×[ v , v ] 0 1 0 1

(⁃Graphics3D⁃) &&Null

drugo[f][u, v][u0, u1, du][v0, v1, dv][PlotPoints50]

[Graphics:../HTMLFiles/index_319.gif]

Graf funkcije Gussove zakrivljenosti plohe f(u,v) nad podrucjem [ u , u ]×[ v , v ] 0 1 0 1

(⁃SurfaceGraphics⁃) &&Null

RowBox[{trece[f][u, v][u0, u1, du][v0, v1, dv], [, RowBox[{BoxedFalse, ,, AxesFalse, ,, RowBox[{ViewPoint, , RowBox[{{, RowBox[{1.3, ,, -1, ,, 2}], }}]}]}], ]}]

1 Power :: infy : Infinite expression ---- encountered. More… 2 0.`

1 Power :: infy : Infinite expression ---- encountered. More… 2 0.`

[Graphics:../HTMLFiles/index_325.gif]

Prikaz plohe f(u,v) u podrucju [ u , u ]×[ v , v ] obojan bojom Hue(GZ) 0 1 0 1

(⁃Graphics3D⁃) &&Null

cetvrto[f][u, v][u0, u1, du][v0, v1, dv][PlotPoints50]

[Graphics:../HTMLFiles/index_329.gif]

Graf funkcije srednje zakrivljenosti plohe f(u,v) nad podrucjem [ u , u ]×[ v , v ] 0 1 0 1

(⁃SurfaceGraphics⁃) &&Null

RowBox[{peto[f][u, v][u0, u1, du][v0, v1, dv], [, RowBox[{BoxedFalse, ,, AxesFalse, ,, RowBox[{ViewPoint, , RowBox[{{, RowBox[{1.3, ,, -1, ,, 2}], }}]}]}], ]}]

1 Power :: infy : Infinite expression ------ encounter ... . More… 3/2 0.`

1 Power :: infy : Infinite expression ------ encounter ... . More… 3/2 0.`

[Graphics:../HTMLFiles/index_335.gif]

Prikaz plohe f(u,v) u podrucju [ u , u ]×[ v , v ] obojan bojom Hue(SZ) 0 1 0 1

(⁃Graphics3D⁃) &&Null

Created by Mathematica  (May 4, 2004)