HOLE Home Higher-Order Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  HOLE Home  >  Th. List  >  ax5 GIF version

Theorem ax5 194
Description: Axiom of Quantified Implication. Axiom C4 of [Monk2] p. 105.
Hypotheses
Ref Expression
ax5.1 R:∗
ax5.2 S:∗
Assertion
Ref Expression
ax5 ⊤⊧[(λx:α [RS]) ⇒ [(λx:α R) ⇒ (λx:α S)]]
Distinct variable group:   α,x

Proof of Theorem ax5
Dummy variable y is distinct from all other variables.
StepHypRef Expression
1 ax5.2 . . . . . 6 S:∗
2 ax5.1 . . . . . . . 8 R:∗
32ax4 140 . . . . . . 7 (λx:α R)⊧R
4 wal 124 . . . . . . . 8 :((α → ∗) → ∗)
5 wim 127 . . . . . . . . . 10 ⇒ :(∗ → (∗ → ∗))
65, 2, 1wov 64 . . . . . . . . 9 [RS]:∗
76wl 59 . . . . . . . 8 λx:α [RS]:(α → ∗)
84, 7wc 45 . . . . . . 7 (λx:α [RS]):∗
93, 8adantl 51 . . . . . 6 ((λx:α [RS]), (λx:α R))⊧R
106ax4 140 . . . . . . 7 (λx:α [RS])⊧[RS]
113ax-cb1 29 . . . . . . 7 (λx:α R):∗
1210, 11adantr 50 . . . . . 6 ((λx:α [RS]), (λx:α R))⊧[RS]
131, 9, 12mpd 146 . . . . 5 ((λx:α [RS]), (λx:α R))⊧S
14 wv 58 . . . . . 6 y:α:α
154, 14ax-17 95 . . . . . . 7 ⊤⊧[(λx:α y:α) = ]
166, 14ax-hbl1 93 . . . . . . 7 ⊤⊧[(λx:α λx:α [RS]y:α) = λx:α [RS]]
174, 7, 14, 15, 16hbc 100 . . . . . 6 ⊤⊧[(λx:α (λx:α [RS])y:α) = (λx:α [RS])]
182wl 59 . . . . . . 7 λx:α R:(α → ∗)
192, 14ax-hbl1 93 . . . . . . 7 ⊤⊧[(λx:α λx:α Ry:α) = λx:α R]
204, 18, 14, 15, 19hbc 100 . . . . . 6 ⊤⊧[(λx:α (λx:α R)y:α) = (λx:α R)]
218, 14, 11, 17, 20hbct 145 . . . . 5 ⊤⊧[(λx:α ((λx:α [RS]), (λx:α R))y:α) = ((λx:α [RS]), (λx:α R))]
2213, 21alrimi 170 . . . 4 ((λx:α [RS]), (λx:α R))⊧(λx:α S)
2322ex 148 . . 3 (λx:α [RS])⊧[(λx:α R) ⇒ (λx:α S)]
24 wtru 40 . . 3 ⊤:∗
2523, 24adantl 51 . 2 (⊤, (λx:α [RS]))⊧[(λx:α R) ⇒ (λx:α S)]
2625ex 148 1 ⊤⊧[(λx:α [RS]) ⇒ [(λx:α R) ⇒ (λx:α S)]]
Colors of variables: type var term
Syntax hints:  tv 1  ht 2  hb 3  kc 5  λkl 6  kt 8  [kbr 9  kct 10  wffMMJ2 11  wffMMJ2t 12  tim 111  tal 112
This theorem was proved from axioms:  ax-syl 15  ax-jca 17  ax-simpl 20  ax-simpr 21  ax-id 24  ax-trud 26  ax-cb1 29  ax-cb2 30  ax-refl 39  ax-eqmp 42  ax-ded 43  ax-ceq 46  ax-beta 60  ax-distrc 61  ax-leq 62  ax-distrl 63  ax-hbl1 93  ax-17 95  ax-inst 103  ax-eta 165
This theorem depends on definitions:  df-ov 65  df-al 116  df-an 118  df-im 119
This theorem is referenced by:  ax11  201
  Copyright terms: Public domain W3C validator