The coefficient
(baby-jubjub-d) → d
This is not zero, is different from
Function:
(defun baby-jubjub-d nil (declare (xargs :guard t)) (let ((acl2::__function__ 'baby-jubjub-d)) (declare (ignorable acl2::__function__)) 168696))
Theorem:
(defthm return-type-of-baby-jubjub-d (b* ((d (baby-jubjub-d))) (fep d (baby-jubjub-prime))) :rule-classes :rewrite)
Theorem:
(defthm baby-jubjub-d-not-zero (not (equal (baby-jubjub-d) 0)))
Theorem:
(defthm baby-jubjub-d-not-equal-to-a (not (equal (baby-jubjub-d) (baby-jubjub-a))))
Theorem:
(defthm not-pfield-squarep-of-baby-jubjub-d (not (pfield-squarep (baby-jubjub-d) (baby-jubjub-prime))))