Présentation de 012.jps

/syracuse/bbgraf/albums/coniques_02/012.jpg
%% auteur : gh 100 setxunit -2 2 setxrange -2.5 2.5 setyrange /O {0 0} def /a 0.8 def /b 1 def /c {a 2 exp b 2 exp add sqrt} def /F' {c neg 0} def /F {c 0} def /Dx {a 2 exp c div neg 0} def /Dx' {a 2 exp c div 0} def /D {Dx Dx 0 1 addv} def /D' {Dx' Dx' 0 1 addv} def /X {cosh a mul} def /X2 {cosh a mul neg} def /Y {sinh b mul} def traceaxes axesarrow 2 setlinewidth rouge -4 4 settrange {X} {Y} courbeparam {X2} {Y} courbeparam 1.2 setlinewidth continu bleu [F F'] points D droite D' droite setTimesItalic (F') F' dctext (F) F dctext (D') Dx 0 1.5 subv urtext (D) Dx' 0 1.5 subv urtext noir setTimesItalic (a) a 0 urtext (b) 0 b urtext (c) F uctext (-c) F' uctext <tex> $$ -{a^2 \over c} $$ </tex> Dx [1 1] drtexlabel <tex> $$ {a^2 \over c} $$ </tex> Dx' [1 1] dltexlabel vert O a b droite O a b neg droite <tex> $$ y={b \over a} x $$ </tex> O a 2 mul b 2 mul addv [1 1] ultexlabel <tex> $$ y=-{b \over a} x $$ </tex> O a 2 mul neg b 2 mul addv [1 1] urtexlabel