Theorem pjpreeq 28972

Description: Equality with a projection. This version of pjeq 28973 does not assume the Axiom of Choice via pjhth 28967. (Contributed by Mario Carneiro, 15-May-2014.) (New usage is discouraged.)

Assertion

Ref	Expression
pjpreeq	⊢ ((𝐻 ∈ Cℋ ∧ 𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻))) → (((projℎ‘𝐻)‘𝐴) = 𝐵 ↔ (𝐵 ∈ 𝐻 ∧ ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝐵 +ℎ 𝑥))))

Distinct variable groups:   𝑥,𝐻   𝑥,𝐴   𝑥,𝐵

Proof of Theorem pjpreeq

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		chsh 28796	. . . . . . . 8 ⊢ (𝐻 ∈ Cℋ → 𝐻 ∈ Sℋ )
2		shocsh 28858	. . . . . . . 8 ⊢ (𝐻 ∈ Sℋ → (⊥‘𝐻) ∈ Sℋ )
3		shsel 28888	. . . . . . . 8 ⊢ ((𝐻 ∈ Sℋ ∧ (⊥‘𝐻) ∈ Sℋ ) → (𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻)) ↔ ∃𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)))
4	1, 2, 3	syl2anc2 577	. . . . . . 7 ⊢ (𝐻 ∈ Cℋ → (𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻)) ↔ ∃𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)))
5	4	biimpa 469	. . . . . 6 ⊢ ((𝐻 ∈ Cℋ ∧ 𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻))) → ∃𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥))
6	1, 2	syl 17	. . . . . . . 8 ⊢ (𝐻 ∈ Cℋ → (⊥‘𝐻) ∈ Sℋ )
7		ocin 28870	. . . . . . . . 9 ⊢ (𝐻 ∈ Sℋ → (𝐻 ∩ (⊥‘𝐻)) = 0ℋ)
8	1, 7	syl 17	. . . . . . . 8 ⊢ (𝐻 ∈ Cℋ → (𝐻 ∩ (⊥‘𝐻)) = 0ℋ)
9		pjhthmo 28876	. . . . . . . 8 ⊢ ((𝐻 ∈ Sℋ ∧ (⊥‘𝐻) ∈ Sℋ ∧ (𝐻 ∩ (⊥‘𝐻)) = 0ℋ) → ∃*𝑦(𝑦 ∈ 𝐻 ∧ ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)))
10	1, 6, 8, 9	syl3anc 1352	. . . . . . 7 ⊢ (𝐻 ∈ Cℋ → ∃*𝑦(𝑦 ∈ 𝐻 ∧ ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)))
11	10	adantr 473	. . . . . 6 ⊢ ((𝐻 ∈ Cℋ ∧ 𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻))) → ∃*𝑦(𝑦 ∈ 𝐻 ∧ ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)))
12		reu5 3365	. . . . . . 7 ⊢ (∃!𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥) ↔ (∃𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥) ∧ ∃*𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)))
13		df-rmo 3091	. . . . . . . 8 ⊢ (∃*𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥) ↔ ∃*𝑦(𝑦 ∈ 𝐻 ∧ ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)))
14	13	anbi2i 614	. . . . . . 7 ⊢ ((∃𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥) ∧ ∃*𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)) ↔ (∃𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥) ∧ ∃*𝑦(𝑦 ∈ 𝐻 ∧ ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥))))
15	12, 14	bitri 267	. . . . . 6 ⊢ (∃!𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥) ↔ (∃𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥) ∧ ∃*𝑦(𝑦 ∈ 𝐻 ∧ ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥))))
16	5, 11, 15	sylanbrc 575	. . . . 5 ⊢ ((𝐻 ∈ Cℋ ∧ 𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻))) → ∃!𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥))
17		riotacl 6950	. . . . 5 ⊢ (∃!𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥) → (℩𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)) ∈ 𝐻)
18	16, 17	syl 17	. . . 4 ⊢ ((𝐻 ∈ Cℋ ∧ 𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻))) → (℩𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)) ∈ 𝐻)
19		eleq1 2848	. . . 4 ⊢ ((℩𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)) = 𝐵 → ((℩𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)) ∈ 𝐻 ↔ 𝐵 ∈ 𝐻))
20	18, 19	syl5ibcom 237	. . 3 ⊢ ((𝐻 ∈ Cℋ ∧ 𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻))) → ((℩𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)) = 𝐵 → 𝐵 ∈ 𝐻))
21	20	pm4.71rd 555	. 2 ⊢ ((𝐻 ∈ Cℋ ∧ 𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻))) → ((℩𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)) = 𝐵 ↔ (𝐵 ∈ 𝐻 ∧ (℩𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)) = 𝐵)))
22		shsss 28887	. . . . . 6 ⊢ ((𝐻 ∈ Sℋ ∧ (⊥‘𝐻) ∈ Sℋ ) → (𝐻 +ℋ (⊥‘𝐻)) ⊆ ℋ)
23	1, 2, 22	syl2anc2 577	. . . . 5 ⊢ (𝐻 ∈ Cℋ → (𝐻 +ℋ (⊥‘𝐻)) ⊆ ℋ)
24	23	sselda 3853	. . . 4 ⊢ ((𝐻 ∈ Cℋ ∧ 𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻))) → 𝐴 ∈ ℋ)
25		pjhval 28971	. . . 4 ⊢ ((𝐻 ∈ Cℋ ∧ 𝐴 ∈ ℋ) → ((projℎ‘𝐻)‘𝐴) = (℩𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)))
26	24, 25	syldan 583	. . 3 ⊢ ((𝐻 ∈ Cℋ ∧ 𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻))) → ((projℎ‘𝐻)‘𝐴) = (℩𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)))
27	26	eqeq1d 2775	. 2 ⊢ ((𝐻 ∈ Cℋ ∧ 𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻))) → (((projℎ‘𝐻)‘𝐴) = 𝐵 ↔ (℩𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)) = 𝐵))
28		id 22	. . . 4 ⊢ (𝐵 ∈ 𝐻 → 𝐵 ∈ 𝐻)
29		oveq1 6982	. . . . . . 7 ⊢ (𝑦 = 𝐵 → (𝑦 +ℎ 𝑥) = (𝐵 +ℎ 𝑥))
30	29	eqeq2d 2783	. . . . . 6 ⊢ (𝑦 = 𝐵 → (𝐴 = (𝑦 +ℎ 𝑥) ↔ 𝐴 = (𝐵 +ℎ 𝑥)))
31	30	rexbidv 3237	. . . . 5 ⊢ (𝑦 = 𝐵 → (∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥) ↔ ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝐵 +ℎ 𝑥)))
32	31	riota2 6958	. . . 4 ⊢ ((𝐵 ∈ 𝐻 ∧ ∃!𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)) → (∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝐵 +ℎ 𝑥) ↔ (℩𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)) = 𝐵))
33	28, 16, 32	syl2anr 588	. . 3 ⊢ (((𝐻 ∈ Cℋ ∧ 𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻))) ∧ 𝐵 ∈ 𝐻) → (∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝐵 +ℎ 𝑥) ↔ (℩𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)) = 𝐵))
34	33	pm5.32da 571	. 2 ⊢ ((𝐻 ∈ Cℋ ∧ 𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻))) → ((𝐵 ∈ 𝐻 ∧ ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝐵 +ℎ 𝑥)) ↔ (𝐵 ∈ 𝐻 ∧ (℩𝑦 ∈ 𝐻 ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝑦 +ℎ 𝑥)) = 𝐵)))
35	21, 27, 34	3bitr4d 303	1 ⊢ ((𝐻 ∈ Cℋ ∧ 𝐴 ∈ (𝐻 +ℋ (⊥‘𝐻))) → (((projℎ‘𝐻)‘𝐴) = 𝐵 ↔ (𝐵 ∈ 𝐻 ∧ ∃𝑥 ∈ (⊥‘𝐻)𝐴 = (𝐵 +ℎ 𝑥))))

