PDP-10 Archive: decus/20-0004/ttyin.com from decuslib20-01

Trailing-Edge - PDP-10 Archives - decuslib20-01 - decus/20-0004/ttyin.com

There are no other files named ttyin.com in the archive.

(FILECREATED "22-Feb-81 00:56:17" ("compiled on " <XMYCIN>TTYIN.;79) (2 . 2) 
bcompl'd)
(FILECREATED "22-Feb-81 00:37:59" <XMYCIN>TTYIN.;79 672441Q changes to: TTYIN 
previous date: "21-Feb-81 23:39:05" <XMYCIN>TTYIN.;78)

TTYIN BINARY
%#$-.8#-.##7,<#7,<Z,<Z`#8,<@#986+sZZ2B+Z[XB`3B+ZZ3B+Z#F+Z#G,<,<#G,<#H,<#IZ`XB,<,<#JZ,<ZZXCpQEp,\XB`Z-,+(,<,<#K,<#K#LXBp,<Zw,<Z-,+"Z,,<,<,<,<,<#M^", ,\QD,\/XB #MXB0B7ZZ(XBZwZ?}3B+0-,+0,+0ZZwXB?}Z+QBZ?~XBZZ1QBXBZw,<?~,<,<Zw2B+9+f-,+<XBpZXBw+>ZwXBp[wXBwZp3B#N+B3B#N+B2B#O+CXB`XB+e2B#O+EXB`+e2B#P+GXB`	+e2B#P+IXB+e2B#Q+KXB+e2B#Q+NZXB`

+e2B#R+RXBXB`XBJZXB`

+e2B#R+TZ4XB+e2B#S+WXBOXB+e2B#S+[XBUXBVXB`XB`ZXB`

+e2B#T+`XBXXBXXB`XB`ZXB`

+e3B#T+c3B#U+c2B#U+dXB`+e2B#V+eXB`+7Zw/ZwZ?}2B+kZZSXBQB+2B+nZXB?}+|-,+y[?}-,+uZwZ?}ZiQBZw[?}ZqXB+|Zw,<?},<#V,<#W#WZwXB?}+|-,+|-,+|b#XZwXB?}ZwZ?}-,+ZsQBZ`3B+Z?}-,+Z+
ZP2B+Z`3B+
,<?}#Y0"+
ZwZ?}+
Z#ZZ~XBZwZ?}2B+ZXB`Z]3B+ZXBZ3B+Z3B#T+Z0"+ #[Z
,<Z"{#2+,\2DZZ(BwA"?."XB`1b+Z`XBZA(BsA"?."XB`1b+$Z`XBZ`2B+&X",<#[,<,<@#9`+GZZ#\XB,<,<,<,<,<,<,<ZZXBZw{,<8~XBXBZw{Z8+u-,+rXBw}ZZw|XB8+y,<ZZw{XB8,\,<,xZw}3B+xZgXB,sXBw}ZwZ2B+Zw}Z2B77+,sXBw}ZXBZ3B+Zw}G"@+Zw}Z7[ZZ1H+2D+XBw3B+-XBp[XBw-,+Zw2B+ZBZA2B+-+Zw-,+Zwb#]3B+-+ZpXBwZZ,J+u,<#^,<,q+u1B+1B

+_0B
+Z7Z(2B+b,#+uZO,<[bZ,\2B+rZRZ`2B+qZc,<,<#K,8,<,<,AZL2B+p "/ " ",S+u,#+uZXBV,<,TZk2B+ " "[h,<ZwXBfXBf,\XB[x[[,<[{[Z,\XBZ},<,<,<,'+u[ZZy2B+Z,<,h+uZ,<,p[Z,<,

[,<,<,<,'+u0B+,[ZZ3B+$,<#u,<,q+uZ,<[$Z,\2B+(,#+uZ,<,<,N,<,h+u0B,<,<,pXBw}3B+O+HZ71B+OZZy3B+OZ#ZXDXBw}ZE3B+OZ"
s+u0B+Y,<,<#T,M2B+uZ3B+X,<w},<,
s+u,#+u1B+[0B+^,<,
2Zw|,<?,+u0B+gZw{Z82B+d,<,<,<,<,mZw|,<?,2B+u,C+u1B+k1B+k1B+k0B-+tZw{Z82B+p,<,<,<,<,mZw}0B+s,2B+u,<w},
2+u1B+v0B.+	Zw{Z82B+{,<,<,<,<,mZLXBw~,<w},
2ZU3B+u,3B+uZ1B+0B+u",!73B+u,<w~,Q+u0B+XZ3B+Zw|Z?}2B+ZZ0BXBw~,<w},
2Z}3B+u[%ZZ2B+uZw~ZB3B+u,sXBw}0B+,,<#`,U3B+y,J,F+u1B+-+y,<,
2,sXBw}0B+y,<#a,U3B+yZ1B+50B+7,<,<w~,+u,<w~,Z",<,<,<,'+uZw|Z?}2B+=Z<,<,<w~,<,pXBw}2B+C,#,<w},
2+u,<,<,<,<w},m3B+G+u,F,

,<#a,A,<Zw}-,Z,<,A[w},<,<w},<,pXBw}3B+R,<#b,A+IZp/Z23B+U,<+uZ8,<,<,<,'+u0B+Z#Z3B+^ZXBr,<#K,<,q+u,+u0B+&Z-2B+qZ[2B+dZX3B+qZY,<,
2B+o,<#b,<,"+u,!<ZXBaZkZY3B+[UZZq2B+wZtXBq+Zh3B+ZR3B+,"*+>Zw{Z83B+2B#O+,<,<,<,<,mZw3B+Z,<,<,
3B+%+"Zg3B+"Zx[Z}2B+%Z1B+"ZH3B+%Z,<,<,1,sXBw}1B?+,0B+-Z"?+./"A"."XBw},<,<,
s+uZ2B#R+8ZvZ22B+8ZXB#""/"++z,#+u0B

+`Z'3B+JZ`2B+JZZ<3B+J,<w},<,
s+u #c3B+L,#+u,<,T,F,

Zw{Z83B+VZ[3B+T[,<,<8#I,<#dZw{,<8#J,<#d,<#IZ3B+Z #e,A[F,<Zw{,<8@#e@+_,<#f"#g,~+u1B+u0B+b+u0B+i,F "/ "! " "#g+u1b+qZw{Z8

3B+oZw}1"0+n1b=/"+oZw},<,
2+uZC3B+t,<w},<,
s+u,#+uZXBpZP[,<,<,<,'+uZw}Zw{XB8

