Process the
(solve-process-method-rules method-rules ctx state) → (mv erp nothing state)
For now we just check that it is a true list of symbols, but give this its own input processing function so that we may add further checks in the future.
Function:
(defun solve-process-method-rules (method-rules ctx state) (declare (xargs :stobjs (state))) (declare (xargs :guard t)) (let ((__function__ 'solve-process-method-rules)) (declare (ignorable __function__)) (ensure-value-is-symbol-list$ method-rules "The :METHOD-RULES input" t nil)))
Theorem:
(defthm null-of-solve-process-method-rules.nothing (b* (((mv ?erp ?nothing acl2::?state) (solve-process-method-rules method-rules ctx state))) (null nothing)) :rule-classes :rewrite)