%% auteur : 

-1.5 1.5 setxrange
-0.7 1.1 setyrange

100 setxunit

%/A{-0.5 0.1} def
%/B{-0.2 0.8} def
%[A B] (<-) ligne



<latex>
$ka-kb=k(a-b)$
</latex>
0 0 [3 dup] cctexlabel
<tex>
On factorise
</tex>

/dx_boxit 3 def
/dy_boxit 3 def
/linearc .05 def
/fillstyle {jaune fill} def
boxit
0 0.7 [2 dup] cctexlabel



<tex>
Produit
</tex>

/dx_boxit 3 def
/dy_boxit 3 def
/linearc .05 def
/fillstyle {jaune fill} def
boxit
0.7 -0.3 [1.5 dup] cctexlabel


<tex>
Différence
</tex>

/dx_boxit 3 def
/dy_boxit 3 def
/linearc .05 def
/fillstyle {jaune fill} def
boxit
-0.7 -0.3 [1.5 dup] cctexlabel