# APL for Sanders S-700
# Mostly Unix APL names
# A 1.2 12/7/85

name A
internalname APLA1047
spare1 0
spacewidth 96

charset
\|	16	0	0
\^	8	0	0
"	96	2	33
)	96	3	34
<	96	0	35
le	96	0	36	less than or equal
<=	"			(CAT name)
=	96	0	37
>	96	0	38
]	96	3	39
or	96	0	40	(looks like "v")
&	96	0	41	and (looks like "^")
ne	96	0	42	not equal
!=	"			(CAT name)
%	96	0	43	divide
,	96	0	44
+	96	0	45
.	96	0	46
/	96	3	47
0	96	2	48
1	96	2	49
2	96	2	50
3	96	2	51
4	96	2	52
5	96	2	53
6	96	2	54
7	96	2	55
8	96	2	56
9	96	2	57
(	96	3	58
[	96	3	59
;	96	0	60
#	96	0	61	multiply
:	96	0	62
\	96	3	63
sg	96	2	64	(minus) sign
al	96	0	65	alpha
*a	"			(CAT name)
bv	96	0	66	decode/base/bottom
si	96	0	67	set intersection
fl	96	2	68	(left) floor
ep	96	0	69	epsilon
*e	"			(CAT name)
_	96	1	70
dl	96	0	71	del/nabla/grad
de	96	0	72	Delta
*D	"			(CAT name)
it	96	0	73	iota
*i	"			(CAT name)
jt	96	0	74	jot/null
'	96	2	75
qd	96	2	76	quad
br	96	2	77	remainder/residue/modulus/...
|	"
rp	96	0	78	encode/rep./top
ci	96	0	79	circular function
*	96	0	80
**	"			math. star
?	96	2	81
rh	96	1	82	rho
*r	"			(CAT name)
cl	96	2	83	(left) ceiling
nt	96	0	84	not
~	"
ap	"
dr	96	0	85	drop/down arrow
su	96	0	86	set union
om	96	0	87	omega
*w	"			(CAT name)
sc	96	0	88	superset
tk	96	0	89	take/up arrow
ss	96	0	90	subset
sp	96	0	91	assignment/left arrow
<-	"			(CAT name)
lt	96	0	92	"left tack"
go	96	0	93	goto/right arrow
->	"			(CAT name)
ge	96	0	94	greater than or equal
>=	"			(CAT name)
-	96	0	95
di	96	2	96	diamond
A	96	2	97
B	96	2	98
C	96	2	99
D	96	2	100
E	96	2	101
F	96	2	102
G	96	2	103
H	96	2	104
I	96	2	105
J	96	2	106
K	96	2	107
L	96	2	108
M	96	2	109
N	96	2	110
O	96	2	111
P	96	2	112
Q	96	3	113
R	96	2	114
S	96	2	115
T	96	2	116
U	96	2	117
V	96	2	118
W	96	2	119
X	96	2	120
Y	96	2	121
Z	96	2	122
{	96	3	123
rt	96	0	124	"right tack"
}	96	3	125
$	96	2	126
no	96	0	127	"not" (CAT character; not APL)
