date and time created 88/06/13 15:09:44 by mckusick
[unix-history] / usr / src / share / me / chars.me
... / ...
CommitLineData
1.nr _0 \n(c.
2.\" @(#)chars.me 2.4 (Berkeley) %G%
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