diff options
Diffstat (limited to 'unit-tests/Tests_verit_tactics.v')
-rw-r--r-- | unit-tests/Tests_verit_tactics.v | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/unit-tests/Tests_verit_tactics.v b/unit-tests/Tests_verit_tactics.v index 896c1bf..da7cb5a 100644 --- a/unit-tests/Tests_verit_tactics.v +++ b/unit-tests/Tests_verit_tactics.v @@ -994,3 +994,13 @@ Proof using. intros. verit. Qed. + + +Section Polymorphism. + Goal forall (f : option Z -> Z) (a b : Z), + implb (Z.eqb a b) (Z.eqb (f (Some a)) (f (Some b))). + Proof. verit. auto with typeclass_instances. Qed. + + Goal forall (f : option Z -> Z) (a b : Z), a = b -> f (Some a) = f (Some b). + Proof. verit. auto with typeclass_instances. Qed. +End Polymorphism. |