|
|
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
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.