Source PostScript (pathlongueurs.pps)

Retour Texte non formaté 

%% t path pathlongueurs -> l1 l2
/pathlongueurs {
   splitpath
   exch 
   pathpointstable longueur
   exch
   pathpointstable longueur
} def