diff options
| author | Maxime Dénès | 2018-11-13 22:30:38 +0100 |
|---|---|---|
| committer | Maxime Dénès | 2018-11-13 22:30:38 +0100 |
| commit | 94494770254bec236f2f6fe727ae42b79192afe4 (patch) | |
| tree | c4489280028b7f259498f52c0cfc056455a54ba2 /theories/Numbers | |
| parent | 9fed572705616e30cb02644adab74270703de389 (diff) | |
| parent | 7142034ac3e4d3919d2c1a01df960b79dad70151 (diff) | |
Merge PR #8886: [VM] Fix compilation of int31 eliminators
Diffstat (limited to 'theories/Numbers')
| -rw-r--r-- | theories/Numbers/Cyclic/Int31/Int31.v | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/theories/Numbers/Cyclic/Int31/Int31.v b/theories/Numbers/Cyclic/Int31/Int31.v index 3a2503d6b7..ce540775e3 100644 --- a/theories/Numbers/Cyclic/Int31/Int31.v +++ b/theories/Numbers/Cyclic/Int31/Int31.v @@ -15,6 +15,8 @@ Require Import Wf_nat. Require Export ZArith. Require Export DoubleType. +Local Unset Elimination Schemes. + (** * 31-bit integers *) (** This file contains basic definitions of a 31-bit integer @@ -48,6 +50,10 @@ Inductive int31 : Type := I31 : digits31 int31. Register digits as int31.bits. Register int31 as int31.type. +Scheme int31_ind := Induction for int31 Sort Prop. +Scheme int31_rec := Induction for int31 Sort Set. +Scheme int31_rect := Induction for int31 Sort Type. + Declare Scope int31_scope. Declare ML Module "int31_syntax_plugin". Delimit Scope int31_scope with int31. |