ps.tmac
.nr _C \n(.C .cp 0 . . .cflags 8 \[an] . .char \[radicalex] \h'-\w'\[sr]'u'\[radicalex]\h'\w'\[sr]'u' .fchar \[sqrtex] \[radicalex] .char \[mo] \h'.08m'\[mo]\h'-.08m' .char \[nm] \h'.08m'\[nm]\h'-.08m' .char \[parenlefttp] \[parenlefttp]\h'.016m' .char \[parenleftbt] \[parenleftbt]\h'.016m' .char \[parenleftex] \[parenleftex]\h'.016m' .char \[parenrighttp] \[parenrighttp]\h'.016m' .char \[parenrightbt] \[parenrightbt]\h'.016m' .char \[parenrightex] \[parenrightex]\h'.016m' . .char \[or] \h'.1m'\Z'\D'l 0 -.675m''\h'.1m' . This is designed so that \(ul, \(rn and \(br form corners.
.char \[ul] \v'.25m'\D'l .5m 0'\v'-.25m' .char \[br] \Z'\v'.25m'\D'l 0 -1m'' .char \[rn] \v'-.75m'\D'l .5m 0'\v'.75m' . .char \[ru] \D'l .5m 0' . .fchar \[va] \o'\[ua]\[da]' .fchar \[ci] \v'-.25m'\h'.05m'\D'c .5m'\h'.05m'\v'.25m' .fchar \[sq] \h'.05m'\D'l .5m 0'\D'l 0 -.5m'\D'l -.5m 0'\D'l 0 .5m'\h'.55m' .fchar \[Fi] f\[fi] .fchar \[Fl] f\[fl] .fchar \[ff] ff .fchar \[fi] fi .fchar \[fl] fl .fchar \[ij] ij .fchar \[IJ] IJ .fchar \[tm] \s-3\v'-.3m'TM\v'+.3m'\s+3 . .fchar \[<<] <\h'-.2m'< .fchar \[>>] >\h'-.2m'> .fchar \[|=] \v'.075m'\Z'\[mi]'\v'-.15m'\[ap]\v'.075m' .fchar \[nc] \v'.1m'\Z'\h'.15m'\F[T]\f[R]/'\v'-.1m'\[sp] .fchar \[ne] \v'.07m'\Z'\h'.13m'\F[T]\f[R]/'\v'-.07m'\[==] .fchar \[-h] \F[T]\f[I]\v'-.53m'\Z'\h'.05m'\D'l .3m 0''\v'.53m'h .fchar \[hbar] \[-h] . . \" 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 .. . . .fchar \[S ,] \o'S\[ac]' .hcode \[S ,]s .fchar \[s ,] \o's\[ac]' .hcode \[s ,]s . . schar \[\\$1\\$2] \ \v'-.28m'\s[\\En[.s]*6u/10u]\\$1\s0\v'.28m'\ \[f/]\ \s[\\En[.s]*6u/10u]\\$2 .. . . fschar \\$1 \[\\$2\\$3] \ \Z'\v'-.28m'\s[\\En[.s]*5u/10u]\\$2\s0\v'.28m''\ \Z'\h'.35m'\s[\\En[.s]*5u/10u]\\$3\s0'\ \h'.02m'\[f/]\h'-.02m' .. . . . pic tests this register to see whether it should use \X'ps:...'
.nr 0p 1 . 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 . .do mso europs.tmac . make sure that no blank lines creep in at the end of this file.
.nr _C \n(.C .cp 0 . . .cflags 8 \[an] . .char \[radicalex] \h'-\w'\[sr]'u'\[radicalex]\h'\w'\[sr]'u' .fchar \[sqrtex] \[radicalex] .char \[mo] \h'.08m'\[mo]\h'-.08m' .char \[nm] \h'.08m'\[nm]\h'-.08m' .char \[parenlefttp] \[parenlefttp]\h'.016m' .char \[parenleftbt] \[parenleftbt]\h'.016m' .char \[parenleftex] \[parenleftex]\h'.016m' .char \[parenrighttp] \[parenrighttp]\h'.016m' .char \[parenrightbt] \[parenrightbt]\h'.016m' .char \[parenrightex] \[parenrightex]\h'.016m' . .char \[or] \h'.1m'\Z'\D'l 0 -.675m''\h'.1m' . This is designed so that \(ul, \(rn and \(br form corners.
.char \[ul] \v'.25m'\D'l .5m 0'\v'-.25m' .char \[br] \Z'\v'.25m'\D'l 0 -1m'' .char \[rn] \v'-.75m'\D'l .5m 0'\v'.75m' . .char \[ru] \D'l .5m 0' . .fchar \[va] \o'\[ua]\[da]' .fchar \[ci] \v'-.25m'\h'.05m'\D'c .5m'\h'.05m'\v'.25m' .fchar \[sq] \h'.05m'\D'l .5m 0'\D'l 0 -.5m'\D'l -.5m 0'\D'l 0 .5m'\h'.55m' .fchar \[Fi] f\[fi] .fchar \[Fl] f\[fl] .fchar \[ff] ff .fchar \[fi] fi .fchar \[fl] fl .fchar \[ij] ij .fchar \[IJ] IJ .fchar \[tm] \s-3\v'-.3m'TM\v'+.3m'\s+3 . .fchar \[<<] <\h'-.2m'< .fchar \[>>] >\h'-.2m'> .fchar \[|=] \v'.075m'\Z'\[mi]'\v'-.15m'\[ap]\v'.075m' .fchar \[nc] \v'.1m'\Z'\h'.15m'\F[T]\f[R]/'\v'-.1m'\[sp] .fchar \[ne] \v'.07m'\Z'\h'.13m'\F[T]\f[R]/'\v'-.07m'\[==] .fchar \[-h] \F[T]\f[I]\v'-.53m'\Z'\h'.05m'\D'l .3m 0''\v'.53m'h .fchar \[hbar] \[-h] . . \" 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 .. . . .fchar \[S ,] \o'S\[ac]' .hcode \[S ,]s .fchar \[s ,] \o's\[ac]' .hcode \[s ,]s . . schar \[\\$1\\$2] \ \v'-.28m'\s[\\En[.s]*6u/10u]\\$1\s0\v'.28m'\ \[f/]\ \s[\\En[.s]*6u/10u]\\$2 .. . . fschar \\$1 \[\\$2\\$3] \ \Z'\v'-.28m'\s[\\En[.s]*5u/10u]\\$2\s0\v'.28m''\ \Z'\h'.35m'\s[\\En[.s]*5u/10u]\\$3\s0'\ \h'.02m'\[f/]\h'-.02m' .. . . . pic tests this register to see whether it should use \X'ps:...'
.nr 0p 1 . 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 . .do mso europs.tmac . make sure that no blank lines creep in at the end of this file.