diff options
| author | Yann Herklotz <git@yannherklotz.com> | 2022-09-26 13:13:51 +0100 |
|---|---|---|
| committer | Yann Herklotz <git@yannherklotz.com> | 2022-09-26 13:13:51 +0100 |
| commit | d3abe2547c8921d2b324da67370822b7fb89b6c0 (patch) | |
| tree | 081f017f6c6ce801306d8a7bd70b1c100db88cab /src/hls/Predicate.v | |
| parent | 20aae726fa959272ed1568b39b78a0ff501b4882 (diff) | |
| download | vericert-d3abe2547c8921d2b324da67370822b7fb89b6c0.tar.gz vericert-d3abe2547c8921d2b324da67370822b7fb89b6c0.zip | |
Add global monad notation using Instances
This was mostly inspired by the std++ library.
Diffstat (limited to 'src/hls/Predicate.v')
| -rw-r--r-- | src/hls/Predicate.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/hls/Predicate.v b/src/hls/Predicate.v index 8dbd0f6..6067719 100644 --- a/src/hls/Predicate.v +++ b/src/hls/Predicate.v @@ -178,7 +178,7 @@ Proof. crush. Qed. { equiv := sat_equiv; }. #[global] - Instance PandProper : Proper (equiv ==> equiv ==> equiv) Pand. + Instance PandProper : Proper (SetoidClass.equiv ==> SetoidClass.equiv ==> SetoidClass.equiv) Pand. Proof. unfold Proper. simplify. unfold "==>". intros. |