diff options
author | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2010-09-17 14:12:55 +0000 |
---|---|---|
committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2010-09-17 14:12:55 +0000 |
commit | 2a35022f6e0ed8b5a2b2fce5077104cfa6cea1b3 (patch) | |
tree | a8ed6f19565ba1c7cc962dba5df50f9f581e1fbd /theories/MSets/MSetAVL.v | |
parent | 0931ccb78d2555e5c38da66a2e2cd7afc6ae7e94 (diff) |
For the moment, two small manual eta-expansions to avoid '_a after extraction
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13425 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/MSets/MSetAVL.v')
-rw-r--r-- | theories/MSets/MSetAVL.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/theories/MSets/MSetAVL.v b/theories/MSets/MSetAVL.v index 349cdedf7..fee3f5bcf 100644 --- a/theories/MSets/MSetAVL.v +++ b/theories/MSets/MSetAVL.v @@ -328,7 +328,7 @@ Fixpoint elements_aux (acc : list X.t) (s : t) : list X.t := (** then [elements] is an instanciation with an empty [acc] *) -Definition elements := elements_aux nil. +Definition elements s := elements_aux nil s. (** ** Filter *) |