Skip to content
Snippets Groups Projects
Commit 0274b81f authored by Jacques-Henri Jourdan's avatar Jacques-Henri Jourdan
Browse files

Tweak.

parent cd13e4ce
No related branches found
No related tags found
No related merge requests found
Pipeline #
...@@ -47,15 +47,15 @@ Section defs. ...@@ -47,15 +47,15 @@ Section defs.
Definition idx_borrow_own (q : Qp) (i : borrow_idx) := Definition idx_borrow_own (q : Qp) (i : borrow_idx) :=
own borrow_tok_name ( {[ i := q ]}). own borrow_tok_name ( {[ i := q ]}).
End defs. Parameter idx_borrow:
`{lifetimeG Σ} (κ : lifetime) (i : borrow_idx) (P : iProp Σ), iProp Σ.
Typeclasses Opaque lft_own lft_dead . Definition borrow (κ : lifetime) (P : iProp Σ) : iProp Σ :=
( i, idx_borrow κ i P idx_borrow_own 1 i)%I.
Parameter idx_borrow: End defs.
`{lifetimeG Σ} (κ : lifetime) (i : borrow_idx) (P : iProp Σ), iProp Σ.
Definition borrow `{lifetimeG Σ} (κ : lifetime) (P : iProp Σ) : iProp Σ := Typeclasses Opaque lft_own lft_dead borrow.
( i, idx_borrow κ i P idx_borrow_own 1 i)%I.
(*** Notations *) (*** Notations *)
......
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