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

Theorem moexexdc 1981
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 742 . 2 (DECID xφ ↔ (xφ ¬ xφ))
2 hbmo1 1935 . . . . . 6 (∃*xφx∃*xφ)
3 hba1 1430 . . . . . . 7 (x∃*yψxx∃*yψ)
4 hbe1 1381 . . . . . . . 8 (x(φ ψ) → xx(φ ψ))
54hbmo 1936 . . . . . . 7 (∃*yx(φ ψ) → x∃*yx(φ ψ))
63, 5hbim 1434 . . . . . 6 ((x∃*yψ∃*yx(φ ψ)) → x(x∃*yψ∃*yx(φ ψ)))
72, 6hbim 1434 . . . . 5 ((∃*xφ → (x∃*yψ∃*yx(φ ψ))) → x(∃*xφ → (x∃*yψ∃*yx(φ ψ))))
8 moexexdc.1 . . . . . . . 8 yφ
98nfri 1409 . . . . . . 7 (φyφ)
109hbmo 1936 . . . . . . 7 (∃*xφy∃*xφ)
11 mopick 1975 . . . . . . . . 9 ((∃*xφ x(φ ψ)) → (φψ))
1211ex 108 . . . . . . . 8 (∃*xφ → (x(φ ψ) → (φψ)))
1312com3r 73 . . . . . . 7 (φ → (∃*xφ → (x(φ ψ) → ψ)))
149, 10, 13alrimdh 1365 . . . . . 6 (φ → (∃*xφy(x(φ ψ) → ψ)))
15 moim 1961 . . . . . . 7 (y(x(φ ψ) → ψ) → (∃*yψ∃*yx(φ ψ)))
1615spsd 1428 . . . . . 6 (y(x(φ ψ) → ψ) → (x∃*yψ∃*yx(φ ψ)))
1714, 16syl6 29 . . . . 5 (φ → (∃*xφ → (x∃*yψ∃*yx(φ ψ))))
187, 17exlimih 1481 . . . 4 (xφ → (∃*xφ → (x∃*yψ∃*yx(φ ψ))))
199hbex 1524 . . . . . . . . 9 (xφyxφ)
20 exsimpl 1505 . . . . . . . . 9 (x(φ ψ) → xφ)
2119, 20exlimih 1481 . . . . . . . 8 (yx(φ ψ) → xφ)
2221con3i 561 . . . . . . 7 xφ → ¬ yx(φ ψ))
23 mon 1926 . . . . . . 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 635 . . 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 628  DECID wdc 741  wal 1240  wnf 1346  wex 1378  ∃*wmo 1898
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 544  ax-in2 545  ax-io 629  ax-5 1333  ax-7 1334  ax-gen 1335  ax-ie1 1379  ax-ie2 1380  ax-8 1392  ax-10 1393  ax-11 1394  ax-i12 1395  ax-bnd 1396  ax-4 1397  ax-17 1416  ax-i9 1420  ax-ial 1424  ax-i5r 1425
This theorem depends on definitions:  df-bi 110  df-dc 742  df-tru 1245  df-nf 1347  df-sb 1643  df-eu 1900  df-mo 1901
This theorem is referenced by:  2moswapdc  1987
  Copyright terms: Public domain W3C validator