Syntax hints:   → wi 4   ↔ wb 198   ∧ wa 387   = wceq 1508   ∈ wcel 2051  ∃*wmo 2546  ∃wrex 3084  ∃!wreu 3085  ∃*wrmo 3086   ∩ cin 3823   ⊆ wss 3824  ‘cfv 6186  ℩crio 6935  (class class class)co 6975   ℋchba 28491   +_ℎ cva 28492   S_ℋ csh 28500   C_ℋ cch 28501  ⊥cort 28502   +_ℋ cph 28503  0_ℋc0h 28507  proj_ℎcpjh 28509

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1759  ax-4 1773  ax-5 1870  ax-6 1929  ax-7 1966  ax-8 2053  ax-9 2060  ax-10 2080  ax-11 2094  ax-12 2107  ax-13 2302  ax-ext 2745  ax-rep 5046  ax-sep 5057  ax-nul 5064  ax-pow 5116  ax-pr 5183  ax-un 7278  ax-resscn 10391  ax-1cn 10392  ax-icn 10393  ax-addcl 10394  ax-addrcl 10395  ax-mulcl 10396  ax-mulrcl 10397  ax-mulcom 10398  ax-addass 10399  ax-mulass 10400  ax-distr 10401  ax-i2m1 10402  ax-1ne0 10403  ax-1rid 10404  ax-rnegex 10405  ax-rrecex 10406  ax-cnre 10407  ax-pre-lttri 10408  ax-pre-lttrn 10409  ax-pre-ltadd 10410  ax-pre-mulgt0 10411  ax-hilex 28571  ax-hfvadd 28572  ax-hvcom 28573  ax-hvass 28574  ax-hv0cl 28575  ax-hvaddid 28576  ax-hfvmul 28577  ax-hvmulid 28578  ax-hvmulass 28579  ax-hvdistr1 28580  ax-hvdistr2 28581  ax-hvmul0 28582  ax-hfi 28651  ax-his2 28655  ax-his3 28656  ax-his4 28657

