This file is indexed.

/usr/share/doc/texlive-doc/tpic2pdftex/example.pic is in texlive-extra-utils 2013.20140215-2.

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
119
120
121
122
123
124
125
126
%$Id: example.pic,v 1.19 2007/01/14 14:03:51 hahe Exp hahe $
%***********************************************************************
\pdfcompresslevel=0
\def\gpicbox#1{\vbox{\unvbox\csname #1\endcsname\kern0pt}}
\newcount\piccount\piccount=0
\def\sep{\advance\piccount by 1%
  \kern5pt\hrule\kern5pt\rlap{\smash{\lower10pt\hbox{\the\piccount}}}}
\sep
%***********************************************************************
% 1
.PS
box dotted thickness 1; arrow;
circle dotted 0.02 fill 0.1 "Hello"; arrowhead = 7; arrow; circle fill 0.1;
arrowhead = 2; arrow; circle fill 0.9; arrow; box dashed 0.1
.PE
\centerline{A\gpicbox{graph}B}
\sep
%***********************************************************************
% 2
.PS
ellipse; arrow;
\pdfliteral {q 1 0 0 RG}
ellipse dotted thickness 2;
\pdfliteral {Q}
arrow;
ellipse dashed "$\sqrt{3/7\cdot{2\over5}}$" "No.~2"; arrow;
\pdfliteral {q 0 0 1 RG}
\pdfliteral {  0.5 0.5 0.0 rg}
box rad 0.25 fill 0.05 "Hello"; arrow;
\pdfliteral {Q}
box dotted fill 0.2
.PE
\centerline{A\gpicbox{graph}B}
\sep
%***********************************************************************
% 3
.PS
line; arc; arc cw; line
.PE
\centerline{A\gpicbox{graph}B}
\sep
%***********************************************************************
% 4
.PS
spline right 1 then down .5 left 1 then right 1 ->;
line dashed right 1 then down .5 left 1 then right 1 -> at last spline
.PE
\centerline{A\gpicbox{graph}B}
\sep
%***********************************************************************
% 5
.PS
\pdfliteral {q 0 1 0 RG}
spline dashed right 1 then down .5 left 1 then down ->
\pdfliteral {Q}
line dotted 0.02 right 1 then down .5 left 1 then down -> at last spline
.PE
\centerline{A\gpicbox{graph}B}
\sep
%***********************************************************************
% 6
.PS
spline left then up right then down right ->
.PE
\centerline{A\vrule\gpicbox{graph}\vrule B}
\sep
%***********************************************************************
% 7
.PS
spline right then up then left then down ->
line dotted right then up then left then down -> at last spline
.PE
\centerline{A\gpicbox{graph}B}
\sep
%***********************************************************************
% 8
.PS
circle "x"
circle "y" at 1st circle - (0.4, 0.6)
circle "z" at 1st circle + (0.4, -0.6)
arrow from 1st circle to 2nd circle chop
arrow from 2st circle to 3rd circle chop
arrow from 3rd circle to 1st circle chop
.PE
\centerline{A\gpicbox{graph}B}
\sep
%***********************************************************************
% 9
% example borrowed from file cstr116.pdf or cstr116.ps:
% PIC --- A Graphics Language for Typesetting, User Manual,
% Brian W. Kernighan, Revised, May, 1991
.PS
define ndblock{
	box wid boxwid/2 ht boxht/2
	down; box same with .t at bottom of last box; box same
}
boxht = .2; boxwid = .3; circlerad = .3; dx = 0.05
down; box; box; box; box ht 3*boxht "." "." "."
L: box; box; box invis wid 2*boxwid "hashtab:" with .e at 1st box .w
right
Start: box wid .5 with .sw at 1st box.ne + (.4,.2) "..."
N1: box wid .2 "n1"; D1: box wid .3 "d1"
N3: box wid .4 "n3"; D3: box wid .3 "d3"
box wid .4 "..."
N2: box wid .5 "n2"; D2: box wid .2 "d2"
arrow right from 2nd box
ndblock
spline -> right .2 from 3rd last box then to N1.sw + (dx,0)
spline -> right .3 from 2nd last box then to D1.sw + (dx,0)
arrow right from last box
ndblock
spline -> right .2 from 3rd last box to N2.sw - (dx,.2) to N2.sw + (dx,0)
spline -> right .3 from 2nd last box to D2.sw - (dx,.2) to D2.sw + (dx,0)
arrow right 2* linewid from L
ndblock
spline -> right .2 from 3rd last box to N3.sw + (dx,0)
spline -> right .3 from 2nd last box to D3.sw + (dx,0)
circlerad=.3
circle invis "ndblock" at last box.e + (1.2,.2)
arrow dashed from last circle.w to last box chop 0 chop .3
box invis wid 2*boxwid "ndtable:" with .e at Start.w
.PE
\centerline{A\gpicbox{graph}B}
\sep
%***********************************************************************
\end