crtanje

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

GZ[f][u, v]

6400/(289 + 111 Cos[2 v] + 78 Cos[2 u] Sin[v]^2)^2

SZ[f][u, v]

(5 (541 + 117 Cos[2 u]) Sin[v] + 15 (19 - 13 Cos[2 u]) Sin[3 v])/(2 2^(1/2) (289 + 111 Cos[2 v] + 78 Cos[2 u] Sin[v]^2) ((89 + 39 Cos[2 u]) Sin[v]^4 + 50 Sin[2 v]^2)^(1/2))

prvo[f][u, v][u0, u1, du][v0, v1, dv][]

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

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

(⁃Graphics3D⁃) &&Null

RowBox[{drugo[f][u, v][u0, u1, du][v0, v1, dv], [, RowBox[{RowBox[{PlotRange, , RowBox ... #960;}, {0, π/2, π, (3 π)/2, 2 π}, Automatic}, ,, PlotPoints100}], ]}]

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

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

(⁃SurfaceGraphics⁃) &&Null

trece[f][u, v][u0, u1, du][v0, v1, dv][AxesLabel {x, y, z}, AxesEdge {{-1, -1}, {1, -1}, {-1, -1}}]

[Graphics:../HTMLFiles/index_141.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][]

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

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

(⁃SurfaceGraphics⁃) &&Null

peto[f][u, v][u0, u1, du][v0, v1, dv][]

[Graphics:../HTMLFiles/index_149.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)