Return to centerpb CVS log

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

Annotation of researchv10no/cmd/monk/o.db/centerpb, revision 1.1.1.1

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

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