Return to sh.me CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / usr.lib / me

Annotation of 43BSDTahoe/usr.lib/me/sh.me, revision 1.1.1.1

1.1       root        1: .nr _0 \n(c.
                      2: .\"    @(#)sh.me       2.6 (Berkeley) 5/21/88
                      3: .\"
                      4: .\" Copyright (c) 1988 Regents of the University of California.
                      5: .\" All rights reserved.
                      6: .\"
                      7: .\" Redistribution and use in source and binary forms are permitted
                      8: .\" provided that this notice is preserved and that due credit is given
                      9: .\" to the University of California at Berkeley. The name of the University
                     10: .\" may not be used to endorse or promote products derived from this
                     11: .\" software without specific prior written permission. This software
                     12: .\" is provided ``as is'' without express or implied warranty.
                     13: .\"    %beginstrip%
                     14: .\"
                     15: .de sh                 \" *** section heading
                     16: .fi
                     17: .if (\\n(si>0)&(\\n(si<1n) \
                     18: .      nr si \\n(sin
                     19: .ce 0
                     20: .@d "\\$1" +1 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8
                     21: .if !"\\$2"_" \
                     22: \{\
                     23: .      ds |n \&\\$2
                     24: .      $p "\\*(|n" "\\*($n" \\n($0
                     25: .      $0 "\\*(|n" "\\*($n" \\n($0
                     26: .      rm |n
                     27: .\}
                     28: .nr $p 0 1                     \" reset .np count
                     29: ..
                     30: .de @d                 \" --- change section depth
                     31: .if !""\\$1" \
                     32: .      nr $0 \\$1
                     33: .if \\n($0&(\\n(.$>1) \
                     34: .      nr $\\n($0 \\$2
                     35: .ds $n \&\"
                     36: .ie \\n($0>=1 \
                     37: \{\
                     38: .      if '\\n($1'0' \
                     39: .              nr $1 1
                     40: .      if (\\n(.$>=3) .if !"\\$3"-" \
                     41: .              nr $1 \\$3
                     42: .      as $n \\n($1
                     43: .\}
                     44: .el \
                     45: .      nr $1 0
                     46: .ie \\n($0>=2 \
                     47: \{\
                     48: .      if '\\n($2'0' \
                     49: .              nr $2 1
                     50: .      if (\\n(.$>=4) .if !"\\$4"-" \
                     51: .              nr $2 \\$4
                     52: .      as $n .\\n($2
                     53: .\}
                     54: .el \
                     55: .      nr $2 0
                     56: .ie \\n($0>=3 \
                     57: \{\
                     58: .      if '\\n($3'0' \
                     59: .              nr $3 1
                     60: .      if (\\n(.$>=5) .if !"\\$5"-" \
                     61: .              nr $3 \\$5
                     62: .      as $n .\\n($3
                     63: .\}
                     64: .el \
                     65: .      nr $3 0
                     66: .ie \\n($0>=4 \
                     67: \{\
                     68: .      if '\\n($4'0' \
                     69: .              nr $4 1
                     70: .      if (\\n(.$>=6) .if !"\\$6"-" \
                     71: .              nr $4 \\$6
                     72: .      as $n .\\n($4
                     73: .\}
                     74: .el \
                     75: .      nr $4 0
                     76: .ie \\n($0>=5 \
                     77: \{\
                     78: .      if '\\n($5'0' \
                     79: .              nr $5 1
                     80: .      if (\\n(.$>=7) .if !"\\$7"-" \
                     81: .              nr $5 \\$7
                     82: .      as $n .\\n($5
                     83: .\}
                     84: .el \
                     85: .      nr $5 0
                     86: .ie \\n($0>=6 \
                     87: \{\
                     88: .      if '\\n($6'0' \
                     89: .              nr $6 1
                     90: .      if (\\n(.$>=8) .if !"\\$8"-" \
                     91: .              nr $6 \\$8
                     92: .      as $n .\\n($6
                     93: .\}
                     94: .el \
                     95: .      nr $6 0
                     96: ..
                     97: .de sx                 \" *** heading up, no increment (2.1.1 -> 2.1)
                     98: .ce 0
                     99: .ul 0
                    100: .nr _0 \\n($0-1
                    101: .if \\n(.$ .nr _0 +1
                    102: .if \\n(.$ .nr _0 \\$1
                    103: .@d \\n(_0
                    104: .rr _0
                    105: .$p "" "" \\n($0
                    106: .nr $p 0 1                     \" reset .np count
                    107: ..
                    108: .de uh                 \" *** unnumbered section heading
                    109: .$p "\\$1"
                    110: .$0 "\\$1"
                    111: ..
                    112: .if \n(sf<=0 \
                    113: .      nr sf 8                 \" section font -- Times Bold
                    114: .if \n(sp<=0 \
                    115: .      nr sp 10                \" section title pointsize
                    116: .if \n(ss<=0 \
                    117: .      nr ss 12p               \" section prespacing
                    118: .if \n(si<=0 \
                    119: .      nr si 0                 \" section indent
                    120: .nr c. \n(_0

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