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

1.1       root        1: .nr _0 \n(c.
                      2: .\"    @(#)chars.me    2.4 (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: .\"    *** special characters ***
                     16: .\" this file uses temp strings of the form #x.
                     17: .if n \
                     18: \{\
                     19: .      ds #[ \f1
                     20: .      ds #] \fP
                     21: .      ds #h 0
                     22: .      ds #v 0.8m
                     23: .      ds #f 0.3m
                     24: .\}
                     25: .if t \
                     26: \{\
                     27: .      ds #[ \&
                     28: .      ds #] \&
                     29: .      ds #h ((1u-(\\\\n(.fu%2u))*0.13m)
                     30: .      ds #v 0.6m
                     31: .      ds #f 0
                     32: .\}
                     33: .\"                    \" accents
                     34: .ds ' \k_\h'-(\\n(.wu*8/10-\*(#h)'\*(#[\(aa\h'|\\n_u'\*(#]
                     35: .ds ` \k_\h'-(\\n(.wu*7/10-\*(#h)'\*(#[\(ga\h'|\\n_u'\*(#]
                     36: .\"                    \" umlaut
                     37: .ds : \k_\h'-(\\n(.wu*8/10-\*(#h+0.1m+\*(#f)'\v'-\*(#v'\*(#[\z.\h'0.2m+\*(#f'.\h'|\\n_u'\v'\*(#v'\*(#]
                     38: .\"                    \" circumflex and tilde
                     39: .ds ^ \k_\h'-(\\n(.wu-\*(#h-0.05m)'\*(#[^\h'|\\n_u'\*(#]
                     40: .ds ~ \k_\h'-(\\n(.wu-\*(#h-0.05m)'\*(#[~\h'|\\n_u'\*(#]
                     41: .\"                    \" cedilla and czech
                     42: .ds , \k_\h'-(\\n(.wu)'\*(#[,\h'|\\n_u'\*(#]
                     43: .ds v \k_\h'-(\\n(.wu*9/10-\*(#h)'\v'-\*(#v'\*(#[\s-4v\s0\v'\*(#v'\h'|\\n_u'\*(#]
                     44: .\"                    \" Norwegian A or angstrom
                     45: .ds o \k_\h'-(\\n(.wu+\w'\(de'u-\*(#h)/2u'\v'-0.4n'\*(#[\z\(de\v'0.4n'\h'|\\n_u'\*(#]
                     46: .\"                    \" there exists, for all
                     47: .ds qe \*(#[\v'0.5m'\z\(em\v'-0.65m'\z\(em\v'-0.65m'\z\(em\v'0.8m'\h'0.3m'|\h'-0.3m'\*(#]
                     48: .ds qa \*(#[\h'-0.24m'\z\e\h'0.48m'\z\(sl\h'-0.24m'\v'-0.15m'\(em\v'0.15m'\*(#]
                     49: .if t \
                     50: \{\
                     51: .      ds qe \s-2\v'0.45m'\z\(em\v'-0.625m'\z\(em\v'-0.625m'\(em\v'0.8m'\s0\h'-0.1m'\v'-0.05m'\(br\v'0.05m'\h'0.1m'
                     52: .      ds qa \z\e\h'0.35m'\z\(sl\h'-0.33m'\v'-0.3m'\s-4\(em\s0\v'0.3m'\h'0.15m'
                     53: .\}
                     54: .if \n($T \
                     55: \{\
                     56: .      ds ' \*(#[\h'-1'\(aa\*(#]
                     57: .      ds ` \*(#[\h'-1'\(ga\*(#]
                     58: .      ds : \&
                     59: .      ds ^ \*(#[\h'-1'^\*(#]
                     60: .      ds ~ \*(#[\h'-1'~\*(#]
                     61: .      ds , \*(#[\h'-1',\*(#]
                     62: .      ds v \&
                     63: .      ds o \&
                     64: .      ds qe EXISTS
                     65: .      ds qa FORALL
                     66: .\}
                     67: .rm #[
                     68: .rm #]
                     69: .rm #h
                     70: .rm #v
                     71: .rm #f
                     72: .nr c. \n(_0

unix.superglobalmegacorp.com

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