dvi.tmac revision 1.1.1.1
dvi.tmac
.nr _C \n(.C .cp 0 . . .fspecial TI CWI .fspecial TBI CWI .fspecial HI CWI .fspecial HBI CWI .fspecial CW SC .fspecial CWI SC . This uses the dvi-char-_-1 string in fixed-width fonts, dvi-char-_-0
otherwise.
.fchar _ \R'dvi-char (\w'M' == \w'i')'\E*[dvi-char-_-\\n[dvi-char]] Normally use a rule.
In fixed-width fonts (CW and CWI) use a real _ character.
. .fchar \[/l] \ \R'dvi-char ((\w'M' == \w'i') + \ (\En[.f] == \f[CWI]\En[.f]\f[]))'\E*[dvi-char-/l-\\n[dvi-char]] . .fchar \[/L] \ \R'dvi-char ((\w'M' == \w'i') + \ (\En[.f] == \f[CWI]\En[.f]\f[]))'\E*[dvi-char-/L-\\n[dvi-char]] . This is designed so that \(ul, \(rn and \(br form corners.
.char \[br] \Z'\v'.25m'\D'R .04m -1m'' .char \[ul] \Z'\v'.23m'\D'R .54m .04m''\h'.5m' .char \[rn] \Z'\v'-.77m'\D'R .54m .04m''\h'.5m' . .char \[or] \h'.1m'\Z'\D'l 0 -.675m''\h'.1m' .char \[ru] \Z'\v'-.02m'\D'R .54m .04m''\h'.5m' . .fchar \[sr] \v'-.75m'\[sqrt]\v'.75m' .fchar \[sqrtex] \D'R .5m -.04m'\v'.04m' .fchar \[radicalex] \v'-.75m'\D'R .5m -.04m'\v'.79m' .fchar \[co] \ \z\s-2\[ci]\s0\ \h'\w'\s-2\[ci]\s0'u-\w'\s-4C\s0'u/2u'\ \s-4C\s0\ \h'\w'\s-2\[ci]\s0'u-\w'\s-4C\s0'u/2u' .fchar \[rg] \ \z\s-2\[ci]\s0\ \h'\w'\s-2\[ci]\s0'u-\w'\s-4R\s0'u/2u'\ \s-4R\s0\ \h'\w'\s-2\[ci]\s0'u-\w'\s-4R\s0'u/2u' .fchar \[fm] \v'-.35m'\s[\En[.s]*7u/10u]\[prime]\s0\v'.35m' .fchar \[sd] \v'-.35m'\s[\En[.s]*7u/10u]\[prime]\[prime]\s0\v'.35m' .fchar \[de] \h'.05m'\v'-.54m'\D'c .3m'\v'.54m'\h'.05m' .fchar \[ct] \o'c/' .fchar \[sq] \ \Z'\h'.05m'\D'R .4m -.04m'\v'.04m'\h'-.04m'\ \D'R .04m -.4m'\v'.04m'\D'R -.4m -.04m'\D'R .04m .4m''\h'.5m' char \[sq] \h'.05m'\D'l .4m 0'\D'l 0 -.4m'\D'l -.4m 0'\D'l 0 .4m'\h'.45m'
SC contains a real \[!=] glyph
.schar \[!=] \[slashnot]\[eq] .schar \[nm] \o'\F[T]\f[R]/\[mo]' .fschar CW \[nm] \o'/\[mo]' .fschar CWI \[nm] \o'\f[CW]/\[mo]' .schar \[ne] \[slashnot]\[==] .fschar CW \[ne] \o'/\[==]' .fschar CWI \[ne] \o'\f[CW]/\[==]' .fchar \[=~] \v'.1m'\Z'\[eq]'\v'-.4m'\[ap]\v'.3m' .fchar \[tm] \v'-.3m'\s[\En[.s]/2u]TM\s0\v'.3m' TC fonts contain real \[aq] glyphs
.schar \[aq] ' .fchar \[bq] , .fchar \[Bq] ,\h'\w'\[rq]'u-(2u*\w"'"u)', .fchar \[ho] \s[\En[.s]/2u]\v'.4m'c\v'-.4m'\s0 .fchar \[-D] \Z'\v'-.1m'\h'.05m'-'D .fchar \[Sd] \Z'\v'-.3m'\h'.35m'-'\[pd] .fchar \[TP] \ I\h'-.25m'\v'-.33m'\s[\En[.s]*6u/10u]\v'.33m'\ D\v'-.33m'\s0\v'.33m' .fchar \[Tp] \zlp .fchar \[nb] \[slashnot]\[sb] .fchar \[nc] \[slashnot]\[sp] .cflags 8 \[an] .schar \[an] \h'-.167m'\[mi]\h'-.167m' .fschar CW \[an] - .fschar CWI \[an] \f[CW]\[mi] we follow the EC ligatures for fixed-width dashes
.fchar \[em] -- .fchar \[en] - .fchar \[hy] - .fschar CW \[va] \o'\[ua]\[da]' .fschar CWI \[va] \o'\[ua]\[da]' .fschar CW \[<>] \o'\[<-]\[->]' .fschar CWI \[<>] \o'\[<-]\[->]' .fchar \[lh] \[lA] .fchar \[rh] \[rA] . .fchar \[f/] / . Define some fractions.
. fchar \[\\$1\\$2] \ \v'-.25m'\s[\\En[.s]*7u/10u]\\$1\s0\v'.25m'\ \h'-.2m'\[f/]\h'-.2m'\ \v'.25m'\s[\\En[.s]*7u/10u]\\$2\s0\v'-.25m' .. . .dvi-frac 1 2 .dvi-frac 3 4 .dvi-frac 1 4 .dvi-frac 1 8 .dvi-frac 3 8 .dvi-frac 5 8 .dvi-frac 7 8 . support for ISO Latin-1
.fchar \[S1] \v'-.2m'\s-31\s+3\v'+.2m' .fchar \[S2] \v'-.2m'\s-32\s+3\v'+.2m' .fchar \[S3] \v'-.2m'\s-33\s+3\v'+.2m' .fchar \[Of] \v'-.2m'\s'\En[.s]*6u/10u'\o'_a'\s0\v'.2m' .fchar \[Om] \v'-.2m'\s'\En[.s]*6u/10u'\o'_o'\s0\v'.2m' .fchar \[fo] \v'-.1m'\s-3<\s+3\v'+.1m' .fchar \[fc] \v'-.1m'\s-3>\s+3\v'+.1m' .fchar \[Fo] \v'-.1m'\s-3<\h'-.3m'<\s+3\v'+.1m' .fchar \[Fc] \v'-.1m'\s-3>\h'-.3m'>\s+3\v'+.1m' .fchar \[bb] | .fchar \[Cs] \o'\[mu]o' . .fchar \[IJ] IJ .fchar \[ij] ij . . \" Note that character definitions are always interpreted with . \" compatibility mode off. . fchar \\$1 \ \\$3\ \k[acc]\ \h'(u;-\w'\\$2'-\w'\\$3'/2+\\En[skw]+(\w'x'*0)-\\En[skw])'\ \v'(u;\w'x'*0+\\En[rst]+(\w'\\$3'*0)-\\En[rst])'\ \\$2\ \v'(u;\w'x'*0-\\En[rst]+(\w'\\$3'*0)+\\En[rst])'\ \h'|\\En[acc]u' . hcode \\$1\\$4 .. . .dvi-achar \[`A] \` A a .dvi-achar \['A] \' A a .dvi-achar \[^A] ^ A a .dvi-achar \[~A] ~ A a .dvi-achar \[:A] \[ad] A a .dvi-achar \[oA] \[ao] A a .dvi-achar \['C] \' C c .dvi-achar \[`E] \` E e .dvi-achar \['E] \' E e .dvi-achar \[^E] ^ E e .dvi-achar \[:E] \[ad] E e .dvi-achar "\[G ab]" \[ab] G g .dvi-achar \[`I] \` I i .dvi-achar \['I] \' I i .dvi-achar \[^I] ^ I i .dvi-achar \[:I] \[ad] I i .dvi-achar "\[I .]" \[a.] I i .dvi-achar \[~N] ~ N n .dvi-achar \[`O] \` O o .dvi-achar \['O] \' O o .dvi-achar \[^O] ^ O o .dvi-achar \[~O] ~ O o .dvi-achar \[:O] \[ad] O o .dvi-achar \[`U] \` U u .dvi-achar \['U] \' U u .dvi-achar \[^U] ^ U u .dvi-achar \[:U] \[ad] U u .dvi-achar \['Y] \' Y y .dvi-achar \[:Y] \[ad] Y y .dvi-achar \[`a] \` a a .dvi-achar \['a] \' a a .dvi-achar \[^a] ^ a a .dvi-achar \[~a] ~ a a .dvi-achar \[:a] \[ad] a a .dvi-achar \[oa] \[ao] a a .dvi-achar \['c] \' c c .dvi-achar \[`e] \` e e .dvi-achar \['e] \' e e .dvi-achar \[^e] ^ e e .dvi-achar \[:e] \[ad] e e .dvi-achar "\[g ab]" \[ab] g g .dvi-achar \[`i] \` \[.i] i .dvi-achar \['i] \' \[.i] i .dvi-achar \[^i] ^ \[.i] i .dvi-achar \[:i] \[ad] \[.i] i .dvi-achar \[~n] ~ n n .dvi-achar \[`o] \` o o .dvi-achar \['o] \' o o .dvi-achar \[^o] ^ o o .dvi-achar \[~o] ~ o o .dvi-achar \[:o] \[ad] o o .dvi-achar \[`u] \` u u .dvi-achar \['u] \' u u .dvi-achar \[^u] ^ u u .dvi-achar \[:u] \[ad] u u .dvi-achar \['y] \' y y .dvi-achar \[:y] \[ad] y y .dvi-achar \[vs] \[ah] s s .dvi-achar \[vS] \[ah] S s .dvi-achar \[vz] \[ah] z z .dvi-achar \[vZ] \[ah] Z z . .fchar \[,C] \o'\[ac]C' .hcode \[,C]c .fchar \[,c] \o'\[ac]c' .hcode \[,c]c .fchar \[S ,] \o'S\[ac]' .hcode \[S ,]s .fchar \[s ,] \o's\[ac]' .hcode \[s ,]s . now for color definitions
this is a composite of MIT's X Consortium red/green/blue (rgb) color
specifications, X Consortium version 10.41, 1994.
. .cp \n(_C . . mso pspic.tmac . .do ie '\[char97]'a' \ . do mso latin1.tmac . do mso cp1047.tmac
.nr _C \n(.C .cp 0 . . .fspecial TI CWI .fspecial TBI CWI .fspecial HI CWI .fspecial HBI CWI .fspecial CW SC .fspecial CWI SC . This uses the dvi-char-_-1 string in fixed-width fonts, dvi-char-_-0
otherwise.
.fchar _ \R'dvi-char (\w'M' == \w'i')'\E*[dvi-char-_-\\n[dvi-char]] Normally use a rule.
In fixed-width fonts (CW and CWI) use a real _ character.
. .fchar \[/l] \ \R'dvi-char ((\w'M' == \w'i') + \ (\En[.f] == \f[CWI]\En[.f]\f[]))'\E*[dvi-char-/l-\\n[dvi-char]] . .fchar \[/L] \ \R'dvi-char ((\w'M' == \w'i') + \ (\En[.f] == \f[CWI]\En[.f]\f[]))'\E*[dvi-char-/L-\\n[dvi-char]] . This is designed so that \(ul, \(rn and \(br form corners.
.char \[br] \Z'\v'.25m'\D'R .04m -1m'' .char \[ul] \Z'\v'.23m'\D'R .54m .04m''\h'.5m' .char \[rn] \Z'\v'-.77m'\D'R .54m .04m''\h'.5m' . .char \[or] \h'.1m'\Z'\D'l 0 -.675m''\h'.1m' .char \[ru] \Z'\v'-.02m'\D'R .54m .04m''\h'.5m' . .fchar \[sr] \v'-.75m'\[sqrt]\v'.75m' .fchar \[sqrtex] \D'R .5m -.04m'\v'.04m' .fchar \[radicalex] \v'-.75m'\D'R .5m -.04m'\v'.79m' .fchar \[co] \ \z\s-2\[ci]\s0\ \h'\w'\s-2\[ci]\s0'u-\w'\s-4C\s0'u/2u'\ \s-4C\s0\ \h'\w'\s-2\[ci]\s0'u-\w'\s-4C\s0'u/2u' .fchar \[rg] \ \z\s-2\[ci]\s0\ \h'\w'\s-2\[ci]\s0'u-\w'\s-4R\s0'u/2u'\ \s-4R\s0\ \h'\w'\s-2\[ci]\s0'u-\w'\s-4R\s0'u/2u' .fchar \[fm] \v'-.35m'\s[\En[.s]*7u/10u]\[prime]\s0\v'.35m' .fchar \[sd] \v'-.35m'\s[\En[.s]*7u/10u]\[prime]\[prime]\s0\v'.35m' .fchar \[de] \h'.05m'\v'-.54m'\D'c .3m'\v'.54m'\h'.05m' .fchar \[ct] \o'c/' .fchar \[sq] \ \Z'\h'.05m'\D'R .4m -.04m'\v'.04m'\h'-.04m'\ \D'R .04m -.4m'\v'.04m'\D'R -.4m -.04m'\D'R .04m .4m''\h'.5m' char \[sq] \h'.05m'\D'l .4m 0'\D'l 0 -.4m'\D'l -.4m 0'\D'l 0 .4m'\h'.45m'
SC contains a real \[!=] glyph
.schar \[!=] \[slashnot]\[eq] .schar \[nm] \o'\F[T]\f[R]/\[mo]' .fschar CW \[nm] \o'/\[mo]' .fschar CWI \[nm] \o'\f[CW]/\[mo]' .schar \[ne] \[slashnot]\[==] .fschar CW \[ne] \o'/\[==]' .fschar CWI \[ne] \o'\f[CW]/\[==]' .fchar \[=~] \v'.1m'\Z'\[eq]'\v'-.4m'\[ap]\v'.3m' .fchar \[tm] \v'-.3m'\s[\En[.s]/2u]TM\s0\v'.3m' TC fonts contain real \[aq] glyphs
.schar \[aq] ' .fchar \[bq] , .fchar \[Bq] ,\h'\w'\[rq]'u-(2u*\w"'"u)', .fchar \[ho] \s[\En[.s]/2u]\v'.4m'c\v'-.4m'\s0 .fchar \[-D] \Z'\v'-.1m'\h'.05m'-'D .fchar \[Sd] \Z'\v'-.3m'\h'.35m'-'\[pd] .fchar \[TP] \ I\h'-.25m'\v'-.33m'\s[\En[.s]*6u/10u]\v'.33m'\ D\v'-.33m'\s0\v'.33m' .fchar \[Tp] \zlp .fchar \[nb] \[slashnot]\[sb] .fchar \[nc] \[slashnot]\[sp] .cflags 8 \[an] .schar \[an] \h'-.167m'\[mi]\h'-.167m' .fschar CW \[an] - .fschar CWI \[an] \f[CW]\[mi] we follow the EC ligatures for fixed-width dashes
.fchar \[em] -- .fchar \[en] - .fchar \[hy] - .fschar CW \[va] \o'\[ua]\[da]' .fschar CWI \[va] \o'\[ua]\[da]' .fschar CW \[<>] \o'\[<-]\[->]' .fschar CWI \[<>] \o'\[<-]\[->]' .fchar \[lh] \[lA] .fchar \[rh] \[rA] . .fchar \[f/] / . Define some fractions.
. fchar \[\\$1\\$2] \ \v'-.25m'\s[\\En[.s]*7u/10u]\\$1\s0\v'.25m'\ \h'-.2m'\[f/]\h'-.2m'\ \v'.25m'\s[\\En[.s]*7u/10u]\\$2\s0\v'-.25m' .. . .dvi-frac 1 2 .dvi-frac 3 4 .dvi-frac 1 4 .dvi-frac 1 8 .dvi-frac 3 8 .dvi-frac 5 8 .dvi-frac 7 8 . support for ISO Latin-1
.fchar \[S1] \v'-.2m'\s-31\s+3\v'+.2m' .fchar \[S2] \v'-.2m'\s-32\s+3\v'+.2m' .fchar \[S3] \v'-.2m'\s-33\s+3\v'+.2m' .fchar \[Of] \v'-.2m'\s'\En[.s]*6u/10u'\o'_a'\s0\v'.2m' .fchar \[Om] \v'-.2m'\s'\En[.s]*6u/10u'\o'_o'\s0\v'.2m' .fchar \[fo] \v'-.1m'\s-3<\s+3\v'+.1m' .fchar \[fc] \v'-.1m'\s-3>\s+3\v'+.1m' .fchar \[Fo] \v'-.1m'\s-3<\h'-.3m'<\s+3\v'+.1m' .fchar \[Fc] \v'-.1m'\s-3>\h'-.3m'>\s+3\v'+.1m' .fchar \[bb] | .fchar \[Cs] \o'\[mu]o' . .fchar \[IJ] IJ .fchar \[ij] ij . . \" Note that character definitions are always interpreted with . \" compatibility mode off. . fchar \\$1 \ \\$3\ \k[acc]\ \h'(u;-\w'\\$2'-\w'\\$3'/2+\\En[skw]+(\w'x'*0)-\\En[skw])'\ \v'(u;\w'x'*0+\\En[rst]+(\w'\\$3'*0)-\\En[rst])'\ \\$2\ \v'(u;\w'x'*0-\\En[rst]+(\w'\\$3'*0)+\\En[rst])'\ \h'|\\En[acc]u' . hcode \\$1\\$4 .. . .dvi-achar \[`A] \` A a .dvi-achar \['A] \' A a .dvi-achar \[^A] ^ A a .dvi-achar \[~A] ~ A a .dvi-achar \[:A] \[ad] A a .dvi-achar \[oA] \[ao] A a .dvi-achar \['C] \' C c .dvi-achar \[`E] \` E e .dvi-achar \['E] \' E e .dvi-achar \[^E] ^ E e .dvi-achar \[:E] \[ad] E e .dvi-achar "\[G ab]" \[ab] G g .dvi-achar \[`I] \` I i .dvi-achar \['I] \' I i .dvi-achar \[^I] ^ I i .dvi-achar \[:I] \[ad] I i .dvi-achar "\[I .]" \[a.] I i .dvi-achar \[~N] ~ N n .dvi-achar \[`O] \` O o .dvi-achar \['O] \' O o .dvi-achar \[^O] ^ O o .dvi-achar \[~O] ~ O o .dvi-achar \[:O] \[ad] O o .dvi-achar \[`U] \` U u .dvi-achar \['U] \' U u .dvi-achar \[^U] ^ U u .dvi-achar \[:U] \[ad] U u .dvi-achar \['Y] \' Y y .dvi-achar \[:Y] \[ad] Y y .dvi-achar \[`a] \` a a .dvi-achar \['a] \' a a .dvi-achar \[^a] ^ a a .dvi-achar \[~a] ~ a a .dvi-achar \[:a] \[ad] a a .dvi-achar \[oa] \[ao] a a .dvi-achar \['c] \' c c .dvi-achar \[`e] \` e e .dvi-achar \['e] \' e e .dvi-achar \[^e] ^ e e .dvi-achar \[:e] \[ad] e e .dvi-achar "\[g ab]" \[ab] g g .dvi-achar \[`i] \` \[.i] i .dvi-achar \['i] \' \[.i] i .dvi-achar \[^i] ^ \[.i] i .dvi-achar \[:i] \[ad] \[.i] i .dvi-achar \[~n] ~ n n .dvi-achar \[`o] \` o o .dvi-achar \['o] \' o o .dvi-achar \[^o] ^ o o .dvi-achar \[~o] ~ o o .dvi-achar \[:o] \[ad] o o .dvi-achar \[`u] \` u u .dvi-achar \['u] \' u u .dvi-achar \[^u] ^ u u .dvi-achar \[:u] \[ad] u u .dvi-achar \['y] \' y y .dvi-achar \[:y] \[ad] y y .dvi-achar \[vs] \[ah] s s .dvi-achar \[vS] \[ah] S s .dvi-achar \[vz] \[ah] z z .dvi-achar \[vZ] \[ah] Z z . .fchar \[,C] \o'\[ac]C' .hcode \[,C]c .fchar \[,c] \o'\[ac]c' .hcode \[,c]c .fchar \[S ,] \o'S\[ac]' .hcode \[S ,]s .fchar \[s ,] \o's\[ac]' .hcode \[s ,]s . now for color definitions
this is a composite of MIT's X Consortium red/green/blue (rgb) color
specifications, X Consortium version 10.41, 1994.
. .cp \n(_C . . mso pspic.tmac . .do ie '\[char97]'a' \ . do mso latin1.tmac . do mso cp1047.tmac