Theorem eimd | index | src |

theorem eimd (a b c d: wff):
  $ a -> b $ >
  $ a -> c -> d $ >
  $ a -> (b -> c) -> d $;
StepHypRefExpression
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)