Metamath Proof Explorer


Theorem el2mpocl

Description: If the operation value of the operation value of two nested maps-to notation is not empty, all involved arguments belong to the corresponding base classes of the maps-to notations. Using implicit substitution. (Contributed by AV, 21-May-2021)

Ref Expression
Hypotheses el2mpocl.o ⊢ O = x ∈ A , y ∈ B ⟼ s ∈ C , t ∈ D ⟼ E
el2mpocl.e ⊢ x = X ∧ y = Y → C = F ∧ D = G
Assertion el2mpocl ⊢ ∀ x ∈ A ∀ y ∈ B C ∈ U ∧ D ∈ V → W ∈ S X O Y T → X ∈ A ∧ Y ∈ B ∧ S ∈ F ∧ T ∈ G

Proof

Step Hyp Ref Expression
1 el2mpocl.o ⊢ O = x ∈ A , y ∈ B ⟼ s ∈ C , t ∈ D ⟼ E
2 el2mpocl.e ⊢ x = X ∧ y = Y → C = F ∧ D = G
3 1 el2mpocsbcl ⊢ ∀ x ∈ A ∀ y ∈ B C ∈ U ∧ D ∈ V → W ∈ S X O Y T → X ∈ A ∧ Y ∈ B ∧ S ∈ ⦋ X / x⦌ ⦋ Y / y⦌ C ∧ T ∈ ⦋ X / x⦌ ⦋ Y / y⦌ D
4 simpl ⊢ X ∈ A ∧ Y ∈ B → X ∈ A
5 simplr ⊢ X ∈ A ∧ Y ∈ B ∧ x = X → Y ∈ B
6 2 simpld ⊢ x = X ∧ y = Y → C = F
7 6 adantll ⊢ X ∈ A ∧ Y ∈ B ∧ x = X ∧ y = Y → C = F
8 5 7 csbied ⊢ X ∈ A ∧ Y ∈ B ∧ x = X → ⦋ Y / y⦌ C = F
9 4 8 csbied ⊢ X ∈ A ∧ Y ∈ B → ⦋ X / x⦌ ⦋ Y / y⦌ C = F
10 9 eleq2d ⊢ X ∈ A ∧ Y ∈ B → S ∈ ⦋ X / x⦌ ⦋ Y / y⦌ C ↔ S ∈ F
11 2 simprd ⊢ x = X ∧ y = Y → D = G
12 11 adantll ⊢ X ∈ A ∧ Y ∈ B ∧ x = X ∧ y = Y → D = G
13 5 12 csbied ⊢ X ∈ A ∧ Y ∈ B ∧ x = X → ⦋ Y / y⦌ D = G
14 4 13 csbied ⊢ X ∈ A ∧ Y ∈ B → ⦋ X / x⦌ ⦋ Y / y⦌ D = G
15 14 eleq2d ⊢ X ∈ A ∧ Y ∈ B → T ∈ ⦋ X / x⦌ ⦋ Y / y⦌ D ↔ T ∈ G
16 10 15 anbi12d ⊢ X ∈ A ∧ Y ∈ B → S ∈ ⦋ X / x⦌ ⦋ Y / y⦌ C ∧ T ∈ ⦋ X / x⦌ ⦋ Y / y⦌ D ↔ S ∈ F ∧ T ∈ G
17 16 biimpd ⊢ X ∈ A ∧ Y ∈ B → S ∈ ⦋ X / x⦌ ⦋ Y / y⦌ C ∧ T ∈ ⦋ X / x⦌ ⦋ Y / y⦌ D → S ∈ F ∧ T ∈ G
18 17 imdistani ⊢ X ∈ A ∧ Y ∈ B ∧ S ∈ ⦋ X / x⦌ ⦋ Y / y⦌ C ∧ T ∈ ⦋ X / x⦌ ⦋ Y / y⦌ D → X ∈ A ∧ Y ∈ B ∧ S ∈ F ∧ T ∈ G
19 3 18 syl6 ⊢ ∀ x ∈ A ∀ y ∈ B C ∈ U ∧ D ∈ V → W ∈ S X O Y T → X ∈ A ∧ Y ∈ B ∧ S ∈ F ∧ T ∈ G