theorem eimd (a b c d: wff):
$ a -> b $ >
$ a -> c -> d $ >
$ a -> (b -> c) -> d $;
| Step | Hyp | Ref | Expression |
| 1 |
|
hyp h1 |
a -> b |
| 2 |
|
mpcom |
b -> (b -> c) -> c |
| 3 |
1, 2 |
rsyl |
a -> (b -> c) -> c |
| 4 |
|
hyp h2 |
a -> c -> d |
| 5 |
3, 4 |
syld |
a -> (b -> c) -> d |
Axiom use
axs_prop_calc
(ax_1,
ax_2,
ax_mp)