DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download
Index: T t

⟦c5d0d2530⟧ TextFile

    Length: 1790 (0x6fe)
    Types: TextFile
    Names: »tpic-example-1.pic«

Derivation

└─⟦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« 

TextFile

\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}