Theorem dicopelval2 41476

Description: Membership in value of the partial isomorphism C for a lattice 𝐾. (Contributed by NM, 20-Feb-2014.)

Hypotheses

Ref	Expression
dicval.l	⊢ ≤ = (le‘𝐾)
dicval.a	⊢ 𝐴 = (Atoms‘𝐾)
dicval.h	⊢ 𝐻 = (LHyp‘𝐾)
dicval.p	⊢ 𝑃 = ((oc‘𝐾)‘𝑊)
dicval.t	⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
dicval.e	⊢ 𝐸 = ((TEndo‘𝐾)‘𝑊)
dicval.i	⊢ 𝐼 = ((DIsoC‘𝐾)‘𝑊)
dicval2.g	⊢ 𝐺 = (℩𝑔 ∈ 𝑇 (𝑔‘𝑃) = 𝑄)
dicelval2.f	⊢ 𝐹 ∈ V
dicelval2.s	⊢ 𝑆 ∈ V

Assertion

Ref	Expression
dicopelval2	⊢ (((𝐾 ∈ 𝑉 ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (⟨𝐹, 𝑆⟩ ∈ (𝐼‘𝑄) ↔ (𝐹 = (𝑆‘𝐺) ∧ 𝑆 ∈ 𝐸)))

Distinct variable groups:   𝑔,𝐾   𝑇,𝑔   𝑔,𝑊   𝑄,𝑔

Allowed substitution hints:   𝐴(𝑔)   𝑃(𝑔)   𝑆(𝑔)   𝐸(𝑔)   𝐹(𝑔)   𝐺(𝑔)   𝐻(𝑔)   𝐼(𝑔)   ≤ (𝑔)   𝑉(𝑔)

Proof of Theorem dicopelval2

Step	Hyp	Ref	Expression
1		dicval.l	. . 3 ⊢ ≤ = (le‘𝐾)
2		dicval.a	. . 3 ⊢ 𝐴 = (Atoms‘𝐾)
3		dicval.h	. . 3 ⊢ 𝐻 = (LHyp‘𝐾)
4		dicval.p	. . 3 ⊢ 𝑃 = ((oc‘𝐾)‘𝑊)
5		dicval.t	. . 3 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
6		dicval.e	. . 3 ⊢ 𝐸 = ((TEndo‘𝐾)‘𝑊)
7		dicval.i	. . 3 ⊢ 𝐼 = ((DIsoC‘𝐾)‘𝑊)
8		dicelval2.f	. . 3 ⊢ 𝐹 ∈ V
9		dicelval2.s	. . 3 ⊢ 𝑆 ∈ V
10	1, 2, 3, 4, 5, 6, 7, 8, 9	dicopelval 41472	. 2 ⊢ (((𝐾 ∈ 𝑉 ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (⟨𝐹, 𝑆⟩ ∈ (𝐼‘𝑄) ↔ (𝐹 = (𝑆‘(℩𝑔 ∈ 𝑇 (𝑔‘𝑃) = 𝑄)) ∧ 𝑆 ∈ 𝐸)))
11		dicval2.g	. . . . 5 ⊢ 𝐺 = (℩𝑔 ∈ 𝑇 (𝑔‘𝑃) = 𝑄)
12	11	fveq2i 6836	. . . 4 ⊢ (𝑆‘𝐺) = (𝑆‘(℩𝑔 ∈ 𝑇 (𝑔‘𝑃) = 𝑄))
13	12	eqeq2i 2748	. . 3 ⊢ (𝐹 = (𝑆‘𝐺) ↔ 𝐹 = (𝑆‘(℩𝑔 ∈ 𝑇 (𝑔‘𝑃) = 𝑄)))
14	13	anbi1i 625	. 2 ⊢ ((𝐹 = (𝑆‘𝐺) ∧ 𝑆 ∈ 𝐸) ↔ (𝐹 = (𝑆‘(℩𝑔 ∈ 𝑇 (𝑔‘𝑃) = 𝑄)) ∧ 𝑆 ∈ 𝐸))
15	10, 14	bitr4di 289	1 ⊢ (((𝐾 ∈ 𝑉 ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (⟨𝐹, 𝑆⟩ ∈ (𝐼‘𝑄) ↔ (𝐹 = (𝑆‘𝐺) ∧ 𝑆 ∈ 𝐸)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1542   ∈ wcel 2114  Vcvv 3439  ⟨cop 4585   class class class wbr 5097  ‘cfv 6491  ℩crio 7314  lecple 17186  occoc 17187  Atomscatm 39558  LHypclh 40279  LTrncltrn 40396  TEndoctendo 41047  DIsoCcdic 41467

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2183  ax-ext 2707  ax-rep 5223  ax-sep 5240  ax-nul 5250  ax-pow 5309  ax-pr 5376  ax-un 7680

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2538  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2810  df-nfc 2884  df-ne 2932  df-ral 3051  df-rex 3060  df-reu 3350  df-rab 3399  df-v 3441  df-sbc 3740  df-csb 3849  df-dif 3903  df-un 3905  df-in 3907  df-ss 3917  df-nul 4285  df-if 4479  df-pw 4555  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4863  df-iun 4947  df-br 5098  df-opab 5160  df-mpt 5179  df-id 5518  df-xp 5629  df-rel 5630  df-cnv 5631  df-co 5632  df-dm 5633  df-rn 5634  df-res 5635  df-ima 5636  df-iota 6447  df-fun 6493  df-fn 6494  df-f 6495  df-f1 6496  df-fo 6497  df-f1o 6498  df-fv 6499  df-riota 7315  df-dic 41468

This theorem is referenced by:  diclspsn  41489  cdlemn11a  41502  dihopelvalcqat  41541  dihopelvalcpre  41543  dihord6apre  41551