(rdb-test bsp i) is true iff the field of
This is analogous to Common Lisp's
Function:
(defun rdb-test (bsp i) (declare (xargs :guard (and (bspp bsp) (integerp i)))) (let ((__function__ 'rdb-test)) (declare (ignorable __function__)) (not (eql (rdb bsp i) 0))))