Présentation de 8945.jps

%% auteur : 



100 setxyrapport
36 setxunit
7.5 setborder
90 setangle_repere
-1 11 setxrange
-100 600 setyrange


traceOx
axeOxarrow
/f</span> {setxvar
#rpn#   x*(</span>22-2*x)</span>*(</span>18-2*x)</span>
} def</span>
/fillstyle</span> {0.9 0.9 0.9 setrgbcolor</span> fill</span>} def</span> 0 9 {f} Fillcourbe 

0 9 {f} Fillcourbe