aboutsummaryrefslogtreecommitdiff
path: root/theories/Structures
diff options
context:
space:
mode:
Diffstat (limited to 'theories/Structures')
-rw-r--r--theories/Structures/EqualitiesFacts.v11
1 files changed, 11 insertions, 0 deletions
diff --git a/theories/Structures/EqualitiesFacts.v b/theories/Structures/EqualitiesFacts.v
index c738b57f44..0f63855b55 100644
--- a/theories/Structures/EqualitiesFacts.v
+++ b/theories/Structures/EqualitiesFacts.v
@@ -212,3 +212,14 @@ Module PairUsualDecidableType(D1 D2:UsualDecidableType) <: UsualDecidableType.
Defined.
End PairUsualDecidableType.
+
+(** And also for pairs of UsualDecidableTypeFull *)
+
+Module PairUsualDecidableTypeFull (D1 D2:UsualDecidableTypeFull)
+ <: UsualDecidableTypeFull.
+
+ Module M := PairUsualDecidableType D1 D2.
+ Include Backport_DT (M).
+ Include HasEqDec2Bool.
+
+End PairUsualDecidableTypeFull.