blob: 0d661de9c45b1b3fb408bdfee15a0339c6c22f3b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
Require Import MSets.
Require Import Orders.
Declare Module Signal : OrderedType.
Module S := MSetAVL.Make(Signal).
Module Sdec := Decide(S).
Export Sdec.
Hint Extern 0 (Signal.eq ?x ?y) => now symmetry.
Goal forall o s, Signal.eq o s.
Proof. fsetdec. Qed.
|