Source
%% auteur : 

50 setxunit
%9.5 setborder
90 setangle_repere
-6 6 setxrange
-1 8 setyrange
1 1 settkstep
%.5 .5 setsubtkstep
1 1 setmkstep
ticks
subticks
marks
traceaxes
axesarrow
unites

/f {setxvar
   3 x exp
} def
-6 3 {f} Courbe


/g {setxvar
#rpn#   0.5^x
} def
-4 6 {g} Courbe

/h {setxvar
#rpn#   0.3^x
} def
-4 6 {h} Courbe

/k {setxvar
#rpn#   1.5^x
} def
-6 5 {k} Courbe


<latex>
$y=1,5^x$
</latex>
boxit
5 6 [1.3 dup] dctexlabel

<latex>
$y=3^x$
</latex>
boxit
2.5 8 [1.3 dup] dctexlabel

<latex>
$y=0,5^x$
</latex>
boxit
-3.5 6 [1.3 dup] dctexlabel

<latex>
$y=0,3^x$
</latex>
boxit
-1 8 [1.3 dup] dctexlabel