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

Theorem mkvprop 7498
Description: Markov's Principle expressed in terms of propositions (or more precisely, the 𝐴 = ω case is Markov's Principle). (Contributed by Jim Kingdon, 19-Mar-2023.)
Assertion
Ref Expression
mkvprop ((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) → ∃𝑛𝐴 𝜑)
Distinct variable group:   𝐴,𝑛
Allowed substitution hint:   𝜑(𝑛)

Proof of Theorem mkvprop
Dummy variable 𝑓 is distinct from all other variables.
StepHypRef Expression
1 nfv 1581 . . . . . . 7 𝑛 𝐴 ∈ Markov
2 nfra1 2581 . . . . . . 7 𝑛𝑛𝐴 DECID 𝜑
31, 2nfan 1618 . . . . . 6 𝑛(𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑)
4 simpr 110 . . . . . . . . 9 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑) ∧ 𝑛𝐴) → 𝑛𝐴)
5 0lt2o 6714 . . . . . . . . . . . 12 ∅ ∈ 2o
65a1i 9 . . . . . . . . . . 11 ((∀𝑛𝐴 DECID 𝜑𝑛𝐴) → ∅ ∈ 2o)
7 1lt2o 6715 . . . . . . . . . . . 12 1o ∈ 2o
87a1i 9 . . . . . . . . . . 11 ((∀𝑛𝐴 DECID 𝜑𝑛𝐴) → 1o ∈ 2o)
9 rsp 2597 . . . . . . . . . . . 12 (∀𝑛𝐴 DECID 𝜑 → (𝑛𝐴DECID 𝜑))
109imp 124 . . . . . . . . . . 11 ((∀𝑛𝐴 DECID 𝜑𝑛𝐴) → DECID 𝜑)
116, 8, 10ifcldcd 3678 . . . . . . . . . 10 ((∀𝑛𝐴 DECID 𝜑𝑛𝐴) → if(𝜑, ∅, 1o) ∈ 2o)
1211adantll 480 . . . . . . . . 9 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑) ∧ 𝑛𝐴) → if(𝜑, ∅, 1o) ∈ 2o)
13 eqid 2238 . . . . . . . . . 10 (𝑛𝐴 ↦ if(𝜑, ∅, 1o)) = (𝑛𝐴 ↦ if(𝜑, ∅, 1o))
1413fvmpt2 5789 . . . . . . . . 9 ((𝑛𝐴 ∧ if(𝜑, ∅, 1o) ∈ 2o) → ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = if(𝜑, ∅, 1o))
154, 12, 14syl2anc 415 . . . . . . . 8 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑) ∧ 𝑛𝐴) → ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = if(𝜑, ∅, 1o))
1615eqeq1d 2247 . . . . . . 7 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑) ∧ 𝑛𝐴) → (((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = 1o ↔ if(𝜑, ∅, 1o) = 1o))
17 1n0 6705 . . . . . . . . . 10 1o ≠ ∅
1817nesymi 2466 . . . . . . . . 9 ¬ ∅ = 1o
19 iftrue 3645 . . . . . . . . . 10 (𝜑 → if(𝜑, ∅, 1o) = ∅)
2019eqeq1d 2247 . . . . . . . . 9 (𝜑 → (if(𝜑, ∅, 1o) = 1o ↔ ∅ = 1o))
2118, 20mtbiri 686 . . . . . . . 8 (𝜑 → ¬ if(𝜑, ∅, 1o) = 1o)
2221con2i 636 . . . . . . 7 (if(𝜑, ∅, 1o) = 1o → ¬ 𝜑)
2316, 22biimtrdi 163 . . . . . 6 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑) ∧ 𝑛𝐴) → (((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = 1o → ¬ 𝜑))
243, 23ralimdaa 2616 . . . . 5 ((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑) → (∀𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = 1o → ∀𝑛𝐴 ¬ 𝜑))
2524con3d 640 . . . 4 ((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑) → (¬ ∀𝑛𝐴 ¬ 𝜑 → ¬ ∀𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = 1o))
26253impia 1231 . . 3 ((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) → ¬ ∀𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = 1o)
27 mptexg 5942 . . . . 5 (𝐴 ∈ Markov → (𝑛𝐴 ↦ if(𝜑, ∅, 1o)) ∈ V)
28273ad2ant1 1049 . . . 4 ((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) → (𝑛𝐴 ↦ if(𝜑, ∅, 1o)) ∈ V)
29 ismkv 7493 . . . . . 6 (𝐴 ∈ Markov → (𝐴 ∈ Markov ↔ ∀𝑓(𝑓:𝐴⟶2o → (¬ ∀𝑛𝐴 (𝑓𝑛) = 1o → ∃𝑛𝐴 (𝑓𝑛) = ∅))))
3029ibi 176 . . . . 5 (𝐴 ∈ Markov → ∀𝑓(𝑓:𝐴⟶2o → (¬ ∀𝑛𝐴 (𝑓𝑛) = 1o → ∃𝑛𝐴 (𝑓𝑛) = ∅)))
31303ad2ant1 1049 . . . 4 ((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) → ∀𝑓(𝑓:𝐴⟶2o → (¬ ∀𝑛𝐴 (𝑓𝑛) = 1o → ∃𝑛𝐴 (𝑓𝑛) = ∅)))
32 nfra1 2581 . . . . . . 7 𝑛𝑛𝐴 ¬ 𝜑
3332nfn 1710 . . . . . 6 𝑛 ¬ ∀𝑛𝐴 ¬ 𝜑
341, 2, 33nf3an 1619 . . . . 5 𝑛(𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑)
35113ad2antl2 1191 . . . . 5 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) ∧ 𝑛𝐴) → if(𝜑, ∅, 1o) ∈ 2o)
3634, 35, 13fmptdf 5865 . . . 4 ((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) → (𝑛𝐴 ↦ if(𝜑, ∅, 1o)):𝐴⟶2o)
37 feq1 5516 . . . . . 6 (𝑓 = (𝑛𝐴 ↦ if(𝜑, ∅, 1o)) → (𝑓:𝐴⟶2o ↔ (𝑛𝐴 ↦ if(𝜑, ∅, 1o)):𝐴⟶2o))
38 nfmpt1 4224 . . . . . . . . . 10 𝑛(𝑛𝐴 ↦ if(𝜑, ∅, 1o))
3938nfeq2 2404 . . . . . . . . 9 𝑛 𝑓 = (𝑛𝐴 ↦ if(𝜑, ∅, 1o))
40 fveq1 5694 . . . . . . . . . 10 (𝑓 = (𝑛𝐴 ↦ if(𝜑, ∅, 1o)) → (𝑓𝑛) = ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛))
4140eqeq1d 2247 . . . . . . . . 9 (𝑓 = (𝑛𝐴 ↦ if(𝜑, ∅, 1o)) → ((𝑓𝑛) = 1o ↔ ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = 1o))
4239, 41ralbid 2548 . . . . . . . 8 (𝑓 = (𝑛𝐴 ↦ if(𝜑, ∅, 1o)) → (∀𝑛𝐴 (𝑓𝑛) = 1o ↔ ∀𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = 1o))
4342notbid 677 . . . . . . 7 (𝑓 = (𝑛𝐴 ↦ if(𝜑, ∅, 1o)) → (¬ ∀𝑛𝐴 (𝑓𝑛) = 1o ↔ ¬ ∀𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = 1o))
4440eqeq1d 2247 . . . . . . . 8 (𝑓 = (𝑛𝐴 ↦ if(𝜑, ∅, 1o)) → ((𝑓𝑛) = ∅ ↔ ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = ∅))
4539, 44rexbid 2549 . . . . . . 7 (𝑓 = (𝑛𝐴 ↦ if(𝜑, ∅, 1o)) → (∃𝑛𝐴 (𝑓𝑛) = ∅ ↔ ∃𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = ∅))
4643, 45imbi12d 234 . . . . . 6 (𝑓 = (𝑛𝐴 ↦ if(𝜑, ∅, 1o)) → ((¬ ∀𝑛𝐴 (𝑓𝑛) = 1o → ∃𝑛𝐴 (𝑓𝑛) = ∅) ↔ (¬ ∀𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = 1o → ∃𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = ∅)))
4737, 46imbi12d 234 . . . . 5 (𝑓 = (𝑛𝐴 ↦ if(𝜑, ∅, 1o)) → ((𝑓:𝐴⟶2o → (¬ ∀𝑛𝐴 (𝑓𝑛) = 1o → ∃𝑛𝐴 (𝑓𝑛) = ∅)) ↔ ((𝑛𝐴 ↦ if(𝜑, ∅, 1o)):𝐴⟶2o → (¬ ∀𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = 1o → ∃𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = ∅))))
4847spcgv 2912 . . . 4 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o)) ∈ V → (∀𝑓(𝑓:𝐴⟶2o → (¬ ∀𝑛𝐴 (𝑓𝑛) = 1o → ∃𝑛𝐴 (𝑓𝑛) = ∅)) → ((𝑛𝐴 ↦ if(𝜑, ∅, 1o)):𝐴⟶2o → (¬ ∀𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = 1o → ∃𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = ∅))))
4928, 31, 36, 48syl3c 63 . . 3 ((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) → (¬ ∀𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = 1o → ∃𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = ∅))
5026, 49mpd 13 . 2 ((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) → ∃𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = ∅)
51 simpr 110 . . . . . 6 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) ∧ 𝑛𝐴) → 𝑛𝐴)
5251, 35, 14syl2anc 415 . . . . 5 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) ∧ 𝑛𝐴) → ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = if(𝜑, ∅, 1o))
5352eqeq1d 2247 . . . 4 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) ∧ 𝑛𝐴) → (((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = ∅ ↔ if(𝜑, ∅, 1o) = ∅))
5493ad2ant2 1050 . . . . . . 7 ((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) → (𝑛𝐴DECID 𝜑))
5554imp 124 . . . . . 6 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) ∧ 𝑛𝐴) → DECID 𝜑)
5617neii 2422 . . . . . . . . 9 ¬ 1o = ∅
57 simpr 110 . . . . . . . . . . 11 ((((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) ∧ 𝑛𝐴) ∧ ¬ 𝜑) → ¬ 𝜑)
5857iffalsed 3650 . . . . . . . . . 10 ((((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) ∧ 𝑛𝐴) ∧ ¬ 𝜑) → if(𝜑, ∅, 1o) = 1o)
5958eqeq1d 2247 . . . . . . . . 9 ((((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) ∧ 𝑛𝐴) ∧ ¬ 𝜑) → (if(𝜑, ∅, 1o) = ∅ ↔ 1o = ∅))
6056, 59mtbiri 686 . . . . . . . 8 ((((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) ∧ 𝑛𝐴) ∧ ¬ 𝜑) → ¬ if(𝜑, ∅, 1o) = ∅)
6160ex 115 . . . . . . 7 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) ∧ 𝑛𝐴) → (¬ 𝜑 → ¬ if(𝜑, ∅, 1o) = ∅))
6261con2d 633 . . . . . 6 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) ∧ 𝑛𝐴) → (if(𝜑, ∅, 1o) = ∅ → ¬ ¬ 𝜑))
63 notnotrdc 855 . . . . . 6 (DECID 𝜑 → (¬ ¬ 𝜑𝜑))
6455, 62, 63sylsyld 58 . . . . 5 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) ∧ 𝑛𝐴) → (if(𝜑, ∅, 1o) = ∅ → 𝜑))
6564, 19impbid1 142 . . . 4 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) ∧ 𝑛𝐴) → (if(𝜑, ∅, 1o) = ∅ ↔ 𝜑))
6653, 65bitrd 188 . . 3 (((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) ∧ 𝑛𝐴) → (((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = ∅ ↔ 𝜑))
6734, 66rexbida 2545 . 2 ((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) → (∃𝑛𝐴 ((𝑛𝐴 ↦ if(𝜑, ∅, 1o))‘𝑛) = ∅ ↔ ∃𝑛𝐴 𝜑))
6850, 67mpbid 147 1 ((𝐴 ∈ Markov ∧ ∀𝑛𝐴 DECID 𝜑 ∧ ¬ ∀𝑛𝐴 ¬ 𝜑) → ∃𝑛𝐴 𝜑)
Colors of variables:    wff set class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wa 104  DECID wdc 846  w3a 1009  wal 1400   = wceq 1402  wcel 2209  wral 2528  wrex 2529  Vcvv 2821  c0 3520  ifcif 3638  cmpt 4192  wf 5373  cfv 5377  1oc1o 6680  2oc2o 6681  Markovcmarkov 7491
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-coll 4246  ax-sep 4249  ax-nul 4259  ax-pow 4311  ax-pr 4346  ax-un 4578
This proof depends on definitions:  df-bi 117  df-dc 847  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-ral 2533  df-rex 2534  df-reu 2535  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-if 3639  df-pw 3690  df-sn 3715  df-pr 3716  df-op 3718  df-uni 3936  df-iun 4014  df-br 4131  df-opab 4193  df-mpt 4194  df-tr 4230  df-id 4438  df-iord 4511  df-on 4513  df-suc 4516  df-xp 4780  df-rel 4781  df-cnv 4782  df-co 4783  df-dm 4784  df-rn 4785  df-res 4786  df-ima 4787  df-iota 5337  df-fun 5379  df-fn 5380  df-f 5381  df-f1 5382  df-fo 5383  df-f1o 5384  df-fv 5385  df-1o 6687  df-2o 6688  df-markov 7492
This theorem is used by: (None)
  Copyright terms: Public domain W3C validator