Home

 Logithèque

TI81

Grapheur 3D


Code

5->A

2->Arow

A+1->Acol

ClrDraw

(Xmax-Xmin)/A->B

(Ymax-Ymin)/8->C

Ymin->F

Lbl 1

Xmin->E

1->D

Lbl 2

E->X

F->Y

PrgmX

.1Ans->Z

(X-Xmin)/(Xmax-Xmin)->X

(Y-Ymin)/(Ymax-Ymin))->Y

((X+Y-.5)(Xmax-Xmin)+Xmin)/2->G

((X-Y+.5+Z)(Ymax-Ymin)+Ymin)/2->H

If E>Xmin

Line([A](1,D-1),[A](2,D-1),G,H)

If F>Ymin

Line([A](1,D),[A](2,D),G,H)

G->[A](1,D)

H->[A](2,D)

D+1->D

E+B->E

If E<=Xmax

Goto 2

F+C->F

If F<=Ymax

Goto 1

(250 octets).


Mode d'emploi

Définir le PrgmX pour qu'il calcule la fonction à partir de X et Y. La valeur renvoyée est récupérée depuis Ans : tout algorithme est possible dans ce programme (même une saisie utilisateur !!).

Lancer le programme 3D.

Le graphe 3D de la fonction f(x,y) est affiché.

On peut changer le nombre de subdivisions du graphe en ligne 1 (maximum 6).

Normalement le graphe est plutôt indépendant du range, mais il est préférable de revenir au Range standard.


Mathématiques à l'oeuvre

Il s'agit d'une projection.

Quelques fonctions que l'on peut placer dans le programme "PrgmX" sont (SQR symbolise la racine carrée) :

3sin(.7 SQR(X^2+Y^2))

2sin(X-Y)

2XY/SQR(2X^2+Y^2)

(X-Y)/(X+Y)

X^3/40-X-Y^2/4

IPart((X+Y)/3)-IPart((X+Y+.5)/3)

On peut aussi tracer des polaires en programmant le PrgmX ainsi :

Pol(X,Y)->R

J->T

PrgmY

Et on définit la fonction g(r,t) dans le PrgmY. On peut y mettre par exemple une des fonctions suivantes :

2-8/R

2sin2R

.07R(9-R^2)-.4

Abs(R-1)-Abs(R-2)-Abs(R-3)+Abs(R-4)

.2R(R-3)(R-6)

R/T

Rsin4T