Return to centerpb CVS log

Up to [Research Unix] / researchv10no / cmd / monk / db

Annotation of researchv10no/cmd/monk/db/centerpb, revision 1.1

1.1     ! root        1: |environment(date;
        !             2: divert.string DT;)
        !             3: |environment(titlebox;
        !             4: new.line, spacing on, goto .75i,
        !             5: indent.line +6.0i, string LO, new.line,
        !             6: indent.line +6.5i, string DT,
        !             7: goto 9.75i, page.offset 2.625i, line.length 2.625i, center on,
        !             8: text "AT&T \(em PROPRIETARY", new.line,
        !             9: text "Use pursuant to Company Instructions", new.line,
        !            10: center off;)
        !            11: |environment(laboratory;
        !            12: goto .5i;
        !            13: size 8, space 8,
        !            14: tab.stops "\w'\s-1\f3\&9999\fP\s+1\& 'u +\w'# 'u +\w'Papathomas,T.V. (\f2\&Thomas\fP\&) 'u +\w'maureen 'u",
        !            15: line.length 8.5, column on)
        !            16: |environment(laboratory_title;
        !            17: inline off, font bold, size 12, space 14, center on;
        !            18: minimum.lines .5)
        !            19: |associate(employee;
        !            20: clear string N0 N1 N2 N4
        !            21: N3 N5;
        !            22: size -1, string bold N2, size +1, tab,
        !            23: string N5, tab,
        !            24: string N0, text " (",
        !            25: string italics N1, text ")", tab,
        !            26: string N4, tab,
        !            27: size -1, string bold N3, size +1, new.line;
        !            28: [name $;
        !            29: set string N0 $;]
        !            30: [nicname $;
        !            31: set string N1 $;]
        !            32: [phone $;
        !            33: set string N2 $;]
        !            34: [room $;
        !            35: set string N3 $;]
        !            36: [email $;
        !            37: set string N4 $;]
        !            38: [secretary;
        !            39: set string N5 "$";]
        !            40: [casual;
        !            41: set string N5 "*";]
        !            42: [consultant;
        !            43: set string N5 "%";]
        !            44: [contractor;
        !            45: set string N5 "{";]
        !            46: [intern;
        !            47: set string N5 "!";]
        !            48: [limited term;
        !            49: set string N5 "<";]
        !            50: [post doc;
        !            51: set string N5 ">";]
        !            52: [resident visitor;
        !            53: set string N5 "#";]
        !            54: [temporary;
        !            55: set string N5 "+";]
        !            56: [mit coop;
        !            57: set string N5 "}";]
        !            58: [department 45266;
        !            59: set string N5 "\s-1\&@\s+1\&";])
        !            60: |environment(department_title;
        !            61: inline off, font bold, center on;
        !            62: minimum.lines .5)
        !            63: |environment(department;
        !            64: here on, minimum.lines 1.5;)
        !            65: |associate(room;
        !            66: clear string N0 N2 N3 N4;
        !            67: size -1, string bold N2, size +1, tab, tab,
        !            68: string N0, tab,
        !            69: string N4, tab,
        !            70: size -1, string bold N3, size +1, new.line;
        !            71: [name $;
        !            72: set string N0 $;]
        !            73: [phone $;
        !            74: set string N2 $;]
        !            75: [room $;
        !            76: set string N3 $;]
        !            77: [email $;
        !            78: set string N4 $;])
        !            79: |environment(:document;
        !            80: page.offset 0.0i,
        !            81: column 1 2.625i 0.0i, column 2 2.625i 2.6875i, column 3 2.625i 5.3125i,
        !            82: tab.stops "\w'\s-1\f3\&9999\fP\s+1\& 'u +\w'# 'u +\w'Flanagan,J.L. (\f2\&Jim\fP\&)  'u +\w'june  'u",
        !            83: fill off;)
        !            84: |environment(:document_save;
        !            85: ;)
        !            86: |environment(:document_restore;
        !            87: ;)

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