/usr/share/lout/include/tabf.lpg is in lout-common 3.39-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 | %%BeginResource: procset LoutTabPrependGraphic
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %
% PostScript @SysPrependGraphic file for @Tab %
% %
% This file has been placed in the public domain %
% by its author, Jeffrey H. Kingston %
% %
% To assist in avoiding name clashes, the names %
% of all these symbols begin with "ltab". %
% %
% Jeffrey H. Kingston %
% 24 September 1991 %
% 22 December 1992 %
% %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% linewidth ltabhs -
% horizontal single line
/ltabhs
{ 0 0 moveto xsize 0 lineto
setlinewidth 0 setlinecap stroke
} def
% linewidth ltabhsp -
% horizontal single line with projecting ends
/ltabhsp
{ 0 0 moveto xsize 0 lineto
setlinewidth 2 setlinecap stroke
} def
% linewidth ltabhd -
% horizontal double line
/ltabhd
{ dup dup
0 0 moveto xsize 0 lineto
0 exch 3 mul moveto xsize exch 3 mul lineto
setlinewidth 0 setlinecap stroke
} def
% linewidth ltabhdb -
% horizontal double line below mark
/ltabhdb
{ dup dup
0 0 moveto xsize 0 lineto
0 exch -3 mul moveto xsize exch -3 mul lineto
setlinewidth 0 setlinecap stroke
} def
% linewidth ltabhdnw -
% horizontal double line with northwest corner
/ltabhdnw
{ dup dup dup dup
0 0 moveto xsize 0 lineto
xsize exch 3 mul moveto
-3 mul exch 3 mul lineto
-3 mul 0 lineto
setlinewidth 0 setlinejoin 2 setlinecap stroke
} def
% linewidth ltabhdne -
% horizontal double line with northeast corner
/ltabhdne
{ dup dup dup dup
0 0 moveto xsize 0 lineto
0 exch 3 mul moveto
3 mul xsize add exch 3 mul lineto
3 mul xsize add 0 lineto
setlinewidth 0 setlinejoin 2 setlinecap stroke
} def
% linewidth ltabhdsw -
% horizontal double line with southwest corner
/ltabhdsw
{ dup dup dup dup
0 0 moveto xsize 0 lineto
xsize exch -3 mul moveto
-3 mul exch -3 mul lineto
-3 mul 0 lineto
setlinewidth 0 setlinejoin 2 setlinecap stroke
} def
% linewidth ltabhdse -
% horizontal double line with southeast corner
/ltabhdse
{ dup dup dup dup
0 0 moveto xsize 0 lineto
0 exch -3 mul moveto
3 mul xsize add exch -3 mul lineto
3 mul xsize add 0 lineto
setlinewidth 0 setlinejoin 2 setlinecap stroke
} def
% linewidth ltabvs -
% vertical single line
/ltabvs
{ 0 0 moveto 0 ysize lineto
setlinewidth 0 setlinecap stroke
} def
% linewidth ltabvd -
% vertical double line
/ltabvd
{ dup dup
0 0 moveto 0 ysize lineto
-3 mul 0 moveto -3 mul ysize lineto
setlinewidth 0 setlinecap stroke
} def
% linewidth ltabvdr -
% vertical double line to right of mark
/ltabvdr
{ dup dup
0 0 moveto 0 ysize lineto
3 mul 0 moveto 3 mul ysize lineto
setlinewidth 0 setlinecap stroke
} def
%%EndResource
|