Skip to content

Commit f6cfefc

Browse files
committed
Fix some broken proofs
1 parent 3d9f045 commit f6cfefc

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

pcuic/theories/Syntax/PCUICReflect.v

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -215,7 +215,7 @@ Proof.
215215
destruct (eqb_spec (puinst p) (puinst p0)); t'.
216216
destruct X as [? []]. red in X0.
217217
destruct (r (preturn p0)); t'.
218-
destruct (reflect_prop_list (l':= pparams p0) a); t'.
218+
case: (reflect_prop_list (l':= pparams p0) a); t'.
219219
case: (reflect_prop_list (l:=l) (l' := brs)); t'.
220220
{ eapply All_impl; tea; cbv beta. intros [bctx bbody] [].
221221
intros [bctx' bbody']; cbn in *.

0 commit comments

Comments
 (0)