Return to PC CVS log

Up to [Research Unix] / researchv10no / cmd / postscript / devpost / charlib

Annotation of researchv10no/cmd/postscript/devpost/charlib/PC, revision 1.1

1.1     ! root        1: %
        !             2: % UMDS pencil - needs to be cleaned up.
        !             3: %
        !             4: 
        !             5: /build_PC {
        !             6:     pop
        !             7:     gsave
        !             8:        currentpoint translate
        !             9:        1 scaling div ptsize 10 div mul dup scale
        !            10:        newpath
        !            11:        0 setlinecap
        !            12:        1 setlinejoin
        !            13:        2 setlinewidth
        !            14:        0 1 moveto 12 0 rlineto stroke
        !            15:        0 5 moveto 12 0 rlineto stroke
        !            16:        0 9 moveto 12 0 rlineto stroke
        !            17:        1 setlinewidth
        !            18:        12 .5 moveto 21.27362 5 lineto 12 9.5 lineto stroke
        !            19:        21.27362 5 moveto
        !            20:        .4 9.27362 mul neg .4 4 mul rlineto
        !            21:        0 .8 4 mul neg rlineto
        !            22:        closepath fill
        !            23:     grestore
        !            24: } def
        !            25: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.