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

Merge branch 'robbert/laterN' into 'master'

Make use of `▷^` notation in its definition.

See merge request iris/iris!428
parents 2b0469ed eddf607b
No related branches found
No related tags found
No related merge requests found
...@@ -86,11 +86,11 @@ Notation "'□?' p P" := (bi_intuitionistically_if p P) : bi_scope. ...@@ -86,11 +86,11 @@ Notation "'□?' p P" := (bi_intuitionistically_if p P) : bi_scope.
Fixpoint sbi_laterN {PROP : sbi} (n : nat) (P : PROP) : PROP := Fixpoint sbi_laterN {PROP : sbi} (n : nat) (P : PROP) : PROP :=
match n with match n with
| O => P | O => P
| S n' => sbi_laterN n' P | S n' => ▷^n' P
end%I. end%I
where "▷^ n P" := (sbi_laterN n P) : bi_scope.
Arguments sbi_laterN {_} !_%nat_scope _%I. Arguments sbi_laterN {_} !_%nat_scope _%I.
Instance: Params (@sbi_laterN) 2 := {}. Instance: Params (@sbi_laterN) 2 := {}.
Notation "▷^ n P" := (sbi_laterN n P) : bi_scope.
Notation "▷? p P" := (sbi_laterN (Nat.b2n p) P) : bi_scope. Notation "▷? p P" := (sbi_laterN (Nat.b2n p) P) : bi_scope.
Definition sbi_except_0 {PROP : sbi} (P : PROP) : PROP := ( False P)%I. Definition sbi_except_0 {PROP : sbi} (P : PROP) : PROP := ( False P)%I.
......
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