torsion.mws

torsion- torze prostorové křivky

Calling Sequence

torsion (X(t),t)

torsion ([x(t), y(t), z(t)],t)

Parameters

X(t)  vektorová funkce popisující křivku v Euklidovském prostoru  3D ( X(t) = [x(t), y(t), z(t)] ). .

    t    parametr křivky

Description

Examples

Nejprve je třeba nastavit cestu, kde máte uloženou knihovnu "diffgeometry", např

>    restart;

>    libname:=libname,"D:/Sarka/Maple/diffgeometry/libsarka";

libname :=

>    with(diffgeometry):

V rovině zadáme parametricky  šroubovici.

>    k:=[2*cos(t),2*sin(t),t];

k := [2*cos(t), 2*sin(t), t]

Počítáme funkce křivosti. -Šroubovice je křivka konstantní křivosti i konstantní torze

>    torze:=torsion(k,t);

torze := 1/5

 Torze rovinných křivek je ve všech bodech nulová:

>    torze2:=torsion([4*cos(t), 4*sin(t)],t);

`Torze rovinných křivek je 0.`

torze2 := 0

Torzi kuželové šroubovice graficky znázorníme grafem funkce, nebo délkou hlavní normály

>    k:=[2*t*cos(t),2*t*sin(t),t];
torze:=torsion(k,t);
plots[tubeplot](k,t=0..3*Pi,radius=0.3,axes=normal);
plot(torze,t=0..2*Pi);

k := [2*t*cos(t), 2*t*sin(t), t]

torze := (t^2+6)/(20+4*t^4+17*t^2)

[Maple Plot]

[Maple Plot]