Ruler-extenders of a named logic-mode recursive function.
(ruler-extenders fn wrld) → ruler-extenders
See rulers for background.
See ruler-extenders+ for an enhanced variant of this utility.
Function:
(defun ruler-extenders (fn wrld) (declare (xargs :guard (and (symbolp fn) (plist-worldp wrld)))) (let ((__function__ 'ruler-extenders)) (declare (ignorable __function__)) (b* ((justification (getpropc fn 'justification nil wrld))) (access justification justification :ruler-extenders))))