Evaluate an output file.
(eval-output-file outfile curve) → val
Function:
(defun eval-output-file (outfile curve) (declare (xargs :guard (and (output-filep outfile) (curvep curve)))) (let ((__function__ 'eval-output-file)) (declare (ignorable __function__)) (eval-output-section (output-file->get outfile) curve)))
Theorem:
(defthm value-resultp-of-eval-output-file (b* ((val (eval-output-file outfile curve))) (value-resultp val)) :rule-classes :rewrite)
Theorem:
(defthm eval-output-file-of-output-file-fix-outfile (equal (eval-output-file (output-file-fix outfile) curve) (eval-output-file outfile curve)))
Theorem:
(defthm eval-output-file-output-file-equiv-congruence-on-outfile (implies (output-file-equiv outfile outfile-equiv) (equal (eval-output-file outfile curve) (eval-output-file outfile-equiv curve))) :rule-classes :congruence)
Theorem:
(defthm eval-output-file-of-curve-fix-curve (equal (eval-output-file outfile (curve-fix curve)) (eval-output-file outfile curve)))
Theorem:
(defthm eval-output-file-curve-equiv-congruence-on-curve (implies (curve-equiv curve curve-equiv) (equal (eval-output-file outfile curve) (eval-output-file outfile curve-equiv))) :rule-classes :congruence)