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

Theorem wex 129
Description: There exists type.
Assertion
Ref Expression
wex :((α → ∗) → ∗)

Proof of Theorem wex
Dummy variables p q x are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 wal 124 . . . 4 :((∗ → ∗) → ∗)
2 wim 127 . . . . . 6 ⇒ :(∗ → (∗ → ∗))
3 wal 124 . . . . . . 7 :((α → ∗) → ∗)
4 wv 58 . . . . . . . . . 10 p:(α → ∗):(α → ∗)
5 wv 58 . . . . . . . . . 10 x:α:α
64, 5wc 45 . . . . . . . . 9 (p:(α → ∗)x:α):∗
7 wv 58 . . . . . . . . 9 q:∗:∗
82, 6, 7wov 64 . . . . . . . 8 [(p:(α → ∗)x:α) ⇒ q:∗]:∗
98wl 59 . . . . . . 7 λx:α [(p:(α → ∗)x:α) ⇒ q:∗]:(α → ∗)
103, 9wc 45 . . . . . 6 (λx:α [(p:(α → ∗)x:α) ⇒ q:∗]):∗
112, 10, 7wov 64 . . . . 5 [(λx:α [(p:(α → ∗)x:α) ⇒ q:∗]) ⇒ q:∗]:∗
1211wl 59 . . . 4 λq:∗ [(λx:α [(p:(α → ∗)x:α) ⇒ q:∗]) ⇒ q:∗]:(∗ → ∗)
131, 12wc 45 . . 3 (λq:∗ [(λx:α [(p:(α → ∗)x:α) ⇒ q:∗]) ⇒ q:∗]):∗
1413wl 59 . 2 λp:(α → ∗) (λq:∗ [(λx:α [(p:(α → ∗)x:α) ⇒ q:∗]) ⇒ q:∗]):((α → ∗) → ∗)
15 df-ex 121 . 2 ⊤⊧[ = λp:(α → ∗) (λq:∗ [(λx:α [(p:(α → ∗)x:α) ⇒ q:∗]) ⇒ q:∗])]
1614, 15eqtypri 71 1 :((α → ∗) → ∗)
Colors of variables: type var term
Syntax hints:  tv 1  ht 2  hb 3  kc 5  λkl 6  kt 8  [kbr 9  wffMMJ2t 12  tim 111  tal 112  tex 113
This theorem was proved from axioms:  ax-cb1 29  ax-refl 39
This theorem depends on definitions:  df-al 116  df-an 118  df-im 119  df-ex 121
This theorem is referenced by:  weu  131  exval  133  euval  134  exlimdv2  156  exlimd  171  eximdv  173  alnex  174  exnal1  175  exnal  188  ax9  199  axrep  207  axun  209
  Copyright terms: Public domain W3C validator