Source PostScript (stepto.pps)

Retour Texte non formaté
%% syntaxe : x1 x2 s stepto --> x1 x1+s x1+2s ... x1+ns, avec x1+(n+1)s>=x2 /stepto { 4 dict begin /step exch def /fin exch def /deb exch def /i 0 def fin deb sub step div truncate 1 add cvi { deb step i mul add /i i 1 add store } repeat end } def