OK, so it looked like the apply and map were

working but it appears like they aren't.

I have a feeling it has something to do with my using apply-proc instead
of apply, but you can't use apply because the procedure is formatted
like (prim-proc ...)