[1845] in Athena Bugs
Troff on Vax and RT is slightly broken, but differently on each!
daemon@ATHENA.MIT.EDU (Bill Cattey)
Thu Mar 2 15:51:16 1989
Date: Thu, 2 Mar 89 15:50:22 EST
From: Bill Cattey <wdc@ATHENA.MIT.EDU>
To: bugs@ATHENA.MIT.EDU
I have a troff file with complicated equations in it generated by eqn.
When I send this file through troff, the spacing around horizontal
bars is wrong.
On a Vax there is too much space (which results in legible but ugly
equations.)
On the RT there is too little space (which results in illegible
equations.)
Who is responsible for fixing troff problems?
The troff file follows:
----cut here ----
.ev 0
.po 0.75i
.ll 6.5i
.fi
.in 36p
.cs CR 22
.de NP
'sp |\\n(.pu-0.5i-1
.ft \\*(FF
.ps \\n(FS
.lt 432p
.po 90p
.ie \\n(DP=1 \{.ie e .tl `\\*(El`\\*(Ec`\\*(Er`
.el .tl `\\*(Ol`\\*(Oc`\\*(Or\}`
.el .tl `\\*(LB`\\*(CB`\\*(RB`
.ps
.ft P
.PZ
.rm PZ
'bp
'sp |.5i-1
.ft \\*(HF
.ps \\n(HS
.ie \\n(DP=1 \{.ie e .tl `\\*(EL`\\*(EC`\\*(ER`
.el .tl `\\*(OL`\\*(OC`\\*(OR`\}
.el .tl `\\*(LT`\\*(CT`\\*(RT`
.ps
.ft P
'sp |1.0i
.po 54p
..
.nr zT 0
.if "\*(.T"postscript" 'nr zT 1
.if "\*(.T"psc" 'nr zT 1
.de PB
'ne \\$2p
'nr zw \\n(.l-\\n(.k-1m-\\$1p
'nr zH \\n(.k
'nr zV \\n(.d
'if \\n(zT \\{\\
'ie !\\n(zw \\{\\
'nr zx \\n(.l-\\$1p-10m
'nr zV \\n(zV+1v
.sp 0
\\v'-.75v'\\ \\v'+.75v'\\c\\}
'el \\{\\
'nr zx \\n(zw-10m
\\v'-.75v'\\ \\v'+.75v'\\c\\}
.sp |\\n(zVu
'if ((\\n(zx<=0)&(\\$2p>0.75v)) \\x'\\$2p-0.75v'\\c
\\!%
\\!%!
\\! PB
'if \\n(.j=3 \\{\\
\\! /troffadjust { neg 2 idiv } def
'ss\\}
'if \\n(.j=5 \\{\\
\\! /troffadjust { neg } def
'ss\\}
'if \\n(.j<3 \\{\\
\\! /troffadjust { pop 0 } def
'ss\\}\\}
..
.de PE
'if \\n(zT \\{\\
\\! PE
\\!.
'ie \\n(zx \\{\\
'if (\\$2p>0.75v) \\x'\\$2p-0.75v'\\c
\\h'-\\n(.ku+\\n(zHu+\\$1p'\\c\\}
'el .br\\}
'if !\\n(zT \\{\\
'if !\\n(zw \\{\\
\\h'-\\n(.k'\\ \\h'-\\n(.w'\\c
.sp -1\\}
\\x'\\$2p-0.75v'\\v'-.75v'\\D'l \\$1p \
0.0i'\\D'l 0.0i \\$2p'\\D'l -\\$1p 0.0i'\\D'l 0.0i \
-\\$2p'\\v'+.75v'\\h'\\$1p'\\c\\}
..
.wh -1i NP
.br
.ad b
'ft R
.ps 12
.vs 14p
.nr EN 8*\w'n'
.ta \n(ENu +(\n(ENu) +(\n(ENu) +(\n(ENu) +(\n(ENu) \
+(\n(ENu) +(\n(ENu) +(\n(ENu) +(\n(ENu) +(\n(ENu) \
+(\n(ENu) +(\n(ENu) +(\n(ENu) +(\n(ENu) +(\n(ENu) \
+(\n(ENu) +(\n(ENu) +(\n(ENu) +(\n(ENu) +(\n(ENu)
.sp 0.5i
.nr DP 0
.ds EL - % -
.ds OR - % -
.ds RT - % -
.ds HF R
.nr HS \n(.s
.ds FF R
.nr FS \n(.s
.nh
'ft B
.ps 8
From wdc+@ATHENA.MIT.EDU Fri Oct 21 12\fR:23:51 1988\fB
.br
X-Andrew-Message-Size\fR: 1794+2\fB
.br
Content-Type\fR: X-BE2; 12\fB
.br
If-Type-Unsupported\fR: send\fR\s12\&\fB
.sp 1
Date\fR: Fri, 21 Oct 88 11:44:54 -0400 (EDT)\fB
.br
From\fR: Bill Cattey <wdc+@ATHENA.MIT.EDU>\fB
.br
To\fR: ajp+@ANDREW.CMU.EDU, lord+@ANDREW.CMU.EDU\fB
.br
Subject\fR: Fwd: EQ font bug (vax only) (must read with messages!)\fB
.br
Cc\fR: wdc@ATHENA.MIT.EDU
.sp 1
---------- Forwarded message begins here ----------\fR\s8\&
.sp 1
From eichin+@snorkelwacker Fri Oct 21 11:34:51 1988
.br
Date: Fri, 21 Oct 88 06:42:26 -0400 (EDT)
.br
From: "Mark W. Eichin" <eichin+@snorkelwacker>
.br
X-Andrew-Message-Size: 1092+1
.br
Content-Type: X-BE2; 12
.br
If-Type-Unsupported: send
.br
To: Bill Cattey <wdc@ATHENA.MIT.EDU>
.br
Subject: EQ font bug (vax only)
.br
Cc: eichin@ATHENA.MIT.EDU\fR\s12\&
.sp 2
I decided to try EQ to see how friendly it was, specifically as a scratch pad (since
allegedly printing doesn't work yet?) I was running on a vax, and had problems with
any of the large characters, such as parentheses. The following equations should demonstrate
this (also found in \fCeichin:andrew/6003.eq\fR):
.br
.EQ
delim ##
define above "to"
define below "from"
define zilch ""
define thick " ~ "
define med " ^ "
define thin " \^ "
define vartheta "theta"
define varsigma "sigma"
define varphi "phi"
define varomega "omega"
define Alpha "A"
define Beta "B"
define Epsilon "E"
define Zeta "Z"
define Eta "H"
define Iota "I"
define Kappa "K"
define Mu "M"
define Nu "N"
define Omicron "O"
define Rho "P"
define Tau "T"
define Chi "X"
define cint "int"
define product "prod"
define union_op "union"
define inter_op "inter"
define bold-a "fat a"
define * "times"
define down "\(da"
define up "\(ua"
define slash "\(sl"
define approx "\(ap"
define / "\(di"
define cthick " ~ "
define cmed " ^ "
define cthin " \^ "
gsize 12
.EN
#X above {=} left ( z right ) = {1} over {1 + 3 z sup {- 2}}#
#= { {1} over {3}} over {left ( z sup {- 1} + {i sqrt {3}} over {3} right ) left ( z sup {- 1} - {i sqrt {3}} over {3} right )}#
#= {left ( {1} over {3} right ) left ( z sup {- 1} + {i sqrt {3}} over {3} right )} over {left ( z sup {- 1} + {i sqrt {3}} over {3} right ) left ( z sup {- 1} - {i sqrt {3}} over {3} right )}#
#zilch#
.br
The large parenthesis display fine if the source machine is an RT, but if the source
machine is a vax, the lower half of the parentheses will appear 45 pixels or so higher
than they should. In both tests, the display in question was a 6.0R vaxstation.
.sp 1
Any ideas? If you can duplicate this on your setup, it should probably be sent in
to CMU.
.sp 1
(btw. I did conclude that this was a usable equation editor; it is suprisingly similar
to Milo, a Macintosh equation editor done by a physics undergrad at Stanford. I attribute
the similarity to the fact that when there is a clear "right" way to do something,
many designers will see it independantly. Maybe we'll get printing to work on eq soon...)
.br
Mark Eichin
.br
<eichin@athena.mit.edu>
.br
SIPB Member & Project Athena ``Watchmaker''
.sp 1
---------- Forwarded message ends here ----------
.sp 1
Suplementary note: This bug also affects square roots. The horizontal bar appears
lower than it should, but only on the vax. We know very well that this is compiled
from identically the same source code, so what's the buzz? Might it be a bad version
of the \fBfc\fR font compiler?
.sp 1
.nr @f \n(.f
.nr @i \n(.i
.nr @j \n(.j
.nr @l \n(.l
.nr @s \n(.s
.nr @u \n(.u
.br
.sp-1
.cs CW 22
.fi
.ad b
.ft R
.ps 12
.ne 3.2000i
\h'1.2000i'\v'0.9750i'\
\D'l 0.1125i -0.0000i'\
\D'l 0.0000i 0.1250i'\
\D'l -0.1125i -0.0000i'\
\D'l -0.0000i -0.1250i'
.sp-1
\h'1.5125i'\v'0.9250i'\
\D'l 0.1250i 0.0000i'\
\D'l -0.0000i 0.1500i'\
\D'l -0.1250i -0.0000i'\
\D'l -0.0000i -0.1500i'
.sp-1
\h'1.3875i'\v'1.1625i'\
\D'l 0.0750i -0.0000i'\
\D'l 0.0000i 0.0500i'\
\D'l -0.0750i 0.0000i'\
\D'l -0.0000i -0.0500i'
.sp-1
\h'1.2000i'\v'0.9750i'\
\D'l -0.1375i -0.1500i'
.sp-1
\h'1.0625i'\v'0.8250i'\
\D'l 0.0000i 0.2500i'
.sp-1
\h'1.6750i'\v'0.9250i'\
\D'l 0.0500i -0.0875i'
.sp-1
\h'1.5000i'\v'0.8500i'\
\D'l 0.1000i -0.2000i'
.sp-1
\h'1.6000i'\v'0.6500i'\
\D'l 0.1250i 0.1250i'
.sp-1
\h'1.3625i'\v'1.0625i'\
\D'l 0.1000i 0.0000i'
.sp-1
\h'1.2125i'\v'1.2625i'\
\D'l 0.4500i -0.0000i'\
\D'l 0.0000i 0.1500i'\
\D'l -0.4500i -0.0000i'\
\D'l 0.0000i -0.1500i'
.sp-1
\h'0.9125i'\v'1.1750i'\
\D'l 0.2250i 0.1000i'
.sp-1
\h'0.9000i'\v'1.3500i'\
\D'l 0.2250i 0.0125i'
.sp-1
\h'0.9375i'\v'1.5000i'\
\D'l 0.2250i -0.0625i'
.sp-1
\h'1.7000i'\v'1.2375i'\
\D'l 0.2000i -0.1250i'
.sp-1
\h'1.7125i'\v'1.3125i'\
\D'l 0.2375i 0.0000i'
.sp-1
\h'1.7500i'\v'1.3875i'\
\D'l 0.1750i 0.0500i'
.sp-1
\h'1.2375i'\v'1.0375i'\
\D'l -0.0000i -0.0000i'
.sp-1
\h'1.5875i'\v'1.0250i'\
\D'l 0.0000i 0.0000i'
.sp-1
\h'1.3125i'\v'1.3250i'\
\D'l 0.1875i 0.0250i'
.sp-1
.sp 3.2000i
.ft \n(@f
.in \n(@iu
.ad \n(@j
.ll \n(@lu
.ps \n(@s
.ie \n(@u .fi
.el .nf
.sp 1
.ev
