diff options
Diffstat (limited to 'src/Util/Factorize.v')
| -rw-r--r-- | src/Util/Factorize.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Util/Factorize.v b/src/Util/Factorize.v index 8ccb7d119..12893cd75 100644 --- a/src/Util/Factorize.v +++ b/src/Util/Factorize.v @@ -70,4 +70,4 @@ Lemma product_factorize_or_fail (n:N) (factors:list N) (H:Logic.eq (factorize_or_fail n) (Some factors)) : Logic.eq (List.fold_right N.mul 1%N factors) n. Proof. cbv [factorize_or_fail] in H; destruct ((fold_right N.mul 1 (factorize n) =? n)%N) eqn:?; - try apply N.eqb_eq; congruence. Qed.
\ No newline at end of file + try apply N.eqb_eq; congruence. Qed. |