,<w},Q,,7Zw{Z83B+,<,<,

LZw|,<?,<,<Zw2B++

-,+XBpZXBw+
ZwXBp[wXBw,<p,<,

L+Zw/ZFZZ2B+Zw~+FZZ83B+Z:3B+Zw|Z?~2B+Z#h,<,h+>ZZvQBZq3B+D,<,	DXBw~ZZ3B+>Z 2B#T+0Zw~2B#i+)[w~+*Zw~XBw[2B+0Zw-,+0,<w~Z,d#iXBw~[#XB0,	t,<Z0Z$3B+7Z21B+80B.+7+8Zp+9[4XB8+2/Z8Z23B+>,<,],!<,Zw}0B+=[w~2B+=Zw~-,+=,<#j,Q+=Z:XB,YXBw,	tZ:2B+YZw3B#`+J2B#k+OZw|Z?~3B+Y,<,h3B+Y+X2B#k+Y6@+R^"+R^"  "a,<"#lZ"(XB,<#l,AZXB,<#m+>Z,<,<,<Zw-,+]+ZwXBpZw}Zp1B+c*-,+d*,2B7 3B+ZDZF3B+j[p[Z2B+j+,<w}Ze,<Zf2B+nZ+t[w[Z2B#P+sZk,<,<,
!+t,<,	D,<@#n`+Zw}[8Z-,+~Zw}[8Z,<Z,<Z,<Z",,~Zw}[8Zb#],~3B#o++[wXBw2B+]Zw/+/+0,<w,
!+<Zw,+<Zw{Z8	3B+!Z

3B+,<wZ
,<,<,
!,+<Z,<,<,
!+<Z83B+'Z3B+&ZwZ,+<Z+<,<w,<,<,<,	tZ
2B+++9,YXBw}Z"3B+/Zw}+1,<w},QB+9Zw,XBpXBw+)Zw/+</+>,XBw~Z3B+Zw~-,+Z=,<,< ",XBw2B+D+>3B+Zw/+XB`2B+OZ`3B+&,AZZ)3B+NZKZQB #p+&Z`XB`,<,<#M#7ZW3B+WZ3B#p+U7@+W $ "+,AZ`

0B+b7@+bZQ3B+bZM aB +b " !7+b1D+b+ Z3B+nZ`XBZXBbZ`-,+n #c3B+i+nZ`-,+kB#q+n,,<,<#q$#qZXB`ZX3B+rZ%3B#T+r #eZ`,~+Z[Z,< "  "ZpeB@ XFD2F+1B+|1B6@++7@+ZZ2D+ "  "+ " ",,~Zs[."ZQB[,<[,\/"."Z#2B+

XB,~Zw2B+Z"XBwZp2B+[ZXBp,<Zw~Zw2B++#Zw~/"A"?."1"0+1b=/"Zw~2B+!>w "0B+ Zw~+Zw~XBp,<w~,XBw~+Zp+Zp2B+'ZXBp,<,<Zw~0B+*+0ZwZw~3B+-2B+.Zp+,<,XBw>w~+(ZwZw~3B+-2B+4+-,<,XBw,<p,XBp+0[&Z,<,<Zw1B+@Zw~Zw2B+=+@,<,XBw~>w+9Zw~+Zp-,+E-,+Db#X+E[,ZZ." ZU3"+L,>,>#,>,,^/,^ " ZEXB=hM+,7Zp,<ZL[,\2B+UZQ[+VZSZXBp3B+,<,A+,	tZL2B+\Z,~ZY,<,<,<ZJZ\2B+`+	Z^/"A"?."XBp1B+i1B+i1B-+i1B.+i1B+i0B+s0B+lZp3B+l+~ZwZ^2B+	ZpA"?Z."Z,<[`XBq,\+1B+	1B+	0B+v+	0B+~Zj2B+}[qZl3B+~[yZ0B+~[{XB}ZwZ}XDZwXBw,<,XBwZ~,<,XB	+^Zw[y2B+		Z	A"?Zo."Z+Z	Zw  ,3F+	Z/",[+

,+,<,	tZ	Z		3B+	CZ	/"A"?."1B+	0B-+	Z	,<[	XB	,\,<,	D+1B+	0B.+	Z[+0B+	)[	XB	,<Z	,<,i2B+	$Z	!XBpZ	 ,<,<,
!,<[wXB	$,\+0B+	:[	'XB	*Z	*/"A"?."1B+	91B+	90B+	0+	9,	XBpZ	3B+	92B#r+	5Z#r+2B#s+	7Z#s+,<#t,<,+Z#t+0B

+	BZ	+,<,XB	;,	XBpZ	13B+	A,<#uD#u+Z#v+,Y+Z	>+,<,<,<,	tZ	#2B+	HZw+Z	<0B+	MZw~3B+	G[	HXB	K+	G0B.+	QZw~0B-+	G[	LXB	O+	G0B+	lZw3B+	lZw~3B+	l[	PZ	F3B+	l[	UZ/"A"?."1B+	\1B+	\0B+	l[	W[XB	\,	XBpZ	C2B+	bZ#vXBp+	m,	tZ	U3B+	hZ	]1B+	f0B.+	hZwZpQD+	H,<wZ#v,XBw,\QB+	m,	XBpZp,XBpZw3B+	rZwZpQD+	sZpXBwZpXBw+	E,<Z	dZ	b3B+	|Z	u/"A"?."1B+	}1B+	}0B+	|+	}Zp+	[	wXB	}+	u/Z	~,~Zp2B+
Z	uXBp,<,<Zw~Zw2B+
+
!Zw~1B+
	0B-+
Zw~XBp[w~,<,<w~,
XBw~3B+
Zw2B+
Z+Zw~0B.+
Zp1B-+
Zw~+1B+
0B.+
+
0B+
[w~,<,<w~,iXBw~2B+
+
0B+
[w~XBw~Zw2B+
+
[w~XBw~+
+
Zp2B+
$Z
XBp,<w,<,ZwZw2B+
(+
1Zw3B+
,Zw0B+
,[wXBwZw/"A"?."/",,<w,XBw+
% ,+,

xZU:[7ZZ;2B+
=Zp,<p,[
4[[,<Z
3Z,\XB+
qZv2B+
@Zc3B+
X,<#K,<w,"j,<p,[
8[[,<[
B[[Z." ,\XDZZG/.",<Z
:Z,<Zw0b+
QZw0B+
WZ\3B+
WZ
O3B+
SZ"+
TZ,<,\ZpZ
I2B+
W,/+
qZ
5/"aB@+
mZ
X/"A"?."1B+
^0B+
iZ
Z,<[
^,<,aZ
_,<,<Zw1B+
d+
gZwZ$XD[wXBw+
bZp/+
mZ
a,<,<#K,<,,<,#,<,
iZpXD[
nXB
p,<#M,Z+Zw1b+
wZw1B?+
w,<,
2+Zw0B+
}Z
pZ
#2B+
|,<#b,	+,#+0B+Zp2B+,2B+,<#w,
2+0B,,<#x,
2+0B+,C+,<#K,ZwG"@,<,,<#x,
2,<#KZw0B?+Z"+G" ,<,$+Z
Q3B+Z
KZ."Z
U1b77++Z,~[
DZZ
y2B+,<#y,	+,<#y,<,"Z,~Z,<,<w,p,\,<,+^"p   " $Z+,<Zw3B+6Zw2B+2+6Zw~Zw2B+5Zw~+[wXBw+.Zp+Z'1B+:0B+;Z+<Z,~,"3,~,I,<Zw},<,I,<Zw|,<,I,<Zw|,<,I,<Zw{,<,I,<Zw{Zw{XCpQEp,\ ,\XCpQEp,\ ,\XCpQEp,\ ,\XCpQEp,\ ,\XCpQEp,\+,<,TZ73B+V,";[[[[[3B+`[V[[[[,<,X[Y[[[ZQD[],<ZXB
y,\XB[`[[,<Z)Z ,\XDZ,~,<,TZaZa2B+nZT1B+n0B+o,<p,+2B+yZM2B+uZ2B+t ".Z"XBp,<p,

ZpZ	2B+

x+

,<pZj,<,W,<Zk1B+,<p,!Q,"3+

p4b

,>#,>,<#K,!Q ",<#K,!Q>`x5

//[c,<ZwXBzXBi ,\XDZ+[pZ

3B+

[p,<,

Zp/"`B@+

Zr2B+

Zp+

2B#y+

 " ". ":u+

 "ZeZ/"Z

XB+Zw3B+

 ,<,<w,W+

!Z,<Z|0B+

2Zp3B+

+,<Zw3B+

'Z"+

(Z",\/"."Zw~1b+

C "Zw~/"4B

/  "=f

. "

"+

K0B+

CZp3B+

>,<Zw3B+

7Z"+

8Z",\/".",<Zw} /$." ,\1b+

CZw~/"4B

B""=f

@+

K,"3,<w~,<w~,!XBpZw3B+

KZ

ZZp/.",<,<,,Z+,<w#z,,<Z

G[,<,<,<,<,<Zw}3B+

[Zw3B+

WZXBwZ

N[+

XZ

UZXBw3B+

[,<,<w|#I[w~ZXBpZw~XBw,<ZwZw2B+

aZp+

iZw0BP+

c[wXBwZw},>#,>Zw ,^/,<w,XBw+

^/[w~[[[[XBw~Zw}2B+

pZw~Zp3B+

q,<w|#mZw~3B+

wZpZ

3B+

QZw~Z

s2B+

QZw~/,~Z

3B+

2B+

}2".+

x1b+ZXB

~,~,<Z

,<,,<,
XBp3B+

u3B+Z+
(2B#T+

W[3B#{+?."1B+
[ZZ+Z+Z+,<p,<ZwZ

,<Z[[[,<Z,W,<,<Zw,<[Z,\2B+[ZXD[[[[[XBpZZw2B+ZpZXD[pZZw2B+[pZXD,"3+,<w,<w~[Z,<,<,

Z,<,<w~,a[[[,<[ [[ZZw/.",\XBZ",<,13B+*,<,\/Z+Z[,<Z,<Zw~2B$+5[w[ZXBw~[w[[[ZXBw+:2B+8ZpXBw~+:Zw2B+:ZwXBwZpZ2B+@Z"XBp " ":wZw~Z;2B+CZ"XBw~:wZ

!2B+E+s1B+SZwZw2B+LZw~Zp/#1b+S+QZw~Zp2B+QZwZw/#1b+S,<w~,<w~,v+sZpZw~0"+XZw~Zp/.",<,!j+hZw~.",<ZwZw~/ ,\.$0"+eZwZw0"+a:w+b,<#K," " ",<w~,!j+hZpZw~/.",<,!QZwZw2B+k+sZw1b+pZwZw/.",<,"+sZwZw/.",<,!f/ZpZ,QBZwXB+Zt[Zp/$.",<,<wZw0"+ZwZw/."XBwZ"+ZwZ	1"+ZwZw/."Z/$."."XBwZ/"+Zw,<,"{ZwZvQBZwXBZ+,<,p[[[[Z,<,,,,7,~Z/"Z	QBZC1B+0B+,<pZ/",<,"{Z"ZQBZpXB+Z+,<,AZZpXD['ZZ2B+#[[ XD["XB#+Zw1B+'/",<,[!ZZ#2B+.Zw/"4B- Zp=f,+/,<w,<w,"j w4b5,>#,>Z:,<p,>`x51/['[[,<[5[[ZZw/$." ,\XDZZ@1b+?,<,\+@,<#M,Z+ZpZ2B+E,<,XBB+,<,IZw  D ,\QD+Z7Z(2B+M,#,~ZJ,<,<#K,<,$,<,,~ "Zp/"4BU  "=fT "

 "+ZD  [2D+YZpQDZp3B+`Z$XD[XBp+\Z+ZpZX2B+dZwXBa+ZZ1XBQBZw,<Zw,<[w,<Zw~[cQDZj[w~QD,\ ,\XCpQEp,\+ZeZ,<,<wZM,<,W ,\/.",<,<,,ZpXBr+ZpZ,<Zw,<,<wZJ,<,^XBw,<,W,\/".",<,<,,ZpXBz+,<$[{[[[[XB,<,,ZXB,~Z,<,1Z	,<,<w,RXB
ZXB+Zp [aD@+Zk aD+1F+[++[p2B+,<pZ, ,\QD[+ZxZZp/$."Z<0"+ Z+Z[

ZZ1Z,<,<,	Z3B+/Z3B+/,<#K,<w,W[#[[Z,<[)[[[Z,<,,Z/+Zp0B+3,+,<,<,"+Zw3B+;Zp3B+;,<,<,<,.+Z+Z&3B+@ZZ,<[,<,,,~,83B+EZ=~"$,~Z,~ZB[QBZXB,~ZZFXBQB[2B+NZ,,<ZK[N[QD,\,~~,Zp/"QB@+Z
0B+Zw3B+2B+,#+,V3B+,+Z~+ZZ~2B+,#+ZZ2B+&Z,<,<#K,8XBp,<[wZ,<,A+Z,<,<w~,<,$,<,p+0B+1Zw3B+.Z"XBw~+Z&,<,<w~,N,<,p+0B+<Zw3B+5Z"XBw~+,V3B+8,#+Z.,<,<w~,<,v,<,x+0B+CZ ,<>w~ ",<,`XBp,<[wZ,<,A+0B+IZ=,<>w~ ",<,8,<,<,A+0B=+MZd[,<,<,A+0B>+R,pXBp,<[wZ,<,A+0B+cZw3B+VZ"/XBw~+[DZZ2B+\Z2B+[Z"+,#+ZV,<,<w~,`XBp,<,<,3,<,,<,A+0B/+vZw3B+gZ"XBw~+ZJ[Z\2B+j,#+Zh,<Zg[,<[,\/"."Zw~2b ,<,8XBp,<,<,3,<,,<,A+0B%+~[jZZ82B+z,#+Zx,<,<w~,7,<,
=+Zw~1B+Z"XBw~+Zk[Z2B+ZY,<,p,<#b,<,"Z[,<,<,A+,<Z[/",<,,Z

,<,<#K,8,<,<#b,RZ,<,<#K,8XBZXB+1B)+!1B-+!0B!+%,<,s,<,<w},<w},p+0B +-Z[3B+,[,<Z,<,<w},<w},p+,#+0B&+0,<w~,<,!+0B*+3,<w~,<,!+0B!+6,<w~,<#K,!+0B#+IZ&[Z3B+D[8ZZ2B+DZ9,<,<w~,8XBw,<Z7Z,<,XBp,<[wZ,\2B+E,#+,<p[wZ,<,<,p+0B.+RZ:ZW2B+M,#+,<,,<,<,
2B+QZJ,<,]+0B-+YZJZ2B+V,#+,<,<,{,<,]+0B+tZ<,<[ZZ,\2B+_,#+Z2B+bZ
>3B+eZS,<,<w~,N,<,+[[ZZb3B77+oZf1B+n1B+n1B-+n0B.+n+n7ZXBp,RZi,<,<w~,<w,v,<,

+zZw~0Bt+yZpZP3B+y,!<ZXB+1B+|0B
+Zw~0Bt+,S+Ze,<,<,+0B"+&Z`3B+[ZZv2B+,#+Z,<,<w~,<,vXBp,<[Z,\3B+ZZ3B+,<,<#K,<,$Z,<,f2B+,<p,<#KZ,<,$XBwZ/"A"?."1B+1B+0B+ZwZ3B+XBp,<p,,<,<,,,<w[w[,<,!Zp0B+,<#K,!QZtZ/"Z}XB+0B'+,<#b,<,"+0B/+ZA3B+,]XBp3B+,<@#+"+,Y,~XBp3B+-,+Zw~0B+,<pZ=d$+,<p,<#M$+,#+Zw~/"0"0b,XBw~3B+XBw~+,#Zw~ZXBZ+ZXBw+z,sXBw~/"0"0b2XBp3B+)Zw~1b2+$Z"t+(Zw~/"$"."Zp/$."XBw~+Zw3B+zZw~0B+zZ"XBw~+zZp0"+8ZpG"@,<,Zp0B
XBpZw}2B+	Zw2B+Zw~+3B+XBw~+!Zw~XBwZw~0B-+!Zw}0B.+!Zw~XBw+!0B+[w~Zw}2B+Zw~2B+Zw+Z+[w~XBw~+!0B+![w~,<,<w},iXBw~2B+!Zw~2B+ Zw+Z+[w~XBw~+}Z`,<["Z,<Zw~3B+2ZW,<,<ZwZw3B+.Zw1B+,+.,<w,XBw+(Z&Zw3B+1,<,<,aZp/[#Z.XD[2[[,<ZZZ,\XB,"3Zw3B+:,FZ4,<,<w~,RXB:Zw2B+?,F[<ZpXDZ32B+E[?,<[wXB@,\XB+PZBXBC,<,<w,![E[[,<Z6Z,\XBZH,<,13B+P,<,<,WZw3B+TZwXBL[ZXBF+U,<w,1,<Z+,<#MZwZw2B+ZZp+Zw/"`B@+]:p[wXBw+W[pZZw2B+l[p[[ZZ[3B+i[p[[[[ZZw2B+l,<w,<#KZw,<,$+Zw+,<,<,<,<,<,<,<,<Zw|2B+zZSZ{2B+xZwz2B+wZs+xZ+x, ]XBw|3B+Zw{2B+ZJ[,<,<w{,<,pXBw{3B+o+Z+o,<w|Zr,<,W."XBw~Zw{XBw|Z-,ZXBw{b#YXBw~Zwz2B+

Zw~/"Zw~2B+XBw},<Bw~+,\7[2B=dXBw},<[w|,<,<w{Z,<,pXBw|2B++:Zwz3B+Z+oZXBwZw|-,ZXBw,<w},<,<,<Zw|XBw|Zw{XBwZw~-,+%+4ZXBp w|,>#,> w ,^/3b+++4,<w},<w|,

x,<w{,<Z"XBw}Zw}Zw}2B+RZp3B+MZ3B+MZ{Z,,>#,>,<pZ,<,W, ,^//,,<,<,,,<pZE,<,! w},>#,> w| ,^/3b+[+`Zw{Zw3B+XZwZw{XDZp2B+XZwXBp[w{XBw{[wXBw:w}+=Zw{,<,
2Zw}Zw|3B+`[w{XBw{:w}+[/Zw3B+kZwz2B+k,<#w,
2ZB[3B+kZw~1B+k,<w{[2B+kZd$Zw3B+nZw{2B+oZ//,~Zp2B+sZKXBp,<,<Zw~XBpZp-,+w+

ZpZ3B+	Z3B+	-,Z-,+~-,+
[,Zw~Zw+
Z

/,3L+h
2L+
G*0*00j=+
[3B+=(+
Zp+ZeQB[pXBp+uZw+[p,>#,>Zw-,+-,+[,x7[."4b2b+/"&".&7`=$."+,<w,<w$b$/+[w[[[[,<,<,<,<Zw}ZR2B+/Z	[Z!2B+/Zw~2B+(,#+Z#[,<Z,\3B+/Zv,<,p[$Z,<,Z+,<ZR,<,<,{,<@$@+Z`1B+^0B-+]+^Z,~Z`,<ZU,<,<,<,Z`2B+m,YXB`3B#i+jZ([2B#{+kZ`Z,3B+k,YXB`,	tZ`2B+m+r[`XB,YXB`ZwZ82B+r+],F,<$
,<,<@#9`+ZZ#\XBZwZ82B#`+~,<#mZw,<8"$,<#M,<#M,<$+,

Zw,<8"$

ZwXB8,<8,A,<#|,AZwZ83B+-,+,<,A,<#Z,A+,<Zp-,++,<Zp,<,A[p3B+,<#~,A/[pXBp+	/,<#},AZ,~2B+ZwZ82B#a+,Z,~+Zp3B+2ZVZ=2B+2,<p,<,<,<Zw~-,+ +1ZXBw+/,<ZeZ ,\/."XBp0b+(+/,<p,,<$
2>`x5,/Z+1[w~XBw~+Zw/+Z+Z#Z1B+60B/+8Z3Z,~Z6ZXB,~Z8[,<,<,<wZw,<,<w~,13B+A[w~Z+B[w~Z[,<,.3B+EZw+[w[[[[XBw2B+J$[wz[[Z ,\/."XBw{ZXBw|XBwZw{XBwZw{0"+Zwz3B+{[w{[ZZ/$."Zf0"+{,<w,<wzZr,<,,<,<,KXBw|2B+,<w{Zt,<,XBw}Zwz2B+Z%3B+,<w,<w|,<,KXBw|3B+ZXBw+Zw}XBw|+Zw~3B+Zw{1B+,<w},<,XBw}[w{ZZw}3B+QZ2B+Zwz3B+[w{Z,<,<w|,<wy,KXBw|3B+XBw}2B+QZwz3B+Q,<w[wzZ,<,<,KXBw|2B++QZXBw+Zwz2B+"Z/,~Zw~2B++[w{[[Z,<[wz[Z ,\/Zv/$1b+2,<w,<wzZ),<,,<,<,KXBw|3B+OZXBw+Zw{,<[wzZ,\3B+O,<w},T2B+O,<w}Z,,<[wz[Z,\/".",<[wz[[Z ,\/Zw{/$2b /".",<,XBw|,<[w}Z,\3B+LZw},<,<w{,<,KXBw|3B+MZw|XBw}+Q[w{ZZ$XDZw}XBw{+M[w{ZXBw~Zw}2B+UZ"XBw{+s[w{[[Z,<,<w,,,<w~,<w|,WXBw{Zw~2B+lZw~Z$XD,<[w}Zw|3B+b[w}Z1B+cZp+f,<w}[w},<,a+^/Zw{,<,<#K,<w},#Z0B+l,<w~,AZ$XD,<w~,<w|,![w{Zw}XD[w{[[,<Z:Z,\XB,<$,<w},,,<w}Zw{3B+{Z$XDZw~3B+z:w{[w|+{Zw|,\XB[w}ZZw}2B+,<w},<,Zwz3B+>wz "1B+!+a[w{[[[[XBw{+M,<w{Zw},<[w|Z,<,<,

[w}[[,<[w}[[ZZw{/.",\XBZw}XBw{+M[w{[[,<Zwz,<,<w{,W,<[wz[Z,\/"."XBw|,\XB,<w|[wzZXBw},<,WXBw{Zw|Z{3B+$,<,<w,,,"3[w{Zw|XDZw3B+*Zw|Z$XD>w{[w|XBw|Zw}3B+?Zw~2B+7Zwz2B+5Zw~0B+?[w}[[ZZw{/$."Z!0"+?,<w},T2B+?,<$Zw}XBwz,<,,Zw~2B+B:w{Zw~Z$XD[XBw~+B,<w{,<,RXBw{[w{Zw~XDZw{Zw|XD,<,<w}[wzZ,<,"T[w{[[,<[wz[[ZZw{/$.",\XBZw{3B+!:pZwz3B+a>wzB"0B+aZXBwz+a[pZ,<ZwXBw,\3B77+Zp0BD7Z+,F,<p,<,WZqZ,,>#,>[][[Z,B,^/3b+gZ,<,]+,<+Z,<@$+&Z,<,<$,<$,<@#9`+ZZ#\XBZ,<@#4p+,<$,<$,,Zk,XBuZp2B+Z$Z3B+,<$,<$,<$,<$,,Zv,XB~ZXBw#mZwZ82B+,<,<,'+-,+Z82B+,>#,>[wZ, ,^//,,<,<,<,< w~0b+

+ w~/" $@w~Zw~ "XBw1B+,<,<,
s+Zw~ " w~/" $@w~,0b+Z+,<w,<,
sZwXBp+
Zw/+,<,<Zw-,+&ZZw,XBw3B+&,<w,<#K,<,#ZQD,<w[^,<Zw~-,+*Z7+*Z,<,<$XBwZw-,+1[wXBw,<,<#K,<,#XBpZ&,<,<#K,<w~,#ZQD,<w,<w,<,pZ/+Z/3B+=Zp A"`1B+@+?Z: A"|`1Bp +@7Z,~,<#MZw3B+HZw,<,<w,<w~,^XBw,<,WXBp+IZwXBw[w[ZZp/$.",<[w~[[[Z,<,,ZwXBeZwXB`+[QZZP3B+XZS1B+\0B-+X+\ZU,<,,<,<,N,<,pZ,~,<p,:,<,<w,A+,<,<Zw1B+h[w~[[[[XBp2B+g+hXBw~>w+aZw~+,<ZwZw2B+l+uZw0B+oZw+0B+s[wXBwZw2B+sZ+[wXBw+jZp+[RZ,<Zw~Zp2B+zZp+[w~XBw~Zw~Zp2B+~+yZw~,<,f3B+Zw3B+,<w~,<w,
Zp+

[w~XBw~+/Zw3B+>w"1B+Zw~Zp2B+Zw2B+Zw~+[w~XBw~+{,<wZw,<[w~[Z ,\/.",<,+Zp0b+Zw+Zw,<[wZ,<,<Zw~0B+$+,ZwZw2B+'Zw+0Zw/"aB@+*ZwXBp++>w~[wXBw+"Zw/"aB+/Zp+0Zw/+[pZ,<[w[[[[Z,\2B7Z+Z=[,<[,<Zw0B+<+DZwZw~3B+?2B+@Zp+[w[[[[XBw>w+:ZwZw~3B+?2B+H+?[w[[[[XBw[p[[[[XBp+DZv,<ZN,<,<,<,<#MZw~Zw}2B+T+^Zw~,<,f3B+XZXBw+\Zw3B+\Zw~XBwZXBw:p,<w~,XBw~+RZw}3B+b1B+bZp0B+eZw2B+Zw~+Zw}/."XBw}0"+iZw~+Zw}0B+l,<w~,<,
s+~[w~Zw3B+~,<#b,	[w~,<Zw2B+Z1,<Zw}[QD,\QB,\XBw~+q,<Zw2B+	Zp+[w[[[ZwXD:w[w[[[[XBw+,<Z8Z,<Z,<,52B+Z[,<Z,<,5XBp3B+%,

xZ,<[,<Z,<Z"[w~XCpQEp,\,\,,<,<w,<,pZZXBZZ"QB+&,#Z+[w[[[Z,<,<ZXBT,<,$Zw3B+/,<#M,+;,FZ83B+:,!JZ01B+5,<#M,<w,v+;,<#K," " "Z"Z$XB+;,Zw0B+AZUZ9XB/"4BA  "=f?,<w~,OZw~,<[w}Z,<,!Zw~3B+N[w~[[[[XBp3B+NZw~3B+NXBw~,:w+AZw~2B+P,";,<Z+,<p,<,{,<,<,<,<Zw~2B+WZ+,<,:XBw[w[[[ZXBw,<Z=[,\/"."0"+`+VZw,<,<w~,W,<[w~[Z,\/"."XBp " !7 2B+j+V,F,<p,<w,vZ-,+nZ",<,),<+VZw1"0+r1b=/"XBwZp3B+~Zw~0B)+wZ"!+}0B!+yZ")+}0B-+{Z"S+}0BS+}Z"-+} $
2B+Z+\Z,<,,<,<w,,<,p,\,<,2;7`x+06"!7++/+[pZ,<Zw,<[wZ,<,<,<Zw~Zw~3B+>,<,<#K,<,$XBpZ1B+<+>ZpXBw~+6Zw~Zw3B+L[w}[[,<[w}[[Z,<,<w},<w},W+,\/.",\XB,<w~,<w~,a[w}Zw~XDZw+[ZZ2B+ \,<,<#K,<,$Z1B+ \, ],<,<,<Zw2B+WZ+ [Zw~2B+cZw0B+VZw~0B

Z
wZxZ(`B@+ ZB<h Z[
(2J+ Zw~3B#T+ ! ,>@B6@+ S"+ + , Zp2B1B+ ,<,
2+,#+S"Zw~2H#U+576db@+eb + 
2+7B/+[Zw~B@B/(,>#,>#,>#,>#,>#,>#,>#,>#,>#,>#,>#,>,>,>,>7@+/Z&G",<<",$,^"z,<7@+3,<,$,\3B+cS	+ZwZbx4BA."XB[2F+ 7x4BE0"+?0B2B+ h+ Zw/"A"?."1B+ l0B+ nZXBp+ ~1B+ t1B+ t1B+ t1B-+ t1B.+ t0B+ vZXBpZwXBw+ ~Zp3B+ ~Zw3B+ |Z,3B+ |Z+ZwXBwZXBp[wXBw+ fZp2B+!

Z)2B+!Z+!+!Z+!+!+!Zw/"`B@+!ZwZ ,::p[wXBw+!Zp+Zw0Bt+![ dZZ!2B+!Z!,<,p+!,RZ!,<,<w,<,v,<,<,^,<Z!,<,<,<ZwZw~2B+!'+!8ZwXBp/"`B@+!6Zp1b +!6,<wZw}3B+!20B+!/ZXBw}Zw1"0+!21b=/"+!5Zw1" +!51b-.",\XB,<w,XBw+!%Z!#,<Zw~XB!8,<,!Zw+Z!9,<,<ZwZ"2B+!@+!HZw0B+!B^"+!DZw/"A"?."  " &,<w,XBw+!=Zp/,S,~Z O0B+!N "

 ",~0B+!P "

,~Z,~Zp/"4B!U  "=f!S+Z!J0B+!^ "Zp/"4B![  "

 "+0B+!eZp/"4B!c+Z"/"4B!j0+"=f!h+Z!U0B+!pZp/"4B!o.,"=f!n+0B+!vZp/"4B!u/Z"QB,\,<,vZ!w0B+" " " " " "

,",~0B+"+"#Zp/"4B""  "

=",",~0B+"2+"6,",~0B+":,"[,\/"."." ,\/.",<Zp1B+"N " "Zp/"4B"K  "

Z"0"+"S,",<ZwZw3B+"\,<w~,<,WXBp,<,<w~,<w~,W+,\1b+"^,<w~,<w,!+"iZ";0B+"c,<p,Q,<w~,<w~,!+"i0B+"iX"[w~XBw~+#  BQ<P@` @P"s]]gN8{P!J 	e0B)L!PlB@"@( $B

	R	,e6

"$Be#BJeBJIvT80LFd`Pl"H&F/5$zS"	u(B5TB2(e`$N{g%Z

!6xO!$"GYN!$" z2 6R";\D3'jX"$dp

1Bm	B-9eEzA`0HCF5!\JX$EQI
E,!($LF4%E	%!8@@R`*U4D "(	"\=QG(		J$ T#2(P@DA- @2ADh3

H" 	@$J#D
Ua#$f>6R

h$H@	!)"	 G;3 8L
"@r@B	D$"	@$f

*T2!4@qH%%$Bq=f`"T@AQ&0@D$` K`Q

T@H*$PAD$AP "U*J!&R#n-$G	AR"iP hC04H$D+$C@
h8ZL!!3
Th@z4k! @phtS#K@r"`%XBi

Tc$RRQ)i@dk!$* d!h
D8Bp-SE&|`	 	"~@($Jx@0B
) @(D	$	  (`)YHJI4 2@dLHBE	Db"Ib"B		@D(	0&"`@@"A 4dT4wb<1,' 16I(P@I HDD$AdAI($D(bJQ@$

@LI	 	H@Q&(ZO "4N

!9F7Z`AB"qUA""!(%DAd

D@$@JH@ E	P
E@

$@RHD A1a@P&@`O^H" SB @dN J*XAQ#

%VZJ>@QH0)^W2X-$Q!@RA/.1`HT&A )D=" *I$RPDDN	0!JR "A"A
@$		A  DJ4$H@P"(PROMPT . 1)
(SPLST . 1)
(HELP . 1)
(OPTIONS . 1)
(FILE . 1)
(TABS . 1)
(UNREADBUF . 1)
(VARIABLE-VALUE-CELL LISPXREADFN . 3710Q)
(VARIABLE-VALUE-CELL TYPEAHEADFLG . 552Q)
(VARIABLE-VALUE-CELL CAR/CDRNIL . 50Q)
(VARIABLE-VALUE-CELL TTYINBUFFER . 21174Q)
(VARIABLE-VALUE-CELL DISPLAYTERMFLG . 21366Q)
(VARIABLE-VALUE-CELL DEFAULTPROMPT . 331Q)
(VARIABLE-VALUE-CELL TTYINMAILFLG . 3735Q)
(VARIABLE-VALUE-CELL TTYLINELENGTH . 15150Q)
(VARIABLE-VALUE-CELL TTYPAGELENGTH . 21172Q)
(VARIABLE-VALUE-CELL EDITPREFIXCHAR . 11611Q)
(VARIABLE-VALUE-CELL TTYINREADMACROS . 1007Q)
(VARIABLE-VALUE-CELL EMACSFLG . 11405Q)
(VARIABLE-VALUE-CELL TTYINCOMPLETEFLG . 12011Q)
(VARIABLE-VALUE-CELL USERWORDS . 13325Q)
(VARIABLE-VALUE-CELL LASTWORD . 1615Q)
(VARIABLE-VALUE-CELL SHOWPARENFLG . 17330Q)
(VARIABLE-VALUE-CELL ?ACTIVATEFLG . 2024Q)
(VARIABLE-VALUE-CELL CTRLVFLG . 2600Q)
(VARIABLE-VALUE-CELL ORIGBUFFER . 3475Q)
(VARIABLE-VALUE-CELL TTYINRESPONSES . 3263Q)
(VARIABLE-VALUE-CELL TTYINUSERFN . 3600Q)
(VARIABLE-VALUE-CELL HOSTNAME . 17713Q)
(VARIABLE-VALUE-CELL CTRLUFLG . 3712Q)
(VARIABLE-VALUE-CELL EDITBIT . 11363Q)
(VARIABLE-VALUE-CELL ARROW . 20470Q)
(VARIABLE-VALUE-CELL ENDBUFFER . 20574Q)
(VARIABLE-VALUE-CELL null . 4676Q)
(VARIABLE-VALUE-CELL BUFFER . 13734Q)
(VARIABLE-VALUE-CELL READING . 20402Q)
(VARIABLE-VALUE-CELL FCHARAR . 4417Q)
(VARIABLE-VALUE-CELL CURSOR . 20570Q)
(VARIABLE-VALUE-CELL INSERTING . 12212Q)
(VARIABLE-VALUE-CELL AUTOFILL . 14435Q)
(VARIABLE-VALUE-CELL DELETING . 17126Q)
(VARIABLE-VALUE-CELL TTYINBSFLG . 6364Q)
(VARIABLE-VALUE-CELL NOFIXSPELL . 6705Q)
(VARIABLE-VALUE-CELL REPEAT . 11552Q)
(VARIABLE-VALUE-CELL CHCONLST1 . 13034Q)
(VARIABLE-VALUE-CELL SPELLSTR1 . 15540Q)
(VARIABLE-VALUE-CELL SPELLSTR2 . 15543Q)
(VARIABLE-VALUE-CELL EDITCOMSL . 13720Q)
(VARIABLE-VALUE-CELL TTYJUSTLENGTH . 14561Q)
(VARIABLE-VALUE-CELL LISPXHIST . 15321Q)
(VARIABLE-VALUE-CELL RESETVARSLST . 15376Q)
(VARIABLE-VALUE-CELL CTRLO! . 15400Q)
(VARIABLE-VALUE-CELL HISTSTR1 . 15764Q)
(VARIABLE-VALUE-CELL HISTSTR0 . 16100Q)
(VARIABLE-VALUE-CELL INITPOS . 17171Q)
(VARIABLE-VALUE-CELL MACSCRATCHSTRING . 17776Q)
(VARIABLE-VALUE-CELL COMMAND . 20363Q)
(NIL)
(LINKED-FN-CALL . POSITION)
(NIL)
(LINKED-FN-CALL . DRIBBLEFILE)
(VARIABLE-VALUE-CELL INITPOS . 0)
(0 . 1)
(0 . 1)
(0 . 1)
NIL
NIL
(NIL VARIABLE-VALUE-CELL BUFFER . 0)
(NIL VARIABLE-VALUE-CELL ENDBUFFER . 0)
(NIL VARIABLE-VALUE-CELL CURSOR . 0)
(NIL VARIABLE-VALUE-CELL ARROW . 0)
(NIL VARIABLE-VALUE-CELL DELETING . 0)
(NIL VARIABLE-VALUE-CELL INSERTING . 0)
(NIL VARIABLE-VALUE-CELL EDITBIT . 0)
NIL
(NIL VARIABLE-VALUE-CELL AUTOFILL . 0)
NIL
(NIL VARIABLE-VALUE-CELL NOFIXSPELL . 0)
NIL
(NIL VARIABLE-VALUE-CELL REPEAT . 0)
(NIL VARIABLE-VALUE-CELL COMMAND . 0)
(NIL VARIABLE-VALUE-CELL READING . 0)
NIL
NIL
NIL
T
T
(READ VARIABLE-VALUE-CELL LISPXREADFN . 0)
CAR
CDR
(NIL)
(LINKED-FN-CALL . PRIN2)
" of NIL was smashed with "
(NIL)
(LINKED-FN-CALL . PRIN1)
(NIL)
(LINKED-FN-CALL . PRINT)
12Q
1
(NIL)
(LINKED-FN-CALL . ARRAY)
0
DISPLAYTERMP
NOFIXSPELL
MUSTAPPROVE
CRCOMPLETE
NOVALUE
STRING
COMMAND
REPEAT
NORAISE
TEXT
FIX
READ
LISPXREAD
EVALQT
FILE
DIRECTORY
USER
TYPEAHEAD
2
-2
(NIL)
(LINKED-FN-CALL . SUBSTRING)
(NIL)
(LINKED-FN-CALL . MKSTRING)
(NIL)
(LINKED-FN-CALL . NCHARS)
...
MAILWATCH
((DUMMY) . 0)
ERRORSET
TTYINREAD
ALWAYS
(NIL)
(LINKED-FN-CALL . EVAL)
177Q
27Q
((NIL) . 0)
33Q
?
?=
"one of "
", "
37Q
15Q
GUESTUSER?
^Y
"lisp:
"
MWNOTE
(VARIABLE-VALUE-CELL TTYINBUFFER . 0)
(VARIABLE-VALUE-CELL LISPXREADFN . 0)
__
USEREXEC
(NIL)
(LINKED-FN-CALL . LOGOUT)
"Terminate text with control-Z."
E
(NIL)
(LINKED-FN-CALL . NCONC)
135Q
HELP
CRT
SETBACKSPACE
okay
(NIL)
(LINKED-FN-CALL . TERPRI)
(VARIABLE-VALUE-CELL COMMAND . 0)
(VARIABLE-VALUE-CELL BUFFER . 0)
(VARIABLE-VALUE-CELL LINE . 3370Q)
IGNORE
ERROR!
SUMEX-AIM
EDITE
((REPACK) . 0)
S
'S
s
's
QUOTE
'
TTYIN
STKEVAL

%.
40Q
233Q
444Q
536Q
1040Q
LF
(NIL)
(LINKED-FN-CALL . OPNJFN)
*
%(
%)
%[
%]
%"
,
106Q
(NIL)
(LINKED-FN-CALL . FIXSPELL)
"  please try again."
LINE
(NIL)
(LINKED-FN-CALL . DREMOVE)
(NIL)
(LINKED-FN-CALL . ADDSPELL)
10Q
211Q
440Q
(NIL)
(LINKED-FN-CALL . DCHCON)
(NIL)
(LINKED-FN-CALL . MOVETOP)
(NIL)
(LINKED-FN-CALL . NTHCHAR)
(NIL)
(LINKED-FN-CALL . CHCON1)
(VARIABLE-VALUE-CELL BUFFER . 0)
(0 . 1)
NIL
NIL
((DUMMY) . 0)
XHELPSYS
(NIL)
(LINKED-FN-CALL . TAB)
SMARTARGLIST
240Q
SHOULDNT
(VARIABLE-VALUE-CELL LISPXHIST . 0)
NIL
NIL
((DUMMY) . 0)
INTERNAL
OUTPUT
(NIL)
(LINKED-FN-CALL . OUTPUT)
CTRLO!
INTERRUPTCHAR
17Q
((CTRLO!) . 0)
(NIL)
(LINKED-FN-CALL . INTERRUPTCHAR)
% 
ERROR
(NIL)
(LINKED-FN-CALL . RESETRESTORE)
"Please select from among "
", "
", or other"
STRPOS
DISPLAYHELP
"Sorry, no help available."
4
SPRINTT
(NIL)
(LINKED-FN-CALL . SETFILEPTR)
76Q
1750Q
(NIL)
(LINKED-FN-CALL . DISMISS)
(SKNI FIXT SKSTP ALIST2 IUNBOX MKN FILEA IFSET GUNBOX URET6 URET2 MKSP UNP1 
MKSTR1 MKSTRS LIST2 MKATM PAC PACS URET3 UPATM URET4 URET5 URET1 URET7 CONS 
CONSS1 EVCC FMEMB KL20FLG SKI SMALLT CF SKLA SKNLA SKNSTP SKLST ASZ BHC LIST 
CONSNL SKNLST SKNAR KNIL KT BLKENT ENTERF)mA`88/`u"  @`,8`hxD"	AJf0
H
0@vI`HM>Vv(T SQ 	PS#	1#/8"z. ]H1Sx?R9HK9A7P)sPm]H<8p|PBnp
~/P
x
2
2
/
&	9

!h!vN@oJ0L`[qHX#-0)^HARPO0j
xTZx86X
3"H
AXj@IH.P!"P%(")$8!wh!p0!g`!^`1dx8L9C`'-h+HZ@3Cp

hd

0U`4 8`8y|Xy(FtPeH

A@p5h#.8	D8	B	:	7X	)p	X
q]Pi\XdO8u~@~X.p&DwPCohDiZPc F( ,8r}8eX|{ Uj#@o"8.v(r}AX

 o#
0k"|.X"r-h"l,@"`*"I(`"D("<&x"5&"+$X"$$"#8""!{!r!m@!hH!`p!Yp!Sp!KP!D!5@!2!.8!)!`!@ s  q o

K0 @ P p}v~Hs}pj{@Zz0Hw@sr8ox}o@{o yown`rnnl``kp?gH9f8 y^xu](h\pb\<U`(T8S8NnL(WJhLBPBP9p20[*0L'X4&)#8 @xHj(^PO@BH+ t
6X'h]{@p hgP\U8R Q`P xNxsN(qMhMgI`HF(/EP,E'D`$D8 DB`@H?Hw=`j=c< ]9`L98H8pF8HC8?7P;7 76 )4x%4@"43030(~/H{.hu-Xl-8j+(S) 7&@1%`&$ #x!  pohd8V8N(DP5(-0P
~H{ yPo
@2X~`^z8:u8&s rXp8o`{ormphkXWhhCgX&XH

L(

JGx

<G

8Fx

3EX

)E

'D0

?Xu=`m7 91x0x/h
y.`
t,`
d+h
]+P
\+ 
S)x
N)0
/%h
-%0
"x
"P
"
	!	|0	z	xh	eH	[(	Z	Rx	N 	;	/`	-H	*x	H	h	P	Pw`u@j

pf

Pd

0b	P;@( 8z~pYj`?fh5bX]hm] c\ aX0:Up.UP,U0'THP`LYFP4F-ECAx
@H>hu>k=(i=;8Z:(I8(-3x1@+h])hM&h5&H&$X$$ !$#PS0"`X(!!I@ Z  !v1QP8CX<:7ep"(/(sHpnajIf`*V01vXte8

xM(

g@p

-
X Lxp<w0p`:aXS*(=

x(&~.`N	n(lxx8vXqp/%H0(6H.
`{nh$chkP-``K%8~:p!#1p#1"{-("U*@"O'0"3% "h!wh!Q`!/X!%P!"!

` d

  ]8 Y S
 58 1 |YzxVzXUz6v`rqp(tmhjxVjXUjHQi(Ff.eH+e0'dH"cb`p_0q^n]@d\\[ WZGWx7T(Q`	PXPsM(fLaKP[H0AG 8Fp5F+D`#CpC(A(
Az>`r< Y;X9`J9G8X?7H;6h*5$4 3 10@z/n+`[+T*O(;&x/%X,$x

  yp_HL1@"`@p{lX\@[0Z YXQ	HIH?H3p`PPt} b|^{UzCx<v't!ttn@rmhmm(gl@bjpKh @gH6ex!d cPc0bPa `~_8z_v^(q^p]xo]hnZpQZOYh>W (Th!SpRxQ(O`}NcL^K FH0BE("DC@Bp

A?d;@W:0Q996h20o-b,X*O%x("P"XUPI(7@,

t0r q

@b

]V	`M	(F(=@:p5H0&P w|Xa{X[yxAwp

{O

sMh

^K

UJH

SJ

QJ

LI0

GFh

4Dh

$D

B(s> p=`;U7@05p.5'4`3200
s,0
T*(
Q(
>%
%$0
"
 H
^	u	U8	K`	EP	#yx~h|Xc{8SyHxX>v81u`)u(t@"ts0rXrFXH@W80U#ToShRpR@RQxU:N9@J9 H8?7H:766(1606/5(#3`2p0 .Xs-Pk+@Y+U*Q)(H(@2&/%h'#0! }0w8qhdPPK88/p.`-P,@(%(
M@97H1`+H$8"HpP(	!

x!P m

h c0  mSixXZ 8H,B(I7X3X2P1p

100/Pt+@Y-J/pP/Xz~@of
(!ch702pQx@'tXlHYkU`yXVXHH?n<(.@'!X`

TTYINREAD BINARY
,<,<XBp3B+

[p2B+	Zp-,+

[p,<Z,DXBZp+2$(VARIABLE-VALUE-CELL LISPXID . 4)
(VARIABLE-VALUE-CELL HISTSTR0 . 25Q)
(VARIABLE-VALUE-CELL READBUF . 30Q)
EVALQT
(NIL)
(LINKED-FN-CALL . TTYIN)
NCONC
(URET1 CONSNL SKNLST KNIL ENTER0)

	h@

DISPLAYTERMP BINARY
$"#-." "a .",<Z3B+ZpZ7[ZZ1H+
2D+[+6@+Zp0B+Z"+0B	+Z"+1B+1B+1B+0B+Z"+Z+Zp0B+Z"+1B+0B

+Z"+1B+ 1B+ 1B+ 0B	+!Z"+Z+	**@(VARIABLE-VALUE-CELL DISPLAYTYPES . 14Q)
(KL20FLG URET1 KNIL ASZ ENTER0)H0"Px@((!hH(P0p@

SETREADFN BINARY


Z`2B+Z2B+

3B+	Z

Z3B+	Z

+	Z6<(FLG . 1)
(VARIABLE-VALUE-CELL TTYINBSFLG . 6)
(VARIABLE-VALUE-CELL LISPXREADFN . 23Q)
DISPLAYTERMP
TTYINREAD
READ
(KNIL ENTER1)H

TTECHOMODE BINARY
-.Z2B+Z,~,<`",~(FLG . 1)
(VARIABLE-VALUE-CELL LISPXREADFN . 3)
TTYINREAD
ECHOMODE
(KT ENTER1)

TTED BINARY
XIV-.I,<"K,<,<L"K,<,<,<,<Z`2B+ZLXBZw~Zw~3B+

,<M"KXBwZwZw~3B+Zw~-,ZZZ2B+[w~Z-,+[w~[Z-,+,<w~"M+Zw~,XBw~Z`3B+,<,<w},<` ",+!,<N,<,<,<N,<,<,<w{.OXBw2B+$ O+,<,<w}$P3B+),<P,<$QZ+Zw~Zw3B+-Zw~Zw~2B+5ZwZw~3B+0[w3B+1Zw+2ZwZQ,ZR,ZR,+Zw-,+G[w2B+GZw~,<,<S"KXBw~DSXBp3B+G,<T,<T,<UZw~Zw}2B+A+C:p[w}XBw}+>Zp/XBwZw~,,<,<w~,+ZUZw,+@aaX2AJT$iqD(FN . 1)
(C . 1)
(VARIABLE-VALUE-CELL COM . 20Q)
(VARIABLE-VALUE-CELL COMMENTFLG . 40Q)
##
((^) . 0)
ED
((UP) . 0)
GETCOMMENT
"** "
LISPXREAD
TTYIN
ERROR!
EQUAL
"(not changed)
"
PRIN1
WITH
((1 TO) . 0)
REPLACE
((0) . 0)
MEMB
COMSQ
0
1
:
(LIST4 CONS BHC CONS21 KT URET5 EVCC CONSNL SKI SKLST KNIL ENTER2)x	FD5H3(J	6$78=0&0!phX

TTYINPEEKC BINARY

-.Z3B	+Z+Z`2B+Z,~Z,<`"
,~H (FILE . 1)
(VARIABLE-VALUE-CELL LISPXREADFN . 3)
TTYINREAD
PEEKC
(KNIL KT ENTER1)hx@

TTYINREADP BINARY
	-.	Z3B+ZZ2B+Z`2B+Z,~,<`"
,~(FLG . 1)
(VARIABLE-VALUE-CELL READBUF . 6)
(VARIABLE-VALUE-CELL HISTSTR0 . 7)
LISPXREADP
(KNIL ENTER1)h

TTYINREADPREP BINARY
-.Z2B+ZXB,~Z,~(VARIABLE-VALUE-CELL LISPXREADFN . 3)
(VARIABLE-VALUE-CELL ID . 7)
TTYINREAD
(KNIL ENTER0)X

CHARMACRO? BINARY
-.Z2B+Z2B77++Z,~ " !7 2B+ "  Z0B+ " "0 ";Z`-,+B,~,~L(MACRO . 1)
(VARIABLE-VALUE-CELL READING . 3)
(VARIABLE-VALUE-CELL LISPXID . 6)
(VARIABLE-VALUE-CELL DISPLAYTERMFLG . 26Q)
EVALQT
*
APPEND
(SKLST ASZ KT KNIL ENTER1)

	X 	p
(* Copyright (c) 3675Q Stanford Heuristic Programming Project)
(PRETTYCOMPRINT TTYINCOMS)
(RPAQQ TTYINCOMS ((E (RESETSAVE (RADIX 10Q))) (FNS * TTYINFNS) (FNS * 
TTDISPLAYFNS) (COMS (* Support functions. These are all macros or for debugging)
 (FNS * TTSUPPORTFNS)) (COMS (* Auxiliary fns. These are outside the TTYIN 
block, and are provided to aid the outside world in special interfaces to TTYIN)
 (FNS * TTEXTRAFNS)) (DECLARE: DOEVAL@COMPILE DONTCOPY (COMS * TTCOMPILETIME)) (
VARS (TTYINBUFFER)) (INITVARS ?ACTIVATEFLG EDITPREFIXCHAR EMACSFLG SHOWPARENFLG 
TTYINBSFLG TTYINCOMPLETEFLG TTYINMAILFLG TTYINUSERFN TYPEAHEADFLG (null "") (
DEFAULTPROMPT "** ") (TTYJUSTLENGTH 110Q) (TTYPAGELENGTH 30Q)) (P (MOVD? (QUOTE 
NILL) (QUOTE GUESTUSER?)) (MOVD? (QUOTE FIXSPELL) (QUOTE FIXSPELL!!)) (MOVD? (
QUOTE HELPSYS) (QUOTE XHELPSYS)) (PUTDQ? SPRINTT (LAMBDA (X) (PRIN1 X))) (
ECHOCONTROL 10Q (QUOTE REAL))) (ADDVARS (TTYINREADMACROS) (TTYINRESPONSES) (
DISPLAYTYPES) (LISPXCOMS (STOP . OK)) (BREAKRESETFORMS (TTECHOMODE T)) (
RESETFORMS (TTECHOMODE T))) (ALISTS (BAKTRACELST USEREXEC *PROG*LAM)) (
LISPXMACROS TV BUF) (USERMACROS ED BUF) (ADVISE LISPXFIX) (PROP VARTYPE 
TTYINREADMACROS) (DECLARE: DONTEVAL@LOAD (P (CHANGENAME (QUOTE LISPXREADP) (
QUOTE PEEKC) (QUOTE TTYINPEEKC)) (CHANGENAME (QUOTE READLINE) (QUOTE PEEKC) (
QUOTE TTYINPEEKC)) (CHANGENAME (QUOTE LISPXBLOCK) (QUOTE PEEKC) (QUOTE 
TTYINPEEKC)) (AND (GETD (QUOTE COMPSETREAD)) (CHANGENAME (QUOTE COMPSETREAD) (
QUOTE PEEKC) (QUOTE TTYINPEEKC))) (CHANGENAME (QUOTE EDITBLOCK) (QUOTE 
LISPXREADP) (QUOTE TTYINREADP)) (SETREADFN)) (VARS (PROMPTCHARFORMS (/NCONC1 
PROMPTCHARFORMS (QUOTE (TTYINREADPREP))))) (ADDVARS (AFTERSYSOUTFORMS (SETREADFN
)))) (DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (
NLAMA TTBOUTN TTBOUT) (NLAML CHARMACRO? TTED !SETQ ! CAPABILITY?) (LAMA)))))
(RPAQQ TTYINFNS (TTYIN ADDCHAR ADDCHARS.INSERTING ADDNAKEDCHAR ADDSILENTCHAR 
ADDTAB ADJUSTLINE ADJUSTLINE.AND.RESTORE AT.END.OF.SCREEN AT.END.OF.TEXT AUTOCR?
 BACKWARD.DELETE.TO BACKSKREAD BINARY.MODE BREAKLINE BUFLEN BUFTAILP 
CHECK.MARGIN CLEAR.LINE? COMPLETEWORD CREATE.LINE DELETE.TO.END DELETELINE 
DELETETO DELETETO1 DO?CMD DOTABS ECHOFILE EDITCHAR EDITCOLUMN ENDELETE ENDREAD? 
FIND.LINE FINDBREAK FINDMATCH FIRSTWORD FIXWORD FORWARD.DELETE.TO GIVEHELP 
GIVEHELP1 GIVEHELP2 GO.TO GO.TO.ADDRESSING GO.TO.FREELINE INIT.CURSOR 
INSERT.CHAR.IN.BUF INSERTCONS INSERTLINE KILL.LINES KILLSEGMENT LASTLINE LOADBUF
 MODE.CHANGE? MOVE.BACK.TO MOVE.FORWARD.TO MOVE.TO.LINE MOVE.TO.NEXT.LINE 
MOVE.TO.START.OF.WORD MOVE.TO.WHEREVER NEWLINE NEXTCHAR NEXTCONS NEXTLINE 
NEXTQUOTE NEXTWORD NTH.COLUMN.OF NTH.RELATIVE.COLUMN.OF NTHCHARCODE OVERFLOW? 
OVERFLOWLINE? PREVLINE PREVWORD PROPERTAILP READFROMBUF RENUMBER.LINES 
RESTORE.CURSOR RESTOREBUF RESTOREMOD RETYPE RUBOUT SAVE.CURSOR SCANBACK 
SCANFORWARD SCRATCHCONS SETLASTC SETTAIL? SHOW.MATCHING.PAREN SKIP/ZAP SLEEP 
SPACE/PARENP START.OF.PARAGRAPH? STRIPBLANKS TENEXCOMPLETE THISWORD TTBIN TTCRLF
 TTCRLF.ACCOUNT TTNLEFT TTNTH TTPRIN1 TTPROMPTCHAR TTRATOM TTREAD TTREADLIST 
TTSKIPSEPR TTSKREAD TTYINSTRING TYPE.BUFFER U/L-CASE UNREADBUF))
(RPAQQ TTDISPLAYFNS (&DISPLAYCOMMENT CAPABILITY? BEEP CANCEL.MODES DELNCHARS 
DO.BACK DO.DELETE.LINES DO.DOWN DO.FORWARD DO.HOME DO.INSERT.LINE DO.UP 
ERASE.SCREEN ERASE.TO.END.OF.LINE ERASE.TO.END.OF.PAGE INSERT.TEXT INSERTNCHARS 
INSERTSPACES.DM SET.CURSOR))
(RPAQQ TTSUPPORTFNS (! !SETQ ADD1POS BIN EDITNUMBERP INPART INSERTING L-CASECODE
 TENEXP TTBOUT TTBOUTN TYPEAHEAD? U-CASECODE PR! PRALL PRBUF PRLINE))
(RPAQQ TTEXTRAFNS (SETREADFN TTYINPEEKC TTYINREADP TTYINREADPREP TTYINREAD 
DISPLAYTERMP TTECHOMODE TTED CHARMACRO?))
(RPAQ TTYINBUFFER NIL)
(AND (EQ (EVALV (QUOTE ?ACTIVATEFLG)) (QUOTE NOBIND)) (RPAQ ?ACTIVATEFLG NIL))
(AND (EQ (EVALV (QUOTE EDITPREFIXCHAR)) (QUOTE NOBIND)) (RPAQ EDITPREFIXCHAR NIL
))
(AND (EQ (EVALV (QUOTE EMACSFLG)) (QUOTE NOBIND)) (RPAQ EMACSFLG NIL))
(AND (EQ (EVALV (QUOTE SHOWPARENFLG)) (QUOTE NOBIND)) (RPAQ SHOWPARENFLG NIL))
(AND (EQ (EVALV (QUOTE TTYINBSFLG)) (QUOTE NOBIND)) (RPAQ TTYINBSFLG NIL))
(AND (EQ (EVALV (QUOTE TTYINCOMPLETEFLG)) (QUOTE NOBIND)) (RPAQ TTYINCOMPLETEFLG
 NIL))
(AND (EQ (EVALV (QUOTE TTYINMAILFLG)) (QUOTE NOBIND)) (RPAQ TTYINMAILFLG NIL))
(AND (EQ (EVALV (QUOTE TTYINUSERFN)) (QUOTE NOBIND)) (RPAQ TTYINUSERFN NIL))
(AND (EQ (EVALV (QUOTE TYPEAHEADFLG)) (QUOTE NOBIND)) (RPAQ TYPEAHEADFLG NIL))
(AND (EQ (EVALV (QUOTE null)) (QUOTE NOBIND)) (RPAQ null ""))
(AND (EQ (EVALV (QUOTE DEFAULTPROMPT)) (QUOTE NOBIND)) (RPAQ DEFAULTPROMPT "** "
))
(AND (EQ (EVALV (QUOTE TTYJUSTLENGTH)) (QUOTE NOBIND)) (RPAQ TTYJUSTLENGTH 110Q)
)
(AND (EQ (EVALV (QUOTE TTYPAGELENGTH)) (QUOTE NOBIND)) (RPAQ TTYPAGELENGTH 30Q))
(MOVD? (QUOTE NILL) (QUOTE GUESTUSER?))
(MOVD? (QUOTE FIXSPELL) (QUOTE FIXSPELL!!))
(MOVD? (QUOTE HELPSYS) (QUOTE XHELPSYS))
(PUTDQ? SPRINTT (LAMBDA (X) (PRIN1 X)))
(ECHOCONTROL 10Q (QUOTE REAL))
(ADDTOVAR TTYINREADMACROS)
(ADDTOVAR TTYINRESPONSES)
(ADDTOVAR DISPLAYTYPES)
(ADDTOVAR LISPXCOMS (STOP . OK))
(ADDTOVAR BREAKRESETFORMS (TTECHOMODE T))
(ADDTOVAR RESETFORMS (TTECHOMODE T))
(ADDTOVAR BAKTRACELST (USEREXEC **TTYIN** ERRORSET TTYIN) (*PROG*LAM (NIL EVALA 
*ENV*) (**TTYIN** ERRORSET TTYIN)))
(ADDTOVAR LISPXHISTORYMACROS (BUF NIL (TTYIN LISPXID NIL NIL (QUOTE EVALQT) NIL 
NIL (LIST (COND (LISPXLINE (VALUOF LISPXLINE)) (T (CADDR (CAAR LISPXHISTORY)))))
)))
(ADDTOVAR LISPXMACROS (TV (APPLY* (QUOTE EDITV) (CAR LISPXLINE) (QUOTE ED))))
(ADDTOVAR USERMACROS (ED NIL (COMS (TTED))) (BUF NIL (E (LISPXUNREAD (TTYIN (
QUOTE *) NIL NIL (QUOTE LISPXREAD) NIL NIL (LIST (QUOTE E) (##)))) T)))
(ADDTOVAR EDITCOMSA ED BUF)
(PUTPROPS LISPXFIX READVICE (NIL (BEFORE NIL (COND ((AND (EQ LISPXREADFN (QUOTE 
TTYINREAD)) (NOT COMS) (ILESSP (COUNT INPUT) 62Q)) (RETURN (TTYIN LISPXID NIL 
NIL (QUOTE EVALQT) NIL NIL INPUT)))))))
(READVISE LISPXFIX)
(PUTPROPS TTYINREADMACROS VARTYPE ALIST)
(CHANGENAME (QUOTE LISPXREADP) (QUOTE PEEKC) (QUOTE TTYINPEEKC))
(CHANGENAME (QUOTE READLINE) (QUOTE PEEKC) (QUOTE TTYINPEEKC))
(CHANGENAME (QUOTE LISPXBLOCK) (QUOTE PEEKC) (QUOTE TTYINPEEKC))
(AND (GETD (QUOTE COMPSETREAD)) (CHANGENAME (QUOTE COMPSETREAD) (QUOTE PEEKC) (
QUOTE TTYINPEEKC)))
(CHANGENAME (QUOTE EDITBLOCK) (QUOTE LISPXREADP) (QUOTE TTYINREADP))
(SETREADFN)
(RPAQ PROMPTCHARFORMS (/NCONC1 PROMPTCHARFORMS (QUOTE (TTYINREADPREP))))
(ADDTOVAR AFTERSYSOUTFORMS (SETREADFN))
NIL