%% auteur : gh
150 setxunit
18 setfontsize
-1.5 1.5 setxrange
-1.5 1.5 setyrange
%% definition des fonctions
tracerepere
marks
/x {3 sqrt 2 div} def
/O {0 0} def
/M {x .5} def
/A {x 0} def
/B {0 0.5} def
/C {1 0.5 x div} def
/I {1 0} def
I C droite
2 setlinewidth
bleu
O 1 cercle
rouge
[M O] ligne
A O M .2 (-) tripointarc
<tex>
$$
\alpha
$$
</tex>
.2 .07 [2 2] crtexlabel
vert
[O A] ligne
[O B] ligne
[I C] ligne
1 setlinewidth
pointilles
[A M] ligne
[B M] ligne
[M C] ligne
<tex>
$$
\cos \alpha
$$
</tex>
.5 -.1 [2 2] cctexlabel
<tex>
$$
\sin \alpha
$$
</tex>
-.2 .2 [2 2] cctexlabel
<tex>
$$
\tan \alpha
$$
</tex>
1.1 .3 [2 2] crtexlabel
noir
setTimesItalic
(O) O drtext
|