|
|
1.1 root 1: .nr _0 \n(c.
2: .\" Copyright (c) 1988 The Regents of the University of California.
3: .\" All rights reserved.
4: .\"
5: .\" Redistribution and use in source and binary forms are permitted
6: .\" provided that the above copyright notice and this paragraph are
7: .\" duplicated in all such forms and that any documentation,
8: .\" advertising materials, and other materials related to such
9: .\" distribution and use acknowledge that the software was developed
10: .\" by the University of California, Berkeley. The name of the
11: .\" University may not be used to endorse or promote products derived
12: .\" from this software without specific prior written permission.
13: .\" THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
14: .\" IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
15: .\" WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
16: .\"
17: .\" @(#)chars.me 2.5 (Berkeley) 9/30/88
18: .\"
19: .\" %beginstrip%
20: .\"
21: .\" *** special characters ***
22: .\" this file uses temp strings of the form #x.
23: .if n \
24: \{\
25: . ds #[ \f1
26: . ds #] \fP
27: . ds #h 0
28: . ds #v 0.8m
29: . ds #f 0.3m
30: .\}
31: .if t \
32: \{\
33: . ds #[ \&
34: . ds #] \&
35: . ds #h ((1u-(\\\\n(.fu%2u))*0.13m)
36: . ds #v 0.6m
37: . ds #f 0
38: .\}
39: .\" \" accents
40: .ds ' \k_\h'-(\\n(.wu*8/10-\*(#h)'\*(#[\(aa\h'|\\n_u'\*(#]
41: .ds ` \k_\h'-(\\n(.wu*7/10-\*(#h)'\*(#[\(ga\h'|\\n_u'\*(#]
42: .\" \" umlaut
43: .ds : \k_\h'-(\\n(.wu*8/10-\*(#h+0.1m+\*(#f)'\v'-\*(#v'\*(#[\z.\h'0.2m+\*(#f'.\h'|\\n_u'\v'\*(#v'\*(#]
44: .\" \" circumflex and tilde
45: .ds ^ \k_\h'-(\\n(.wu-\*(#h-0.05m)'\*(#[^\h'|\\n_u'\*(#]
46: .ds ~ \k_\h'-(\\n(.wu-\*(#h-0.05m)'\*(#[~\h'|\\n_u'\*(#]
47: .\" \" cedilla and czech
48: .ds , \k_\h'-(\\n(.wu)'\*(#[,\h'|\\n_u'\*(#]
49: .ds v \k_\h'-(\\n(.wu*9/10-\*(#h)'\v'-\*(#v'\*(#[\s-4v\s0\v'\*(#v'\h'|\\n_u'\*(#]
50: .\" \" Norwegian A or angstrom
51: .ds o \k_\h'-(\\n(.wu+\w'\(de'u-\*(#h)/2u'\v'-0.4n'\*(#[\z\(de\v'0.4n'\h'|\\n_u'\*(#]
52: .\" \" there exists, for all
53: .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'\*(#]
54: .ds qa \*(#[\h'-0.24m'\z\e\h'0.48m'\z\(sl\h'-0.24m'\v'-0.15m'\(em\v'0.15m'\*(#]
55: .if t \
56: \{\
57: . 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'
58: . 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'
59: .\}
60: .if \n($T \
61: \{\
62: . ds ' \*(#[\h'-1'\(aa\*(#]
63: . ds ` \*(#[\h'-1'\(ga\*(#]
64: . ds : \&
65: . ds ^ \*(#[\h'-1'^\*(#]
66: . ds ~ \*(#[\h'-1'~\*(#]
67: . ds , \*(#[\h'-1',\*(#]
68: . ds v \&
69: . ds o \&
70: . ds qe EXISTS
71: . ds qa FORALL
72: .\}
73: .rm #[
74: .rm #]
75: .rm #h
76: .rm #v
77: .rm #f
78: .nr c. \n(_0
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.