allow ".nr fi 0"; add id keywords
[unix-history] / usr / src / share / me / chars.me
CommitLineData
84f25a89
EA
1.nr _0 \n(c.
2.\" *** special characters ***
3.\" this file uses temp strings of the form #x.
4.if n \
5\{\
6. ds #[ \f1
7. ds #] \fP
8. ds #h 0
9. ds #v 0.8m
10. ds #f +0.3m
11.\}
12.if t \
13\{\
14. ds #[ \&
15. ds #] \&
16. ds #h ((1u-(\\\\n(.fu%2u))*0.13m)
17. ds #v 0.6m
18. ds #f "\"
19.\}
20.\" \" accents
21.ds ' \k_\h'-(\\n(.wu*8/10-\*(#h)'\*(#[\(aa\h'|\\n_u'\*(#]
22.ds ` \k_\h'-(\\n(.wu*7/10-\*(#h)'\*(#[\(ga\h'|\\n_u'\*(#]
23.\" \" umlaut
24.ds : \k_\h'-(\\n(.wu*8/10-\*(#h+0.1m\*(#f)'\v'-\*(#v'\*(#[\z.\h'0.2m\*(#f'.\h'|\\n_u'\v'\*(#v'\*(#]
25.\" \" circumflex and tilde
26.ds ^ \k_\h'-(\\n(.wu-\*(#h-0.05m)'\*(#[^\h'|\\n_u'\*(#]
27.ds ~ \k_\h'-(\\n(.wu-\*(#h-0.05m)'\*(#[~\h'|\\n_u'\*(#]
28.\" \" cedilla and czech
29.ds , \k_\h'-(\\n(.wu)'\*(#[,\h'|\\n_u'\*(#]
30.ds v \k_\h'-(\\n(.wu*9/10-\*(#h)'\v'-\*(#v'\*(#[\s-4v\s0\v'\*(#v'\h'|\\n_u'\*(#]
31.\" \" Norwegian A or angstrom
32.ds o \k_\h'-(\\n(.wu+\w'\(de'u-\*(#h)/2u'\v'-0.4n'\*(#[\z\(de\v'0.4n'\h'|\\n_u'\*(#]
33.\" \" there exists, for all
34.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'\*(#]
35.ds qa \*(#[\h'-0.24m'\z\e\h'0.48m'\z\(sl\h'-0.24m'\v'-0.15m'\(em\v'0.15m'\*(#]
36.if t \
37\{\
38. 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'
39. 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'
40.\}
41.if \n($T \
42\{\
43. ds ' \*(#[\h'-1'\(aa\*(#]
44. ds ` \*(#[\h'-1'\(ga\*(#]
45. ds : \&
46. ds ^ \*(#[\h'-1'^\*(#]
47. ds ~ \*(#[\h'-1'~\*(#]
48. ds , \*(#[\h'-1',\*(#]
49. ds v \&
50. ds o \&
51. ds qe EXISTS
52. ds qa FORALL
53.\}
54.rm #[
55.rm #]
56.rm #h
57.rm #v
58.rm #f
59.nr c. \n(_0