File tree Expand file tree Collapse file tree 1 file changed +5
-10
lines changed
theories/ordinals/MoreAck Expand file tree Collapse file tree 1 file changed +5
-10
lines changed Original file line number Diff line number Diff line change @@ -395,18 +395,13 @@ Section Impossibility_Proof.
395
395
Context (HAck : isPR 2 Ack).
396
396
397
397
Lemma Ack_not_PR : False. (* .no-out *)
398
- (*|
399
- .. coq:: no-out
400
- | *)
401
- Proof .
402
- destruct (majorPR2_strict Ack HAck) as [m Hm].
403
- pose (X := max 2 m); specialize (Hm X X).
404
- rewrite Nat.max_idempotent in Hm;
405
- assert (H0: Ack m X <= Ack X X) by (apply Ack_mono_l; lia).
398
+ Proof . (* .no-out *)
399
+ destruct (majorPR2_strict Ack HAck) as [m Hm];
400
+ set (x := max 2 m).
401
+ specialize (Hm x x); rewrite Nat.max_idempotent in Hm.
402
+ assert (H0: Ack m x <= Ack x x) by (apply Ack_mono_l; lia).
406
403
lia.
407
404
Qed .
408
- (*|| *)
409
-
410
405
411
406
End Impossibility_Proof.
412
407
You can’t perform that action at this time.
0 commit comments