Annotation of researchv10no/cmd/monk/db/envir.m, revision 1.1

1.1     ! root        1: |environment(roman;
        !             2:        font roman;)
        !             3:        |comment<summary: roman (alias for r)>
        !             4: 
        !             5: |environment(r;
        !             6:        font roman;)
        !             7:        |comment<summary: r (roman)>
        !             8: 
        !             9: |environment(italics;
        !            10:        font italics;)
        !            11:        |comment<summary: italics (alias for i)>
        !            12: 
        !            13: |environment(i;
        !            14:        font italics;)
        !            15:        |comment<summary: i (italics)>
        !            16: 
        !            17: |environment(bold;
        !            18:        font bold;)
        !            19:        |comment<summary: bold (alias for b)>
        !            20: 
        !            21: |environment(b;
        !            22:        font bold;)
        !            23:        |comment<summary: b (bold)>
        !            24: 
        !            25: |environment(bolditalics;
        !            26:        font bolditalics;)
        !            27:        |comment<summary: bolditalics (alias for bi)>
        !            28: 
        !            29: |environment(bi;
        !            30:        font bolditalics;)
        !            31:        |comment<summary: bi (bolditalics)>
        !            32: 
        !            33: |environment(constant_width;
        !            34:        font cw;)
        !            35:        |comment<summary: constant_width (alias for cw)>
        !            36: 
        !            37: |environment(cw;
        !            38:        font cw;)
        !            39:        |comment<summary: cw (constant width)>
        !            40: 
        !            41: |environment(here;
        !            42:        here on;)
        !            43:        |comment<summary: here (keep a block together on this page or start a new page)>
        !            44: 
        !            45: |environment(around;
        !            46:        around on;)
        !            47:        |comment<summary: around (keep a block together here or move it to the next page)>
        !            48: 
        !            49: |environment(around_placement;
        !            50:        ;
        !            51: 
        !            52:        around_placement)
        !            53:        |comment<summary: around_placement (output all arounds here)>
        !            54: 
        !            55: |environment(full;
        !            56:        around_width full, footnote_width full;)
        !            57:        |comment<summary: full (use the whole page for footnotes and arounds)>
        !            58: 
        !            59: |environment(narrow;
        !            60:        around_width narrow, footnote_width narrow;)
        !            61:        |comment<summary: narrow (use just this column for footnotes and arounds)>
        !            62: 
        !            63: |associate(blank_space;;;
        !            64: 
        !            65:        [$;
        !            66:                spacing on, blank.lines $;]
        !            67:        [;
        !            68:                spacing on, blank.lines 1;])
        !            69:        |comment<summary: blank_space (leave this much blank space)>
        !            70: 
        !            71: |associate(new_page;;;
        !            72: 
        !            73:        [1;
        !            74:                spacing on, new.page;]
        !            75:        [2;
        !            76:                spacing on, new.page, spacing on, new.page;]
        !            77:        [3;
        !            78:                spacing on, new.page, spacing on, new.page, spacing on, new.page;]
        !            79:        [4;
        !            80:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !            81:                spacing on, new.page;]
        !            82:        [5;
        !            83:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !            84:                spacing on, new.page, spacing on, new.page;]
        !            85:        [6;
        !            86:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !            87:                spacing on, new.page, spacing on, new.page, spacing on, new.page;]
        !            88:        [7;
        !            89:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !            90:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !            91:                spacing on, new.page;]
        !            92:        [8;
        !            93:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !            94:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !            95:                spacing on, new.page, spacing on, new.page;]
        !            96:        [9;
        !            97:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !            98:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !            99:                spacing on, new.page, spacing on, new.page, spacing on, new.page;]
        !           100:        [10;
        !           101:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           102:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           103:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           104:                spacing on, new.page;]
        !           105:        [11;
        !           106:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           107:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           108:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           109:                spacing on, new.page, spacing on, new.page;]
        !           110:        [12;
        !           111:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           112:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           113:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           114:                spacing on, new.page, spacing on, new.page, spacing on, new.page;]
        !           115:        [13;
        !           116:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           117:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           118:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           119:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           120:                spacing on, new.page;]
        !           121:        [14;
        !           122:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           123:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           124:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           125:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           126:                spacing on, new.page, spacing on, new.page;]
        !           127:        [15;
        !           128:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           129:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           130:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           131:                spacing on, new.page, spacing on, new.page, spacing on, new.page,
        !           132:                spacing on, new.page, spacing on, new.page, spacing on, new.page;]
        !           133:        [;
        !           134:                spacing on, new.page;])
        !           135:        |comment<summary: new_page (skip to the next next page)>
        !           136: 
        !           137: |associate(column_style; column next;;
        !           138: 
        !           139:        [width $;;
        !           140:                column width $]
        !           141:        [offset $;;
        !           142:                column offset $])
        !           143:        |comment<summary: column_style (width, offset)>
        !           144: 
        !           145: |associate(new_column;;;
        !           146: 
        !           147:        [$;;
        !           148:                column old $]
        !           149:        [;;
        !           150:                column new])
        !           151:        |comment<summary: new_column (skip to the next column)>
        !           152: 
        !           153: |environment(indent;
        !           154:        indent +3;)
        !           155:        |comment<summary: indent (indent by standard amount)>
        !           156: 
        !           157: |environment(center;
        !           158:        center on;)
        !           159:        |comment<summary: center (center each line)>
        !           160: 
        !           161: |environment(center_block;
        !           162:        fill off, center.block on;)
        !           163:        |comment<summary: center_block (center all lines as a block)>
        !           164: 
        !           165: |environment(small;
        !           166:        size -1;)
        !           167:        |comment<summary: small (reduce the point size)>
        !           168: 
        !           169: |environment(s;
        !           170:        size -1;)
        !           171:        |comment<summary: s (alias for small)>
        !           172: 
        !           173: |environment(big;
        !           174:        size +1;)
        !           175:        |comment<summary: big (increase point size)>
        !           176: 
        !           177: |environment(u;
        !           178:        underline on;)
        !           179:        |comment<summary: u (underline)>
        !           180: 
        !           181: |environment(underline;
        !           182:        underline on;)
        !           183:        |comment<summary: underline (alias for u)>
        !           184: 
        !           185: |environment(quotation;
        !           186:        indent +.5i, line.length -.5i, line.spacing 1;
        !           187: 
        !           188:        line.length +.5i, new.line)
        !           189:        |comment<summary: quotation (indent left and right)>
        !           190: 
        !           191: |environment(verbatim;
        !           192:        verbatim on, file.information, line.spacing 1, fill off;)
        !           193:        |comment<summary: verbatim (text exactly as it is)>
        !           194: 
        !           195: |environment(text;
        !           196:        fill on;)
        !           197:        |comment<summary: text (fill the text)>
        !           198: 
        !           199: |environment(left_adjust;
        !           200:        adjust left;)
        !           201:        |comment<summary: left_adjust (left adjust the text)>
        !           202: 
        !           203: |associate(left_center_right;
        !           204: 
        !           205:        set string temporary_string "`";
        !           206: 
        !           207:        title temporary_string;
        !           208: 
        !           209:        [$;
        !           210:                add string temporary_string $, add string temporary_string "`";])
        !           211:        |comment<summary: left_center_right (left justify, center, right justify a line>
        !           212: 
        !           213: |environment(footnote;
        !           214:        size -2, vertical.motion -.4m,
        !           215:        number ++ footnote_counter, vertical.motion +.4m, space -2, line.spacing 1,
        !           216:        footnote on, indent 0.2i, indent.line -0.2i,
        !           217:        number footnote_counter, text ".", horizontal.motion "|0.2i";
        !           218: 
        !           219:        SPACE)
        !           220:        |comment<summary: footnote (numbered footnote)>
        !           221: 
        !           222: |environment(unnumbered_footnote;
        !           223:        size -2, space -2, line.spacing 1,
        !           224:        footnote on, indent 0.2i;
        !           225: 
        !           226:        SPACE)
        !           227:        |comment<summary: unnumbered_footnote (unnumbered footnote)>
        !           228: 
        !           229: |environment(dagnote;
        !           230:        size -2, vertical.motion -.4m,
        !           231:        text "\(dg", vertical.motion +.4m, space -2, line.spacing 1,
        !           232:        footnote on, indent 0.2i, indent.line -0.2i,
        !           233:        text "\(dg", horizontal.motion "|0.2i";
        !           234: 
        !           235:        SPACE)
        !           236:        |comment<summary: dagnote (footnote marked with a dagger)>
        !           237: 
        !           238: |environment(authordagnote;
        !           239:        size -2, space -2, line.spacing 1,
        !           240:        footnote on, indent 0.2i, indent.line -0.2i,
        !           241:        text "\(dg", horizontal.motion "|0.2i";
        !           242: 
        !           243:        SPACE)
        !           244:        |comment<summary: authordagnote (footnote marked with a dagger for author names)>
        !           245: 
        !           246: |environment(starnote;
        !           247:        size -2, vertical.motion -.4m,
        !           248:        text "\(**", vertical.motion +.4m, space -2, line.spacing 1,
        !           249:        footnote on, indent 0.2i, indent.line -0.2i,
        !           250:        text "\(**", horizontal.motion "|0.2i";
        !           251: 
        !           252:        SPACE)
        !           253:        |comment<summary: starnote (footnote marked with a star)>
        !           254: 
        !           255: |environment(endnote;
        !           256:        size -2, vertical.motion -.4m,
        !           257:        number ++ endnote_counter, vertical.motion +.4m, size +2,
        !           258:        append.output on endnote_output,
        !           259:        |ifvalue sawendnote on [
        !           260:                minimum.lines,
        !           261:        ]
        !           262:        indent.line 3, number endnote_counter, text ". ";
        !           263: 
        !           264:        sawendnote on)
        !           265:        |comment<summary: endnote (numbered endnote)>
        !           266: 
        !           267: |environment(endnote_placement;
        !           268:        |ifvalue sawendnote on [
        !           269:                new.page,
        !           270:                set string temporary_string "NOTES",
        !           271:                inline off, size +1, center on,
        !           272:                font bold, string temporary_string, font roman,
        !           273:                center off, size -1, inline on,
        !           274:                minimum.lines,
        !           275:                clear string remember_string,
        !           276:                contents section 1 remember_string temporary_string,
        !           277:                line.spacing 1, macro endnote_output
        !           278:        ];
        !           279: 
        !           280:        sawendnote off)
        !           281:        |comment<summary: endnote_placement (produce endnotes here)>
        !           282: 
        !           283: |environment(notation;
        !           284:        minimum.lines, fill off;
        !           285: 
        !           286:        minimum.lines)
        !           287:        |comment<summary: notation (notation)>
        !           288: 
        !           289: |environment(approved;
        !           290:        minimum.lines 2, text bold "Approval:  ", blank.lines 3,
        !           291:        line 3.5i, tab.stops 1.5iC, new.line, tab;
        !           292: 
        !           293:        tab, minimum.lines)
        !           294:        |comment<summary: approved (approved)>

unix.superglobalmegacorp.com

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