(ipasir-init$c ipasir$c state) → (mv ipasir$c state)
Function:
(defun ipasir-init$c (ipasir$c state) (declare (xargs :stobjs (ipasir$c state))) (declare (xargs :guard (eq (ipasir$a->status (ipasir-get ipasir$c)) :undef))) (let ((__function__ 'ipasir-init$c)) (declare (ignorable __function__)) (b* (((mv solver state) (ipasir-init$a (ipasir-get ipasir$c) state)) (ipasir$c (ipasir-set solver ipasir$c))) (mv ipasir$c state))))