psfig.tmac revision 1.1.1.1
psfig.tmac
These are macros to make psfig work with groff.
They require that psfig be patched as described in ../grops/psfig.diff.
ps: mdef 100 % wid ht llx lly urx ury psfigstart - /psfigstart { /level1 save def /ury exch def /urx exch def /lly exch def /llx exch def /ht exch u def /wid exch u def currentpoint ht add translate wid urx llx sub div ht ury lly sub div neg scale llx neg lly neg translate % set the graphics state to default values 0 setgray 0 setlinecap 1 setlinewidth 0 setlinejoin 10 setmiterlimit [] 0 setdash newpath /showpage {} def } bind def % psfigclip - /psfigclip { currentpoint newpath llx lly moveto urx lly lineto urx ury lineto llx ury lineto closepath clip newpath moveto } bind def % psfigend - /psfigend { level1 restore } bind def % globalstart - /globalstart { % save the current space code on the stack SC level0 restore } bind def % globalend - /globalend { end BP /SC exch def DEFS begin } bind def .. \Y[psfig-defs] . br . sp -1 . ds psfig-init\" empty . rm psfig-defs .\} ..
These are macros to make psfig work with groff.
They require that psfig be patched as described in ../grops/psfig.diff.
ps: mdef 100 % wid ht llx lly urx ury psfigstart - /psfigstart { /level1 save def /ury exch def /urx exch def /lly exch def /llx exch def /ht exch u def /wid exch u def currentpoint ht add translate wid urx llx sub div ht ury lly sub div neg scale llx neg lly neg translate % set the graphics state to default values 0 setgray 0 setlinecap 1 setlinewidth 0 setlinejoin 10 setmiterlimit [] 0 setdash newpath /showpage {} def } bind def % psfigclip - /psfigclip { currentpoint newpath llx lly moveto urx lly lineto urx ury lineto llx ury lineto closepath clip newpath moveto } bind def % psfigend - /psfigend { level1 restore } bind def % globalstart - /globalstart { % save the current space code on the stack SC level0 restore } bind def % globalend - /globalend { end BP /SC exch def DEFS begin } bind def .. \Y[psfig-defs] . br . sp -1 . ds psfig-init\" empty . rm psfig-defs .\} ..
.nr psfig-fill \\n[.u]
..
0 ..