Read the
In the execution this is an array access, but the logical definition is just a thin wrapper for nth:
Function:
(defun npn4s$ai (stobjs::i npn4arr$a) (declare (xargs :guard (and (npn4arr$ap npn4arr$a) (integerp stobjs::i) (<= 0 stobjs::i) (< stobjs::i (npn4s$a-length npn4arr$a))))) (ec-call (maybe-npn4-fix (ec-call (nth stobjs::i npn4arr$a)))))