From 65c3c384aec8216d4d7f9a6fc50d83201035daf5 Mon Sep 17 00:00:00 2001 From: Robert Sloan Date: Thu, 23 Jun 2016 00:26:13 -0400 Subject: Integrate Pseudize into Pipeline.v --- src/CompleteEdwardsCurve/Pre.v | 11 ----------- 1 file changed, 11 deletions(-) (limited to 'src/CompleteEdwardsCurve/Pre.v') diff --git a/src/CompleteEdwardsCurve/Pre.v b/src/CompleteEdwardsCurve/Pre.v index c1b0e7d71..be8ca24a2 100644 --- a/src/CompleteEdwardsCurve/Pre.v +++ b/src/CompleteEdwardsCurve/Pre.v @@ -60,17 +60,6 @@ Section Pre. unfold onCurve, unifiedAdd'; intros [x1 y1] [x2 y2] H1 H2. field_algebra; auto using edwardsAddCompleteMinus, edwardsAddCompletePlus. Qed. - - Lemma jason : forall (x y: F), - x^2 = y^2 -> x <> 0-y -> x <> y -> False. - Proof. - intros x y A B C; destruct (eq_dec (x - y) 0). - - - contradict C. field_algebra. - - assert ((x + y) = 0 / (x - y)) as Z by (field_simplify_eq_all; field_algebra). - replace (0 / _) with 0 in Z by admit. - contradict B; field_algebra. - Admitted. End Pre. Import Group Ring Field. -- cgit v1.2.3