Construction of the circuit.
(field-sub-circuit) → pdef
This is a PFCS definition with a single equality constraint of the form described in field-sub.
Function:
(defun field-sub-circuit nil (declare (xargs :guard t)) (let ((__function__ 'field-sub-circuit)) (declare (ignorable __function__)) (pfcs::parse-def "field_sub(x, y, z) := { (x + -1 * y) * (1) == (z) }")))
Theorem:
(defthm definitionp-of-field-sub-circuit (b* ((pdef (field-sub-circuit))) (pfcs::definitionp pdef)) :rule-classes :rewrite)
Theorem:
(defthm sr1cs-definitionp-of-field-sub-circuit (b* ((pdef (field-sub-circuit))) (pfcs::sr1cs-definitionp pdef)) :rule-classes :rewrite)