- %!
- %%BoundingBox: 54 649 367 737
- %%Title: tclclass-static
- %%CreationDate: Wed Sep 3 14:55:35 1997
- %%Creator: Tgif-2.16-p12 by William Chia-Wei Cheng (william@cs.UCLA.edu)
- /tgifdict 36 dict def
- tgifdict begin
- /tgifarrowtipdict 8 dict def
- tgifarrowtipdict /mtrx matrix put
- /tgifarrowtip
- { tgifarrowtipdict begin
- /dy exch def
- /dx exch def
- /h exch def
- /w exch def
- /y exch def
- /x exch def
- /savematrix mtrx currentmatrix def
- x y translate
- dy dx atan rotate
- 0 0 moveto
- w neg h lineto
- w neg h neg lineto
- savematrix setmatrix
- end
- } def
- /tgifpatdict 10 dict def
- /tgifpatbyte
- { currentdict /retstr get exch
- pat i cellsz mod get put
- } def
- /tgifpatproc
- { 0 1 widthlim {tgifpatbyte} for retstr
- /i i 1 add def
- } def
- /tgifpatfill
- { tgifpatdict begin
- /h exch def
- /w exch def
- /lty exch def
- /ltx exch def
- /cellsz exch def
- /pat exch def
- /widthlim w cellsz div cvi 1 sub def
- /retstr widthlim 1 add string def
- /i 0 def
- ltx lty translate
- w h true [1 0 0 1 0 0] {tgifpatproc} imagemask
- ltx neg lty neg translate
- end
- } def
- /pat3 <8000000008000000> def
- /pat4 <8800000022000000> def
- /pat5 <8800220088002200> def
- /pat6 <8822882288228822> def
- /pat7 <aa55aa55aa55aa55> def
- /pat8 <77dd77dd77dd77dd> def
- /pat9 <77ffddff77ffddff> def
- /pat10 <77ffffff77ffffff> def
- /pat11 <7fffffff7fffffff> def
- /pat12 <8040200002040800> def
- /pat13 <40a00000040a0000> def
- /pat14 <ff888888ff888888> def
- /pat15 <ff808080ff080808> def
- /pat16 <f87422478f172271> def
- /pat17 <038448300c020101> def
- /pat18 <081c22c180010204> def
- /pat19 <8080413e080814e3> def
- /pat20 <8040201008040201> def
- /pat21 <8844221188442211> def
- /pat22 <77bbddee77bbddee> def
- /pat23 <c1e070381c0e0783> def
- /pat24 <7fbfdfeff7fbfdfe> def
- /pat25 <3e1f8fc7e3f1f87c> def
- /pat26 <0102040810204080> def
- /pat27 <1122448811224488> def
- /pat28 <eeddbb77eeddbb77> def
- /pat29 <83070e1c3870e0c1> def
- /pat30 <fefdfbf7efdfbf7f> def
- /pat31 <7cf8f1e3c78f1f3e> def
- end
- %%PageBoundingBox: 54 649 367 737
- tgifdict begin
- /tgifsavedpage save def
- 1 setmiterlimit
- 1 setlinewidth
- 0 setgray
- 72 0 mul 72 11.00 mul translate
- 72 128 div 100 mul 100 div dup neg scale
- gsave
- % TEXT
- 0 setgray
- /Helvetica-Bold findfont [20 0 0 -20 0 0] makefont setfont
- gsave
- 122 149 moveto (Object constructor) show
- 122 172 moveto () show
- 122 195 moveto (invoke TclClass) show
- 122 218 moveto (constructor) show
- grestore
- % BOX
- 0 setgray
- gsave
- 1.415 setmiterlimit
- 2 setlinewidth
- newpath
- 100 100 moveto 300 100 lineto 300 250 lineto 100 250 lineto
- closepath stroke
- 1 setlinewidth
- 1 setmiterlimit
- grestore
- % TEXT
- 0 setgray
- /Helvetica-Bold findfont [20 0 0 -20 0 0] makefont setfont
- gsave
- 457 147 moveto (TclClass constructor) show
- 457 170 moveto () show
- 457 193 moveto (build list of TclClass) show
- 457 216 moveto (instances) show
- grestore
- % BOX
- 0 setgray
- gsave
- 1.415 setmiterlimit
- 2 setlinewidth
- newpath
- 451 100 moveto 651 100 lineto 651 250 lineto 451 250 lineto
- closepath stroke
- 1 setlinewidth
- 1 setmiterlimit
- grestore
- % POLY/OPEN-SPLINE
- 0 setgray
- gsave
- 7 setlinewidth
- newpath
- 300 200 moveto
- 380 200 lineto
- 380 140 lineto
- 0 70 atan dup cos 22 mul 450 exch sub
- exch sin 22 mul 140 exch sub lineto
- stroke
- 1 setlinewidth
- grestore
- gsave
- newpath
- 450 140 22 9 70 0 tgifarrowtip
- 1 setgray closepath fill
- 0 setgray
- newpath
- 450 140 22 9 70 0 tgifarrowtip
- closepath fill
- grestore
- % POLY/OPEN-SPLINE
- 0 setgray
- gsave
- 7 setlinewidth
- newpath
- 450 230 moveto
- 0 -150 atan dup cos 22 mul 300 exch sub
- exch sin 22 mul 230 exch sub lineto
- 1 setgray stroke
- 1 setlinewidth
- 0 setgray
- 7 setlinewidth
- newpath
- 450 230 moveto
- 0 -150 atan dup cos 22 mul 300 exch sub
- exch sin 22 mul 230 exch sub lineto
- flattenpath strokepath clip newpath
- pat8 8 296 216 160 24 tgifpatfill
- 1 setlinewidth
- grestore
- gsave
- newpath
- 300 230 22 9 -150 0 tgifarrowtip
- 1 setgray closepath fill
- 0 setgray
- newpath
- 300 230 22 9 -150 0 tgifarrowtip
- closepath eoclip newpath
- pat8 8 296 216 32 24 tgifpatfill
- grestore
- grestore
- tgifsavedpage restore
- end
- %MatchingCreationDate: Wed Sep 3 14:55:35 1997