This theorem depends on definitions:  df-bi 199  df-an 388  df-or 835  df-3or 1070  df-3an 1071  df-tru 1511  df-ex 1744  df-nf 1748  df-sb 2017  df-mo 2548  df-eu 2585  df-clab 2754  df-cleq 2766  df-clel 2841  df-nfc 2913  df-ne 2963  df-nel 3069  df-ral 3088  df-rex 3089  df-reu 3090  df-rmo 3091  df-rab 3092  df-v 3412  df-sbc 3677  df-csb 3782  df-dif 3827  df-un 3829  df-in 3831  df-ss 3838  df-nul 4174  df-if 4346  df-pw 4419  df-sn 4437  df-pr 4439  df-op 4443  df-uni 4710  df-iun 4791  df-br 4927  df-opab 4989  df-mpt 5006  df-id 5309  df-po 5323  df-so 5324  df-xp 5410  df-rel 5411  df-cnv 5412  df-co 5413  df-dm 5414  df-rn 5415  df-res 5416  df-ima 5417  df-iota 6150  df-fun 6188  df-fn 6189  df-f 6190  df-f1 6191  df-fo 6192  df-f1o 6193  df-fv 6194  df-riota 6936  df-ov 6978  df-oprab 6979  df-mpo 6980  df-er 8088  df-en 8306  df-dom 8307  df-sdom 8308  df-pnf 10475  df-mnf 10476  df-xr 10477  df-ltxr 10478  df-le 10479  df-sub 10671  df-neg 10672  df-div 11098  df-grpo 28063  df-ablo 28115  df-hvsub 28543  df-sh 28779  df-ch 28793  df-oc 28824  df-ch0 28825  df-shs 28882  df-pjh 28969

This theorem is referenced by:  pjeq  28973  pjpjpre  28993  chscllem1  29211  chscllem2  29212  chscllem3  29213