Table des Matières
Publicité
DEG
0. 100. XRNG
0. 50. YRNG
ERASE
(5., 2.5) (95., 47.5) BOX
(50., 50.) 10. 0. 360. ARC
(50., 50.) 12. –180. 180. ARC
1 8 FOR j
(50., 50.) DUP
'12*COS(45*(j-1))'
'12*SIN(45*(j-1))'
R
C
+
LINE
NEXT
{ } PVIEW
»
Exemple 2 - Un programme permettant de tracer une vue en coupe d'une rivière
naturelle
Cette application peut être utile pour déterminer la zone et le périmètre
inondable des vues de coupe des rivières. Habituellement, on observe la vue de
coupe d'une rivière ainsi qu'une série de points, représentant les coordonnées
x et y par rapport à un jeu arbitraire d'axes de coordonnées. Ces points
peuvent être tracés et on peut produire un schéma de la vue de coupe pour une
profondeur d'eau donnée. Le schéma ci-dessous illustre cet exemple.
Le programme, disponible sur la disquette ou le CD-ROM fourni avec la
calculatrice, utilise quatre sous-programmes : FRAME, DXBED, GTIFS et INTRP.
Le programme principal, appelé XSECT, accepte en entrée une matrice de
valeurs de x et de y et l'élévation de surface Y (voir le schéma ci-dessus), dans
cet ordre. Le programme produit un graphique représentant une vue en coupe
et indiquant les données d'entrée à l'aide de points sur le graphique; la surface
libre est représentée en coupe.
NUM
NUM
Sélectionnez les degrés pour les
mesures angulaires
Définissez la plage x
Définissez la plage y
Effacez l'image
Tracez une zone de (5,5) à (95,95)
Dessinez le centre du cercle (50,50), r
=10.
Dessinez le centre du cercle (50,50), r=
12.
Dessinez 8 lignes dans le cercle
Les lignes sont centrées sur (50,50)
Calculez x, l'autre extrémité à
50 + x
Calculez y, l'autre extrémité à
50 + y
Convertit x y en (x,y), un nombre
complexe
Ajoutez (50,50) à (x,y)
Tracez la ligne
Fin de la boucle FOR
Affichez l'image
Page. 22-26
Publicité
Table des Matières
