Commit ce20ffb1 by Ralf Jung

### make variable names a bit more consistent between Coq and LaTeX

parent 8f443ec0
Pipeline #17542 passed with stage
in 13 minutes and 48 seconds
This diff is collapsed.
 ... @@ -114,7 +114,7 @@ Qed. ... @@ -114,7 +114,7 @@ Qed. End adequacy. End adequacy. (** Iris's generic adequacy result *) (** Iris's generic adequacy result *) Theorem wp_strong_adequacy Σ Λ `{!invPreG Σ} e σ1 n κs t2 σ2 φ : Theorem wp_strong_adequacy Σ Λ `{!invPreG Σ} e1 σ1 n κs t2 σ2 φ : (∀ `{Hinv : !invG Σ}, (∀ `{Hinv : !invG Σ}, (|={⊤}=> ∃ (|={⊤}=> ∃ (s: stuckness) (s: stuckness) ... @@ -122,7 +122,7 @@ Theorem wp_strong_adequacy Σ Λ `{!invPreG Σ} e σ1 n κs t2 σ2 φ : ... @@ -122,7 +122,7 @@ Theorem wp_strong_adequacy Σ Λ `{!invPreG Σ} e σ1 n κs t2 σ2 φ : (Φ fork_post : val Λ → iProp Σ), (Φ fork_post : val Λ → iProp Σ), let _ : irisG Λ Σ := IrisG _ _ Hinv stateI fork_post in let _ : irisG Λ Σ := IrisG _ _ Hinv stateI fork_post in stateI σ1 κs 0 ∗ stateI σ1 κs 0 ∗ WP e @ s; ⊤ {{ Φ }} ∗ WP e1 @ s; ⊤ {{ Φ }} ∗ (∀ e2 t2', (∀ e2 t2', (* e2 is the final state of the main thread, t2' the rest *) (* e2 is the final state of the main thread, t2' the rest *) ⌜ t2 = e2 :: t2' ⌝ -∗ ⌜ t2 = e2 :: t2' ⌝ -∗ ... @@ -140,7 +140,7 @@ Theorem wp_strong_adequacy Σ Λ `{!invPreG Σ} e σ1 n κs t2 σ2 φ : ... @@ -140,7 +140,7 @@ Theorem wp_strong_adequacy Σ Λ `{!invPreG Σ} e σ1 n κs t2 σ2 φ : one can use [fupd_intro_mask'] or [fupd_mask_weaken] to introduce the one can use [fupd_intro_mask'] or [fupd_mask_weaken] to introduce the fancy update. *) fancy update. *) |={⊤,∅}=> ⌜ φ ⌝))%I) → |={⊤,∅}=> ⌜ φ ⌝))%I) → nsteps n ([e], σ1) κs (t2, σ2) → nsteps n ([e1], σ1) κs (t2, σ2) → (* Then we can conclude [φ] at the meta-level. *) (* Then we can conclude [φ] at the meta-level. *) φ. φ. Proof. Proof. ... ...
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment