RosettaCodeData/Task/A+B/PostScript/a+b.ps

8 lines
102 B
PostScript

(%stdin) (r) file % get stdin
dup
token pop % read A
exch
token pop % read B
add
=