Skip to content
Snippets Groups Projects
Commit 4b0c93cb authored by Robbert Krebbers's avatar Robbert Krebbers
Browse files

Oops! Fix compilation.

parent b4ec8641
No related branches found
No related tags found
No related merge requests found
Pipeline #26336 passed
......@@ -288,7 +288,7 @@ Section properties.
Proof.
induction 1 as [x _ IH]. destruct (decide (red R x)) as [[x' ?]|?].
- destruct (IH x') as (y&?&?); eauto using wn_step.
- by apply nf_wf.
- by apply nf_wn.
Qed.
Lemma all_loop_red x : all_loop R x red R x.
......
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