diff options
| author |  Jade Philipoom <jadep@mit.edu> | 2015-11-03 16:50:42 -0500 |
|---|---|---|
| committer | Jade Philipoom <jadep@mit.edu> | 2015-11-03 16:50:42 -0500 |
| commit | 12c1866eda44252ca7a6382d60a77a830960adfb (patch) | |
| tree | 9e7d816bacee8eca06a72061e5d6e777ddb702dd /src/Galois/GaloisTheory.v | |
| parent | 2c586f398aa8eaca45b99937cb1068923b87e060 (diff) | |
| parent | d2edf784f94d01a238f56e0ce4983739c43a77f1 (diff) | |
Merge branch 'master' of github.mit.edu:plv/fiat-crypto
Diffstat (limited to 'src/Galois/GaloisTheory.v')
| -rw-r--r-- | src/Galois/GaloisTheory.v | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/src/Galois/GaloisTheory.v b/src/Galois/GaloisTheory.v index e95eed864..8fa1b4113 100644 --- a/src/Galois/GaloisTheory.v +++ b/src/Galois/GaloisTheory.v @@ -158,14 +158,7 @@ Module GaloisTheory (M: Modulus). (* Ring properties *) - Ltac GFexp_tac t := - match t with - | Z0 => N0 - | Zpos ?n => Ncst (Npos n) - | Z_of_N ?n => Ncst n - | NtoZ ?n => Ncst n - | _ => NotConstant - end. + Ltac GFexp_tac t := Ncst t. Lemma GFdecidable : forall (x y: GF), Zeq_bool x y = true -> x = y. Proof. |