%% syntaxe : hauteur largeur extreme_bas quartile mediane 3emequartile
%% extremehaut diag_en_boite
/diag_en_boite {
8 dict begin
/extreme_haut exch def
/3quartile exch def
/mediane exch def
/quartile exch def
/extreme_bas exch def
/largeur exch def
/hauteur exch def
/fillstyle {blanc fill} def
%% les extremes
[
extreme_bas hauteur largeur sub
extreme_bas hauteur largeur add
] ligne
[
extreme_haut hauteur largeur sub
extreme_haut hauteur largeur add
] ligne
[
extreme_bas hauteur
extreme_haut hauteur
] ligne
%% la boite
quartile hauteur largeur sub
3quartile hauteur largeur add
frame*
%% la mediane
[
mediane hauteur largeur sub
mediane hauteur largeur add
] ligne
end
} def
|