Commit | Line | Data |
---|---|---|
84f25a89 | 1 | .nr _0 \n(c. |
a3fd506b | 2 | .\" @(#)chars.me 2.4 (Berkeley) %G% |
70e37822 KB |
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. | |
a3fd506b | 13 | .\" %beginstrip% |
70e37822 | 14 | .\" |
84f25a89 EA |
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 | |
1cd5a456 | 23 | . ds #f 0.3m |
84f25a89 EA |
24 | .\} |
25 | .if t \ | |
26 | \{\ | |
27 | . ds #[ \& | |
28 | . ds #] \& | |
29 | . ds #h ((1u-(\\\\n(.fu%2u))*0.13m) | |
30 | . ds #v 0.6m | |
1cd5a456 | 31 | . ds #f 0 |
84f25a89 EA |
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 | |
1cd5a456 | 37 | .ds : \k_\h'-(\\n(.wu*8/10-\*(#h+0.1m+\*(#f)'\v'-\*(#v'\*(#[\z.\h'0.2m+\*(#f'.\h'|\\n_u'\v'\*(#v'\*(#] |
84f25a89 EA |
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 |