We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 3754ae8 commit fe8c175Copy full SHA for fe8c175
Z.lp
@@ -571,13 +571,13 @@ end;
571
symbol <_compat_≤ x y : π (0 < x ⇒ 0 ≤ y ⇒ 0 < x + y) ≔
572
begin
573
induction
574
- { assume y f _; apply ⊥ₑ; refine f }
+ { assume y f h; apply ⊥ₑ; refine f }
575
{ assume x;
576
577
{ assume h1 h2; refine ⊤ᵢ }
578
- { assume y h _; refine ⊤ᵢ }
+ { assume y h h'; refine ⊤ᵢ }
579
{ simplify; assume y h f; apply ⊥ₑ; refine f ⊤ᵢ } }
580
- { assume x; assume y f _; apply ⊥ₑ; refine f }
+ { assume x; assume y f h; apply ⊥ₑ; refine f }
581
end;
582
583
// Reflexivity
0 commit comments