Step | Hyp | Ref
| Expression |
1 | | pitonn 7849 |
. . . . . 6
β’ (π½ β N β
β¨[β¨(β¨{π
β£ π
<Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R , 0Rβ© β β© {π₯
β£ (1 β π₯ β§
βπ¦ β π₯ (π¦ + 1) β π₯)}) |
2 | | axcaucvglemcl.n |
. . . . . 6
β’ π = β©
{π₯ β£ (1 β π₯ β§ βπ¦ β π₯ (π¦ + 1) β π₯)} |
3 | 1, 2 | eleqtrrdi 2271 |
. . . . 5
β’ (π½ β N β
β¨[β¨(β¨{π
β£ π
<Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R , 0Rβ© β π) |
4 | | axcaucvglemcl.f |
. . . . . 6
β’ (π β πΉ:πβΆβ) |
5 | 4 | ffvelcdmda 5653 |
. . . . 5
β’ ((π β§ β¨[β¨(β¨{π β£ π <Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R , 0Rβ© β π) β (πΉββ¨[β¨(β¨{π β£ π <Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R , 0Rβ©) β
β) |
6 | 3, 5 | sylan2 286 |
. . . 4
β’ ((π β§ π½ β N) β (πΉββ¨[β¨(β¨{π β£ π <Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R , 0Rβ©) β
β) |
7 | | elrealeu 7830 |
. . . 4
β’ ((πΉββ¨[β¨(β¨{π β£ π <Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R , 0Rβ©) β β
β β!π§ β
R β¨π§,
0Rβ© = (πΉββ¨[β¨(β¨{π β£ π <Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R ,
0Rβ©)) |
8 | 6, 7 | sylib 122 |
. . 3
β’ ((π β§ π½ β N) β
β!π§ β
R β¨π§,
0Rβ© = (πΉββ¨[β¨(β¨{π β£ π <Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R ,
0Rβ©)) |
9 | | eqcom 2179 |
. . . 4
β’
(β¨π§,
0Rβ© = (πΉββ¨[β¨(β¨{π β£ π <Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R , 0Rβ©) β (πΉββ¨[β¨(β¨{π β£ π <Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R , 0Rβ©) = β¨π§,
0Rβ©) |
10 | 9 | reubii 2663 |
. . 3
β’
(β!π§ β
R β¨π§,
0Rβ© = (πΉββ¨[β¨(β¨{π β£ π <Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R , 0Rβ©) β
β!π§ β
R (πΉββ¨[β¨(β¨{π β£ π <Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R , 0Rβ©) = β¨π§,
0Rβ©) |
11 | 8, 10 | sylib 122 |
. 2
β’ ((π β§ π½ β N) β
β!π§ β
R (πΉββ¨[β¨(β¨{π β£ π <Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R , 0Rβ©) = β¨π§,
0Rβ©) |
12 | | riotacl 5847 |
. 2
β’
(β!π§ β
R (πΉββ¨[β¨(β¨{π β£ π <Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R , 0Rβ©) = β¨π§,
0Rβ© β (β©π§ β R (πΉββ¨[β¨(β¨{π β£ π <Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R , 0Rβ©) = β¨π§,
0Rβ©) β R) |
13 | 11, 12 | syl 14 |
1
β’ ((π β§ π½ β N) β
(β©π§ β
R (πΉββ¨[β¨(β¨{π β£ π <Q [β¨π½, 1oβ©]
~Q }, {π’ β£ [β¨π½, 1oβ©]
~Q <Q π’}β© +P
1P), 1Pβ©]
~R , 0Rβ©) = β¨π§,
0Rβ©) β R) |