|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T t
Length: 1790 (0x6fe) Types: TextFile Names: »tpic-example-1.pic«
└─⟦52210d11f⟧ Bits:30007239 EUUGD2: TeX 3 1992-12 └─⟦af5ba6c8e⟧ »unix3.0/DVIWARE.tar.Z« └─⟦ca79c7339⟧ └─⟦this⟧ »DVIware/laser-setters/dvi-to-ps/TeXPS/doc/tpic-example-1.pic«
\def\ShowGraphBox#1{\par\hbox{#1:\qquad\vtop{\box\graph}}} % see "PIC --- A Graphics Language for Typesetting", page 23 .PS define Initialize X boxwid=0.75i; boxht=0.5i circlerad=0.25i ellipsewid=0.75i; ellipseht=0.5i arcrad=0.25i linewid=0.5i; lineht=0.5i movewid=0.5i; moveht=0.5i arrowwid=0.05i; arrowwht=0.1i dashwid=0.1i scale=1 X .PE .PS Initialize() define ndblock X box wid boxwid/2 ht boxht/2 down; box same with .t at bottom of last box; box same X boxht = .2i; boxwid = .3i; circlerad = .3i 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 .5i with .sw at 1st box.ne + (.4i,.2i) "..." N1: box wid .2i "n1"; D1: box wid .3i "d1" N3: box wid .4i "n3"; D3: box wid .3i "d3" box wid .4i "..." N2: box wid .5i "n2"; D2: box wid .2i "d2" arrow right from 2nd box ndblock spline -> right .2i from 3rd last box then to N1.sw + (0.05i,0) spline -> right .3i from 2nd last box then to D1.sw + (0.05i,0) arrow right from last box ndblock spline -> right .2i from 3nd last box then to N2.sw-(0.05i,.2i) to N2.sw+(0.05i,0) spline -> right .3i from 2nd last box then to D2.sw-(0.05i,.2i) to D2.sw+(0.05i,0) arrow right 2*linewid from L ndblock spline -> right .2i from 3rd last box to N3.sw + (0.05i,0) spline -> right .3i from 2nd last box to D3.sw + (0.05i,0) circle invis "ndblock" at last box.e + (.7i,.2i) arrow dotted from last circle to last box chop box invis wid 2*boxwid "ndtable:" with .e at Start.w .PE \ShowGraphBox{17.1}