diff options
| -rw-r--r-- | library/misctypes.ml | 4 | ||||
| -rw-r--r-- | pretyping/pattern.ml | 3 |
2 files changed, 1 insertions, 6 deletions
diff --git a/library/misctypes.ml b/library/misctypes.ml index 3b629f449..7cd1a83be 100644 --- a/library/misctypes.ml +++ b/library/misctypes.ml @@ -38,10 +38,6 @@ type 'id move_location = | MoveFirst | MoveLast (** can be seen as "no move" when doing intro *) -(** A synonym of [Evar.t], also defined in Term *) - -type existential_key = Evar.t - (** Casts *) type 'a cast_type = diff --git a/pretyping/pattern.ml b/pretyping/pattern.ml index 519a5466b..be7ebe49c 100644 --- a/pretyping/pattern.ml +++ b/pretyping/pattern.ml @@ -9,7 +9,6 @@ (************************************************************************) open Names -open Misctypes (** {5 Patterns} *) @@ -25,7 +24,7 @@ type case_info_pattern = type constr_pattern = | PRef of GlobRef.t | PVar of Id.t - | PEvar of existential_key * constr_pattern array + | PEvar of Evar.t * constr_pattern array | PRel of int | PApp of constr_pattern * constr_pattern array | PSoApp of patvar * constr_pattern list |