%% auteur : Abdallah BOUZAR 60 setxunit 7.5 setborder 90 setangle_repere -1 7 setxrange -1 3 setyrange traceaxes axesarrow marks /f {setxvar x 0.5 exp } def gsave noir 2 setlinewidth continu 0 7 {f} Courbe grestore /fillstyle {hachure} def 1.5 4.5 {f} Fillcourbe /A0 {1.5 0} def /A1 {4.5 0} def /B0 {1.5 1.5 0.5 exp} def /B1 {4.5 4.5 0.5 exp} def [A0 B0] ligne [A1 B1] ligne $a$ A0 [1.5 1.5]dctexlabel $b$ A1 [1.5 1.5]dctexlabel $\mathcal{C}_f$ 6 3 [1.5 1.5]dctexlabel D = Domaine d'intégration /dx_boxit 3 def /dy_boxit 3 def /linearc .05 def /fillstyle {jaune fill} def boxit 3 2.5 [2 dup] cctexlabel $D$ 3 1 [3 3]dctexlabel