diff --git a/base_logic/primitive.v b/base_logic/primitive.v index 7bcce8d77346757af140bb40b9f79321fcf881c8..a7c13e15fb9d5c0a44e870107827cfd53e7884be 100644 --- a/base_logic/primitive.v +++ b/base_logic/primitive.v @@ -171,9 +171,11 @@ Notation "(★)" := uPred_sep (only parsing) : uPred_scope. Notation "P -★ Q" := (uPred_wand P Q) (at level 99, Q at level 200, right associativity) : uPred_scope. Notation "∀ x .. y , P" := - (uPred_forall (λ x, .. (uPred_forall (λ y, P)) ..)%I) : uPred_scope. + (uPred_forall (λ x, .. (uPred_forall (λ y, P)) ..)%I) + (at level 200, x binder, y binder, right associativity) : uPred_scope. Notation "∃ x .. y , P" := - (uPred_exist (λ x, .. (uPred_exist (λ y, P)) ..)%I) : uPred_scope. + (uPred_exist (λ x, .. (uPred_exist (λ y, P)) ..)%I) + (at level 200, x binder, y binder, right associativity) : uPred_scope. Notation "□ P" := (uPred_always P) (at level 20, right associativity) : uPred_scope. Notation "▷ P" := (uPred_later P)