Return to kluwer CVS log

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

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

1.1     ! root        1: |environment(tc_heading;
        !             2: clear string EH OH PH,
        !             3: new.page odd, tab.stops \nWuR,
        !             4: divert.string Ts;
        !             5: inline off, size +4, font.family helvetica, center on,
        !             6: font bold, string Ts, font roman,
        !             7: center off, font.family times, size -4, inline on,
        !             8: minimum.lines,
        !             9: clear string Rs,
        !            10: contents section 1 Rs Ts,
        !            11: set string EH "\(ts\s9\\nP\(ts\(ts\f2",
        !            12: add string.from.string EH Ts,
        !            13: add string EH "\fP\s0\(ts",
        !            14: set string OH "\(ts\s9\f2",
        !            15: add string.from.string OH Ts,
        !            16: add string OH "\fP\(ts\(ts\\nP\s0\(ts")
        !            17: |environment(index_placement;
        !            18: clear string EH OH PH,
        !            19: new.page odd, spacing on, blank.lines 2i,
        !            20: set string Ts "INDEX", inline off,
        !            21: size +4, inline on, font.family helvetica, blank.lines .25i,
        !            22: tab.stops \nWuR,
        !            23: font bold, tab, string Ts, new.line,
        !            24: font roman, font.family times, size -4, inline on,
        !            25: minimum.lines 1.25i, paragraph,
        !            26: clear string Rs,
        !            27: contents section 1 Rs Ts,
        !            28: set string EH "\(ts\s9\\nP\(ts\(ts\f2",
        !            29: add string.from.string EH Ts,
        !            30: add string EH "\fP\s0\(ts",
        !            31: set string OH "\(ts\s9\f2",
        !            32: add string.from.string OH Ts,
        !            33: add string OH "\fP\(ts\(ts\\nP\s0\(ts",
        !            34: minimum.lines;)
        !            35: |environment(reference_placement;
        !            36: |ifvalue sawreference on [
        !            37: clear string EH OH PH,
        !            38: new.page odd, spacing on, blank.lines 2i,
        !            39: set string Ts "REFERENCES", inline off,
        !            40: size +4, inline on, font.family helvetica, blank.lines .25i,
        !            41: tab.stops \nWuR,
        !            42: font bold, tab, string Ts, new.line,
        !            43: font roman, font.family times, size -4, inline on,
        !            44: minimum.lines 1.25i, paragraph,
        !            45: clear string Rs,
        !            46: contents section 1 Rs Ts,
        !            47: set string EH "\(ts\s9\\nP\(ts\(ts\f2",
        !            48: add string.from.string EH Ts,
        !            49: add string EH "\fP\s0\(ts",
        !            50: set string OH "\(ts\s9\f2",
        !            51: add string.from.string OH Ts,
        !            52: add string OH "\fP\(ts\(ts\\nP\s0\(ts",
        !            53: reference.placement
        !            54: ];
        !            55: sawreference off)
        !            56: |environment(chapter;
        !            57: clear string EH OH PH,
        !            58: new.page odd, spacing on, blank.lines 2i,
        !            59: incr CH,
        !            60: clear S0 S1 S2
        !            61: S3,
        !            62: set string Ts "Chapter ",
        !            63: add string.from.number Ts CH,
        !            64: inline off, size +10, font.family helvetica,
        !            65: tab.stops \nWuR,
        !            66: tab, string Ts,
        !            67: divert.string Ts;
        !            68: sectioning bychapter,
        !            69: inline off, size +4, font.family helvetica, blank.lines .25i,
        !            70: tab.stops \nWuR,
        !            71: font bold, tab, string Ts, new.line,
        !            72: font roman, font.family times, size -4, inline on,
        !            73: minimum.lines 1.25i, paragraph,
        !            74: store string.from.number Rs CH,
        !            75: contents section 1 Rs Ts,
        !            76: set string EH "\(ts\s9\\nP\(ts\f2",
        !            77: add string.from.string EH Ts,
        !            78: add string EH "\(tsChapter ",
        !            79: add string.from.number EH CH,
        !            80: add string EH "\fP\s0\(ts",
        !            81: set string OH "\(ts\s9\f2Chapter ",
        !            82: add string.from.number OH CH,
        !            83: add string OH "\(ts",
        !            84: add string.from.string OH Ts,
        !            85: add string OH "\fP\(ts\\nP\s0\(ts")
        !            86: |environment(section;
        !            87: divert.string Ts;
        !            88: minimum.lines 2, protect, incr S0,
        !            89: clear S1 S2 S3,
        !            90: font bold,
        !            91: |ifvalue sectioning bychapter [
        !            92: number CH, text ".",
        !            93: ]
        !            94: |ifvalue sectioning byappendix [
        !            95: number AC, text ".",
        !            96: ]
        !            97: number S0,
        !            98: |ifvalue sectioning bysection [
        !            99: text ".",
        !           100: ]
        !           101: text " ", string Ts, font roman,
        !           102: paragraph,
        !           103: clear string Rs,
        !           104: |ifvalue sectioning bychapter [
        !           105: store string.from.number Rs CH,
        !           106: add string Rs ".",
        !           107: ]
        !           108: |ifvalue sectioning byappendix [
        !           109: store string.from.number Rs AC,
        !           110: add string Rs ".",
        !           111: ]
        !           112: add string.from.number Rs S0,
        !           113: |ifvalue sectioning bysection [
        !           114: contents section 1 Rs Ts,
        !           115: ]
        !           116: |ifvalue sectioning bychapter [
        !           117: contents section 2 Rs Ts,
        !           118: ]
        !           119: |ifvalue sectioning byappendix [
        !           120: contents section 2 Rs Ts,
        !           121: ]
        !           122: set string OH "\(ts\s9\f2Section ",
        !           123: |ifvalue sectioning bychapter [
        !           124: add string.from.number OH CH,
        !           125: add string OH ".",
        !           126: ]
        !           127: |ifvalue sectioning byappendix [
        !           128: add string.from.number OH AC,
        !           129: add string OH ".",
        !           130: ]
        !           131: add string.from.number OH S0,
        !           132: add string OH "\(ts",
        !           133: add string.from.string OH Ts,
        !           134: add string OH "\fP\(ts\\nP\s0\(ts")
        !           135: |environment(appendix;
        !           136: clear string EH OH PH,
        !           137: new.page odd, spacing on, blank.lines 2i,
        !           138: number format AC A, incr AC,
        !           139: clear S0 S1 S2
        !           140: S3,
        !           141: set string Ts "Appendix ",
        !           142: add string.from.number Ts AC,
        !           143: inline off, size +4, font.family helvetica,
        !           144: tab.stops \nWuR,
        !           145: font bold, tab, string Ts, font roman,
        !           146: divert.string Rs;
        !           147: sectioning byappendix,
        !           148: inline off, size +4, font.family helvetica, blank.lines .25i,
        !           149: tab.stops \nWuR,
        !           150: font bold, tab, string Rs, new.line,
        !           151: font roman, font.family times, size -4, inline on,
        !           152: minimum.lines 1.25i, paragraph,
        !           153: store string.from.number Rs AC,
        !           154: contents section 1 Rs Ts,
        !           155: set string EH "\(ts\s9\\nP\(ts\f2",
        !           156: add string.from.string EH Ts,
        !           157: add string EH "\(tsAppendix ",
        !           158: add string.from.number EH AC,
        !           159: add string EH "\fP\s0\(ts",
        !           160: set string OH "\(ts\s9\f2Appendix ",
        !           161: add string.from.number OH AC,
        !           162: add string OH "\(ts",
        !           163: add string.from.string OH Ts,
        !           164: add string OH "\fP\(ts\\nP\s0\(ts")
        !           165: |environment(unnumbered_chapter;
        !           166: clear string EH OH PH,
        !           167: new.page odd, spacing on, blank.lines 2i,
        !           168: divert.string Ts;
        !           169: sectioning bychapter,
        !           170: inline off, size +4, font.family helvetica, blank.lines .25i,
        !           171: tab.stops \nWuR,
        !           172: font bold, tab, string Ts, new.line,
        !           173: font roman, font.family times, size -4, inline on,
        !           174: minimum.lines 1.25i, paragraph,
        !           175: clear string Rs,
        !           176: contents section 1 Rs Ts,
        !           177: set string EH "\(ts\s9\\nP\(ts\(ts\f2",
        !           178: add string.from.string EH Ts,
        !           179: add string EH "\fP\s0\(ts",
        !           180: set string OH "\(ts\s9\f2",
        !           181: add string.from.string OH Ts,
        !           182: add string OH "\fP\(ts\(ts\\nP\s0\(ts")
        !           183: |environment(unnumbered_section;
        !           184: divert.string Ts;
        !           185: minimum.lines 2, protect, font bold,
        !           186: string Ts, font roman,
        !           187: paragraph,
        !           188: clear string Rs,
        !           189: |ifvalue sectioning bysection [
        !           190: contents section 1 Rs Ts,
        !           191: ]
        !           192: |ifvalue sectioning bychapter [
        !           193: contents section 2 Rs Ts,
        !           194: ]
        !           195: |ifvalue sectioning byappendix [
        !           196: contents section 2 Rs Ts,
        !           197: ]
        !           198: set string OH "\(ts\s9\f2",
        !           199: add string.from.string OH Ts,
        !           200: add string OH "\fP\(ts\(ts\\nP\s0\(ts")
        !           201: |environment(unnumbered_appendix;
        !           202: clear string EH OH PH,
        !           203: divert.string Ts;
        !           204: new.page odd, spacing on, blank.lines 2i,
        !           205: sectioning byappendix,
        !           206: inline off, size +4, font.family helvetica, blank.lines .25i,
        !           207: tab.stops \nWuR,
        !           208: font bold, tab, string Ts, new.line,
        !           209: font roman, font.family times, size -4, inline on,
        !           210: minimum.lines 1.25i, paragraph,
        !           211: clear string Rs,
        !           212: contents section 1 Rs Ts,
        !           213: set string EH "\(ts\s9\\nP\(ts\(ts\f2",
        !           214: add string.from.string EH Ts,
        !           215: add string EH "\fP\s0\(ts",
        !           216: set string OH "\(ts\s9\f2",
        !           217: add string.from.string OH Ts,
        !           218: add string OH "\fP\(ts\(ts\\nP\s0\(ts")
        !           219: |environment(:document;
        !           220: line.length 5i,
        !           221: page.length 9.5i,
        !           222: clear string EH OH PH, reference.option rp;)
        !           223: |environment(:document_save;
        !           224: ;)
        !           225: |environment(:document_restore;
        !           226: ;)
        !           227: |macro(top.of.page;
        !           228: [
        !           229: .deTP
        !           230: 'sp
        !           231: .af;P \\gP
        !           232: .afP 1
        !           233: .nr;P \\nP
        !           234: .afP \\g(;P
        !           235: .af;P 1
        !           236: 'sp2
        !           237: .if\\n(;P-1 .tl \\*(PH
        !           238: .if!\\n(;P%2 .tl \\*(EH
        !           239: .if\\n(;P%2 .tl \\*(OH
        !           240: 'sp.75i
        !           241: .rr;P
        !           242: ..
        !           243: ])

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