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

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.