diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2010-07-18 11:29:23 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2010-07-18 11:29:23 +0000 |
commit | e4a667a4503de1ebda52aee4aa5e08fb0711f1ce (patch) | |
tree | c4ff3db280f0dd3ac6c132b701fc6073a4f6323e /theories/FSets/FMapList.v | |
parent | adf6390ab7bf96b0ffd699e96bd6b27bd9d99d98 (diff) |
Tentative de suppression de l'import automatique des hints et coercions.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13293 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/FSets/FMapList.v')
-rw-r--r-- | theories/FSets/FMapList.v | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/theories/FSets/FMapList.v b/theories/FSets/FMapList.v index f15ab222c..d6fc88338 100644 --- a/theories/FSets/FMapList.v +++ b/theories/FSets/FMapList.v @@ -13,11 +13,12 @@ left projection. *) Require Import FMapInterface. +Import Morphisms. (* For Hints *) Set Implicit Arguments. Unset Strict Implicit. -Module Raw (X:OrderedType). +Module Raw (Import X:OrderedType). Module Import MX := OrderedTypeFacts X. Module Import PX := KeyOrderedType X. @@ -1154,7 +1155,7 @@ Section Elt. End Make. -Module Make_ord (X: OrderedType)(D : OrderedType) <: +Module Make_ord (X: OrderedType)(Import D : OrderedType) <: Sord with Module Data := D with Module MapS.E := X. @@ -1332,6 +1333,7 @@ Proof. inversion_clear Hm2; auto. destruct (IHm1 Hm11 (Build_slist Hm22)); [ apply LT | apply EQ | apply GT ]; cmp_solve. +Show. Qed. End Make_ord. |