Let us know if you find that source as it unfortunately doesn't appear to be on netlib.org.
P.S. Yes I know there are a million other APLs out there, as
well as J and the assorted follow-ons. It's the V7 code I'm
specifically interested in. Maybe it's tucked away in the
bitsaver archives ...