ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  moexexdc Structured version   GIF version

Theorem moexexdc 1966
Description: "At most one" double quantification. (Contributed by Jim Kingdon, 5-Jul-2018.)
Hypothesis
Ref Expression
moexexdc.1 yφ
Assertion
Ref Expression
moexexdc (DECID xφ → ((∃*xφ x∃*yψ) → ∃*yx(φ ψ)))

Proof of Theorem moexexdc
StepHypRef Expression
1 df-dc 734 . 2 (DECID xφ ↔ (xφ ¬ xφ))
2 hbmo1 1920 . . . . . 6 (∃*xφx∃*xφ)
3 hba1 1415 . . . . . . 7 (x∃*yψxx∃*yψ)
4 hbe1 1365 . . . . . . . 8 (x(φ ψ) → xx(φ ψ))
54hbmo 1921 . . . . . . 7 (∃*yx(φ ψ) → x∃*yx(φ ψ))
63, 5hbim 1419 . . . . . 6 ((x∃*yψ∃*yx(φ ψ)) → x(x∃*yψ∃*yx(φ ψ)))
72, 6hbim 1419 . . . . 5 ((∃*xφ → (x∃*yψ∃*yx(φ ψ))) → x(∃*xφ → (x∃*yψ∃*yx(φ ψ))))
8 moexexdc.1 . . . . . . . 8 yφ
98nfri 1393 . . . . . . 7 (φyφ)
109hbmo 1921 . . . . . . 7 (∃*xφy∃*xφ)
11 mopick 1960 . . . . . . . . 9 ((∃*xφ x(φ ψ)) → (φψ))
1211ex 108 . . . . . . . 8 (∃*xφ → (x(φ ψ) → (φψ)))
1312com3r 73 . . . . . . 7 (φ → (∃*xφ → (x(φ ψ) → ψ)))
149, 10, 13alrimdh 1348 . . . . . 6 (φ → (∃*xφy(x(φ ψ) → ψ)))
15 moim 1946 . . . . . . 7 (y(x(φ ψ) → ψ) → (∃*yψ∃*yx(φ ψ)))
1615spsd 1413 . . . . . 6 (y(x(φ ψ) → ψ) → (x∃*yψ∃*yx(φ ψ)))
1714, 16syl6 29 . . . . 5 (φ → (∃*xφ → (x∃*yψ∃*yx(φ ψ))))
187, 17exlimih 1466 . . . 4 (xφ → (∃*xφ → (x∃*yψ∃*yx(φ ψ))))
199hbex 1509 . . . . . . . . 9 (xφyxφ)
20 exsimpl 1490 . . . . . . . . 9 (x(φ ψ) → xφ)
2119, 20exlimih 1466 . . . . . . . 8 (yx(φ ψ) → xφ)
2221con3i 549 . . . . . . 7 xφ → ¬ yx(φ ψ))
23 mon 1911 . . . . . . 7 yx(φ ψ) → ∃*yx(φ ψ))
2422, 23syl 14 . . . . . 6 xφ∃*yx(φ ψ))
2524a1d 22 . . . . 5 xφ → (x∃*yψ∃*yx(φ ψ)))
2625a1d 22 . . . 4 xφ → (∃*xφ → (x∃*yψ∃*yx(φ ψ))))
2718, 26jaoi 623 . . 3 ((xφ ¬ xφ) → (∃*xφ → (x∃*yψ∃*yx(φ ψ))))
2827impd 242 . 2 ((xφ ¬ xφ) → ((∃*xφ x∃*yψ) → ∃*yx(φ ψ)))
291, 28sylbi 114 1 (DECID xφ → ((∃*xφ x∃*yψ) → ∃*yx(φ ψ)))
Colors of variables: wff set class
Syntax hints:  ¬ wn 3  wi 4   wa 97   wo 616  DECID wdc 733  wal 1226  wnf 1329  wex 1362  ∃*wmo 1883
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 99  ax-ia2 100  ax-ia3 101  ax-in1 532  ax-in2 533  ax-io 617  ax-5 1316  ax-7 1317  ax-gen 1318  ax-ie1 1363  ax-ie2 1364  ax-8 1376  ax-10 1377  ax-11 1378  ax-i12 1379  ax-bnd 1380  ax-4 1381  ax-17 1400  ax-i9 1404  ax-ial 1409  ax-i5r 1410
This theorem depends on definitions:  df-bi 110  df-dc 734  df-tru 1231  df-nf 1330  df-sb 1628  df-eu 1885  df-mo 1886
This theorem is referenced by:  2moswapdc  1972
  Copyright terms: Public domain W3C validator