Skip to content
Snippets Groups Projects
Commit 2c1dd026 authored by Ralf Jung's avatar Ralf Jung
Browse files

only locally make siProp_holds a coercion

parent 48068213
No related branches found
No related tags found
No related merge requests found
......@@ -6,9 +6,10 @@ From iris.prelude Require Import options.
define the usual connectives of higher-order logic, and prove that these satisfy
the usual laws of higher-order logic. *)
Record siProp := SiProp {
siProp_holds :> nat Prop;
siProp_holds : nat Prop;
siProp_closed n1 n2 : siProp_holds n1 n2 n1 siProp_holds n2
}.
Local Coercion siProp_holds : siProp >-> Funclass.
Global Arguments siProp_holds : simpl never.
Add Printing Constructor siProp.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment