diff options
Diffstat (limited to 'src/Curves/Weierstrass')
-rw-r--r-- | src/Curves/Weierstrass/Affine.v | 2 | ||||
-rw-r--r-- | src/Curves/Weierstrass/AffineProofs.v | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/Curves/Weierstrass/Affine.v b/src/Curves/Weierstrass/Affine.v index 3a48bf998..cdcb1bec7 100644 --- a/src/Curves/Weierstrass/Affine.v +++ b/src/Curves/Weierstrass/Affine.v @@ -17,4 +17,4 @@ Module W. cbv [W.coordinates]; break_match; trivial; fsatz. Qed. End W. -End W.
\ No newline at end of file +End W. diff --git a/src/Curves/Weierstrass/AffineProofs.v b/src/Curves/Weierstrass/AffineProofs.v index 3401d7b31..2faac22eb 100644 --- a/src/Curves/Weierstrass/AffineProofs.v +++ b/src/Curves/Weierstrass/AffineProofs.v @@ -35,7 +35,7 @@ Module W. {char_ge_12:@Ring.char_ge F Feq Fzero Fone Fopp Fadd Fsub Fmul 12%positive} (* FIXME: shouldn't need we need 4, not 12? *) {discriminant_nonzero:id(4*a*a*a + 27*b*b <> 0)} : commutative_group(eq:=W.eq(a:=a)(b:=b))(op:=W.add(char_ge_3:=char_ge_3))(id:=W.zero)(inv:=W.opp). - Proof using Type. + Proof using Type. Time cbv [W.opp W.eq W.zero W.add W.coordinates proj1_sig]; repeat match goal with |