dvi.tmac

.nr _C \n(.C .cp 0 This uses the dvi-char_1 string in font CW, dvi-char_0 otherwise.
.char _ \R'dvi-char_ \\n(.f=\\n(.f'\\*[dvi-char_\\n[dvi-char_]] .char \[ul] \R'dvi-char_ \w'M'=\w'i''\\*[dvi-char_\\n[dvi-char_]] Normally use a rule.
This is designed so that \(ul, \(rn and \(br form corners.
In font CW use a real _ character.
\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' \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' \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'
\v'-.33m'\s0\v'.33m' .cflags 8 \(an Define some fractions.
\v'-.25m'\s[\\\\n(.s*7u/10u]\\$1\s0\v'.25m'\h'-.2m'\ /\h'-.2m'\v'.25m'\s[\\\\n(.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
Note that character definitions are always interpreted with
compatibility mode off.
.char \\$1 \\$3\ \k[acc]\ \h'(u;-\w'\\$2'-\w'\\$3'/2+\\\\n[skw]+(\w'x'*0)-\\\\n[skw])'\ \v'(u;\w'x'*0+\\\\n[rst]+(\w'\\$3'*0)-\\\\n[rst])'\ \\$2\ \v'(u;\w'x'*0-\\\\n[rst]+(\w'\\$3'*0)+\\\\n[rst])'\ \h'|\\\\n[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 \(`E \` E e .dvi-achar \('E \' E e .dvi-achar \(^E ^ E e .dvi-achar \(:E \(ad E e .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 \(`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 \(`e \` e e .dvi-achar \('e \' e e .dvi-achar \(^e ^ e e .dvi-achar \(:e \(ad e e .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 .hcode \(,Cc .hcode \(,cc .cp \n(_C .do mso latin1.tmac