Step |
Hyp |
Ref |
Expression |
1 |
|
ifpimim |
|- ( if- ( ph , ( ps -> ch ) , ( ta -> et ) ) -> ( if- ( ph , ps , ta ) -> if- ( ph , ch , et ) ) ) |
2 |
|
frege64a |
|- ( ( if- ( ph , ps , ta ) -> if- ( ph , ch , et ) ) -> ( ( ( ch -> th ) /\ ( et -> ze ) ) -> ( if- ( ph , ps , ta ) -> if- ( ph , th , ze ) ) ) ) |
3 |
1 2
|
syl |
|- ( if- ( ph , ( ps -> ch ) , ( ta -> et ) ) -> ( ( ( ch -> th ) /\ ( et -> ze ) ) -> ( if- ( ph , ps , ta ) -> if- ( ph , th , ze ) ) ) ) |
4 |
|
frege61a |
|- ( ( if- ( ph , ( ps -> ch ) , ( ta -> et ) ) -> ( ( ( ch -> th ) /\ ( et -> ze ) ) -> ( if- ( ph , ps , ta ) -> if- ( ph , th , ze ) ) ) ) -> ( ( ( ps -> ch ) /\ ( ta -> et ) ) -> ( ( ( ch -> th ) /\ ( et -> ze ) ) -> ( if- ( ph , ps , ta ) -> if- ( ph , th , ze ) ) ) ) ) |
5 |
3 4
|
ax-mp |
|- ( ( ( ps -> ch ) /\ ( ta -> et ) ) -> ( ( ( ch -> th ) /\ ( et -> ze ) ) -> ( if- ( ph , ps , ta ) -> if- ( ph , th , ze ) ) ) ) |