aboutsummaryrefslogtreecommitdiff
path: root/mathcomp/field
diff options
context:
space:
mode:
authorCyril Cohen2018-07-19 11:56:59 +0100
committerGitHub2018-07-19 11:56:59 +0100
commitcd396d5e5de0ed51278df38961d4a455085fd53b (patch)
treee5e5f5ff58fd3b3c07afd49388afcab5cbbe165b /mathcomp/field
parentb8be28130d6a2a057858e3978c75ee0796630dce (diff)
parent10171942883948c8144ec076ef48eb73f8e49cdd (diff)
Merge pull request #204 from pi8027/replace-coinductive-with-variant
Replace all the CoInductives with Variants
Diffstat (limited to 'mathcomp/field')
-rw-r--r--mathcomp/field/algC.v2
1 files changed, 1 insertions, 1 deletions
diff --git a/mathcomp/field/algC.v b/mathcomp/field/algC.v
index b045c07..f7cb614 100644
--- a/mathcomp/field/algC.v
+++ b/mathcomp/field/algC.v
@@ -470,7 +470,7 @@ Local Notation Creal := (Num.real : qualifier 0 algC).
Fact algCi_subproof : {i : algC | i ^+ 2 = -1}.
Proof. exact: GRing.imaginary_exists. Qed.
-CoInductive getCrat_spec : Type := GetCrat_spec CtoQ of cancel QtoC CtoQ.
+Variant getCrat_spec : Type := GetCrat_spec CtoQ of cancel QtoC CtoQ.
Fact getCrat_subproof : getCrat_spec.
Proof.