Hi,
Werner wrote:
> But `@' works:
>
> mv ch09.t ch09.t.orig
> sed 's/`/@/g' < ch09.t.orig > ch09.t
>
> and it seems that after this fix UTP compiles just fine.
Agreed. I get some warnings from awk too.
Larry, attached are two patches: the first is Werner's sed, though I
read through the diffs to look for unintended changes; the second stops
awk warning about toc.awk's undefined string escapes.
BTW, is page.awk used?
Cheers, Ralph.
===================================================================
RCS file: RCS/ch09.t,v
retrieving revision 1.1
diff -u -r1.1 ch09.t
--- ch09.t 2013/01/06 19:04:15 1.1
+++ ch09.t 2013/01/06 19:12:58
@@ -7,7 +7,7 @@
.so utp.mac
.utp
.EQ
-delim ``
+delim @@
.EN
.Se 9 "Typesetting Equations with \f[CB]eqn\fP" "Chapter" 1
.LP
@@ -23,7 +23,7 @@
sum from i=0 to {inf} c sup i = lim from {m -> inf} {sum
from i=0 to {m} c sup i}
.EN
-requires three special characters (`sum`, `inf`, and `->`)
+requires three special characters (@sum@, @inf@, and @->@)
and roman and italic characters in two different sizes.
Expressions also may require horizontal and vertical
printing motions (as in subscripts and superscripts).
@@ -86,10 +86,10 @@
.ix Greek characters
.ix [eqn] preprocessor, Greek~alphabet %key eqn preprocessor, Greek alphabet
.Li
-special symbols, such as summations (`size 8 sum`),
+special symbols, such as summations (@size 8 sum@),
.ix [eqn] preprocessor, special character~names %key eqn preprocessor, special
character names
-products (`size 8 prod`),integrals (`size 8 int`),
-and square roots (`sqrt ""`)
+products (@size 8 prod@),integrals (@size 8 int@),
+and square roots (@sqrt ""@)
.Li
positional notation, such as subscripts and
superscripts, fractions, matrices, and vertical piles
@@ -394,7 +394,7 @@
..
.Ps
\f[R]The possible prices of an ice cream cone in cents are
-`y sub 1 = 75`, `y sub 2 = 85`, and `y sub 3 = 95`.\fP
+@y sub 1 = 75@, @y sub 2 = 85@, and @y sub 3 = 95@.\fP
.Pe
The
.CW eqn
@@ -526,8 +526,8 @@
..
.ne 2
.Ps
-`x sub 1` `+x sub 2` `+s sub 1` `=10`
-`-2x sub 1` `+s sub 1` `=42`
+@x sub 1@ @+x sub 2@ @+s sub 1@ @=10@
+@-2x sub 1@ @+s sub 1@ @=42@
.Pe
(Note that each equation must have its own pair of
.CW .EQ /\c
@@ -738,10 +738,10 @@
.ix [eqn] preprocessor, Greek~alphabet %key eqn preprocessor, Greek alphabet
For example,
.CW delta
-produces `delta`, and
+produces @delta@, and
.CW DELTA
-gives `DELTA`.
-Thus, you only need to spell out the character `pi`, as in:
+gives @DELTA@.
+Thus, you only need to spell out the character @pi@, as in:
.Ps
#pi r sup 2#
.Pe
@@ -765,160 +765,160 @@
T{
DELTA
T} T{
-`DELTA`
+@DELTA@
T} T{
iota
T} T{
-`iota`
+@iota@
T}
T{
GAMMA
T} T{
-`GAMMA`
+@GAMMA@
T} T{
kappa
T} T{
-`kappa`
+@kappa@
T}
T{
LAMBDA
T} T{
-`LAMBDA`
+@LAMBDA@
T} T{
lambda
T} T{
-`lambda`
+@lambda@
T}
T{
OMEGA
T} T{
-`OMEGA`
+@OMEGA@
T} T{
mu
T} T{
-`mu`
+@mu@
T}
T{
PHI
T} T{
-`PHI`
+@PHI@
T} T{
nu
T} T{
-`nu`
+@nu@
T}
T{
PI
T} T{
-`PI`
+@PI@
T} T{
omega
T} T{
-`omega`
+@omega@
T}
T{
PSI
T} T{
-`PSI`
+@PSI@
T} T{
omicron
T} T{
-`omicron`
+@omicron@
T}
T{
SIGMA
T} T{
-`SIGMA`
+@SIGMA@
T} T{
phi
T} T{
-`phi`
+@phi@
T}
T{
THETA
T} T{
-`THETA`
+@THETA@
T} T{
pi
T} T{
-`pi`
+@pi@
T}
T{
UPSILON
T} T{
-`UPSILON`
+@UPSILON@
T} T{
psi
T} T{
-`psi`
+@psi@
T}
T{
XI
T} T{
-`XI`
+@XI@
T} T{
rho
T} T{
-`rho`
+@rho@
T}
T{
alpha
T} T{
-`alpha`
+@alpha@
T} T{
sigma
T} T{
-`sigma`
+@sigma@
T}
T{
beta
T} T{
-`beta`
+@beta@
T} T{
tau
T} T{
-`tau`
+@tau@
T}
T{
chi
T} T{
-`chi`
+@chi@
T} T{
theta
T} T{
-`theta`
+@theta@
T}
T{
delta
T} T{
-`delta`
+@delta@
T} T{
upsilon
T} T{
-`upsilon`
+@upsilon@
T}
T{
epsilon
T} T{
-`epsilon`
+@epsilon@
T} T{
xi
T} T{
-`xi`
+@xi@
T}
T{
eta
T} T{
-`eta`
+@eta@
T} T{
zeta
T} T{
-`zeta`
+@zeta@
T}
T{
gamma
T} T{
-`gamma`
+@gamma@
T} T{
T}
.TE
@@ -970,16 +970,16 @@
T{
>=
T} T{
-`>=`
+@>=@
T} T{
approx
T} T{
-`approx`
+@approx@
T}
T{
<=
T} T{
-`<=`
+@<=@
T} T{
nothing
T} T{
@@ -987,101 +987,101 @@
T{
==
T} T{
-`==`
+@==@
T} T{
cdot
T} T{
-`cdot`
+@cdot@
T}
T{
!=
T} T{
-`!=`
+@!=@
T} T{
times
T} T{
-`times`
+@times@
T}
T{
+-
T} T{
-`+-`
+@+-@
T} T{
del
T} T{
-`del`
+@del@
T}
T{
->
T} T{
-`->`
+@->@
T} T{
grad
T} T{
-`grad`
+@grad@
T}
T{
<-
T} T{
-`<-`
+@<-@
T} T{
\&...
T} T{
-`...`
+@...@
T}
T{
<<
T} T{
-`<<`
+@<<@
T} T{
,...,
T} T{
-`,...,`
+@,...,@
T}
T{
>>
T} T{
-`>>`
+@>>@
T} T{
sum
T} T{
-`sum`
+@sum@
T}
T{
inf
T} T{
-`inf`
+@inf@
T} T{
int
T} T{
-`int`
+@int@
T}
T{
partial
T} T{
-`partial`
+@partial@
T} T{
prod
T} T{
-`prod`
+@prod@
T}
T{
half
T} T{
-`half`
+@half@
T} T{
union
T} T{
-`union`
+@union@
T}
T{
prime
T} T{
-`prime`
+@prime@
T} T{
inter
T} T{
-`inter`
+@inter@
T}
.TE
.Te
@@ -1401,14 +1401,14 @@
.RS
.TS
lf(CW)7 l.
-bar `x bar`
-under `x under`
-dot `x dot`
-dotdot `x dotdot`
-hat `x hat`
-tilde `x tilde`
-vec `x vec`
-dyad `x dyad`
+bar @x bar@
+under @x under@
+dot @x dot@
+dotdot @x dotdot@
+hat @x hat@
+tilde @x tilde@
+vec @x vec@
+dyad @x dyad@
.TE
.RE
The following examples show how these keywords are used:
@@ -1649,25 +1649,25 @@
.TS
lw (1i) l l.
T{
-`a sub 1 + a sub 2`
+@a sub 1 + a sub 2@
T} T{
-`+ x sub 1 + x sub 2`
+@+ x sub 1 + x sub 2@
T} T{
-`=34`
+@=34@
T}
T{
-`2a sub 1`
+@2a sub 1@
T} T{
-`+ 4a sub 2`
+@+ 4a sub 2@
T} T{
-`=28`
+@=28@
T}
T{
-`3a sub 1`
+@3a sub 1@
T} T{
-`+ 4x sub 2`
+@+ 4x sub 2@
T} T{
-`=56`
+@=56@
T}
.TE
.RE
@@ -1763,11 +1763,11 @@
.RS
.TS
lf(CW)p9 7 l.
-#bold qP# `bold qP`
-#roman alpha\(apbeta# `roman alpha~beta`
-#fat half# `fat half`
-#size +3 x =y# `size +3 x =y`
-#size 8 {A + B}# `size 8 {A + B}`
+#bold qP# @bold qP@
+#roman alpha\(apbeta# @roman alpha~beta@
+#fat half# @fat half@
+#size +3 x =y# @size +3 x =y@
+#size 8 {A + B}# @size 8 {A + B}@
.TE
.RE
If the entire paper is to be typeset in a nonstandard size or
===================================================================
RCS file: RCS/toc.awk,v
retrieving revision 1.1
diff -u -r1.1 toc.awk
--- toc.awk 2013/01/06 19:13:08 1.1
+++ toc.awk 2013/01/06 19:14:18
@@ -14,16 +14,16 @@
/^Se:/ {
if ( $4 == "Contents" )
next;
- gsub(/\\f\(CW/, "\\f\(CB" );
- gsub(/\\f\[CW\]/, "\\f\[CB\]" );
- gsub(/\\fC/, "\\f\[CB\]" );
+ gsub(/\\f\(CW/, "\\f(CB" );
+ gsub(/\\f\[CW\]/, "\\f[CB]" );
+ gsub(/\\fC/, "\\f[CB]" );
print ".ps 12\n.sp";
print $3"\\h'|.25i'\\fB"$4"\\fR "$2;
print ".ps 10\n.sp";
}
/^Ah:/ {
- gsub(/\\f\(CB/, "\\f\(CW" );
- gsub(/\\f\[CB\]/, "\\f\[CW\]" );
+ gsub(/\\f\(CB/, "\\f(CW" );
+ gsub(/\\f\[CB\]/, "\\f[CW]" );
print "\\h'|.25i'"$3""$2;
}
# default (skip index entries)
