diff --git a/heap_lang/lib/par.v b/heap_lang/lib/par.v index cbd34ceb3f1a7cc4e0f8f496f424955366c80144..3e3ad7051271c6fd6ae4c3e077d7947226dcb213 100644 --- a/heap_lang/lib/par.v +++ b/heap_lang/lib/par.v @@ -8,8 +8,7 @@ Definition par : val := let: "v2" := Snd "fs" #() in let: "v1" := join "handle" in Pair "v1" "v2". -Notation Par e1 e2 := (par (Pair (λ: <>, e1) (λ: <>, e2)))%E. -Infix "||" := Par : expr_scope. +Notation "e1 || e2" := (par (Pair (λ: <>, e1) (λ: <>, e2)))%E : expr_scope. Global Opaque par. Section proof.