MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  imasvscafn Structured version   Visualization version   GIF version

Theorem imasvscafn 17479
Description: The image structure's scalar multiplication is a function. (Contributed by Mario Carneiro, 24-Feb-2015.)
Hypotheses
Ref Expression
imasvscaf.u (𝜑𝑈 = (𝐹s 𝑅))
imasvscaf.v (𝜑𝑉 = (Base‘𝑅))
imasvscaf.f (𝜑𝐹:𝑉onto𝐵)
imasvscaf.r (𝜑𝑅𝑍)
imasvscaf.g 𝐺 = (Scalar‘𝑅)
imasvscaf.k 𝐾 = (Base‘𝐺)
imasvscaf.q · = ( ·𝑠𝑅)
imasvscaf.s = ( ·𝑠𝑈)
imasvscaf.e ((𝜑 ∧ (𝑝𝐾𝑎𝑉𝑞𝑉)) → ((𝐹𝑎) = (𝐹𝑞) → (𝐹‘(𝑝 · 𝑎)) = (𝐹‘(𝑝 · 𝑞))))
Assertion
Ref Expression
imasvscafn (𝜑 Fn (𝐾 × 𝐵))
Distinct variable groups:   𝑝,𝑎,𝑞,𝐹   𝐾,𝑎,𝑝,𝑞   𝜑,𝑎,𝑝,𝑞   𝐵,𝑝,𝑞   𝑅,𝑝,𝑞   · ,𝑝,𝑞   ,𝑎,𝑝,𝑞   𝑉,𝑎,𝑝,𝑞
Allowed substitution hints:   𝐵(𝑎)   𝑅(𝑎)   · (𝑎)   𝑈(𝑞,𝑝,𝑎)   𝐺(𝑞,𝑝,𝑎)   𝑍(𝑞,𝑝,𝑎)

Proof of Theorem imasvscafn
Dummy variables 𝑤 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqid 2724 . . . . . . . 8 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) = (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))
2 fvex 6894 . . . . . . . 8 (𝐹‘(𝑝 · 𝑞)) ∈ V
31, 2fnmpoi 8049 . . . . . . 7 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) Fn (𝐾 × {(𝐹𝑞)})
4 fnrel 6641 . . . . . . 7 ((𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) Fn (𝐾 × {(𝐹𝑞)}) → Rel (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))))
53, 4ax-mp 5 . . . . . 6 Rel (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))
65rgenw 3057 . . . . 5 𝑞𝑉 Rel (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))
7 reliun 5806 . . . . 5 (Rel 𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ↔ ∀𝑞𝑉 Rel (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))))
86, 7mpbir 230 . . . 4 Rel 𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))
9 imasvscaf.u . . . . . 6 (𝜑𝑈 = (𝐹s 𝑅))
10 imasvscaf.v . . . . . 6 (𝜑𝑉 = (Base‘𝑅))
11 imasvscaf.f . . . . . 6 (𝜑𝐹:𝑉onto𝐵)
12 imasvscaf.r . . . . . 6 (𝜑𝑅𝑍)
13 imasvscaf.g . . . . . 6 𝐺 = (Scalar‘𝑅)
14 imasvscaf.k . . . . . 6 𝐾 = (Base‘𝐺)
15 imasvscaf.q . . . . . 6 · = ( ·𝑠𝑅)
16 imasvscaf.s . . . . . 6 = ( ·𝑠𝑈)
179, 10, 11, 12, 13, 14, 15, 16imasvsca 17462 . . . . 5 (𝜑 = 𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))))
1817releqd 5768 . . . 4 (𝜑 → (Rel ↔ Rel 𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))))
198, 18mpbiri 258 . . 3 (𝜑 → Rel )
20 dffn2 6709 . . . . . . . . . . . . 13 ((𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) Fn (𝐾 × {(𝐹𝑞)}) ↔ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))):(𝐾 × {(𝐹𝑞)})⟶V)
213, 20mpbi 229 . . . . . . . . . . . 12 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))):(𝐾 × {(𝐹𝑞)})⟶V
22 fssxp 6735 . . . . . . . . . . . 12 ((𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))):(𝐾 × {(𝐹𝑞)})⟶V → (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ ((𝐾 × {(𝐹𝑞)}) × V))
2321, 22ax-mp 5 . . . . . . . . . . 11 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ ((𝐾 × {(𝐹𝑞)}) × V)
24 fof 6795 . . . . . . . . . . . . . . 15 (𝐹:𝑉onto𝐵𝐹:𝑉𝐵)
2511, 24syl 17 . . . . . . . . . . . . . 14 (𝜑𝐹:𝑉𝐵)
2625ffvelcdmda 7076 . . . . . . . . . . . . 13 ((𝜑𝑞𝑉) → (𝐹𝑞) ∈ 𝐵)
2726snssd 4804 . . . . . . . . . . . 12 ((𝜑𝑞𝑉) → {(𝐹𝑞)} ⊆ 𝐵)
28 xpss2 5686 . . . . . . . . . . . 12 ({(𝐹𝑞)} ⊆ 𝐵 → (𝐾 × {(𝐹𝑞)}) ⊆ (𝐾 × 𝐵))
29 xpss1 5685 . . . . . . . . . . . 12 ((𝐾 × {(𝐹𝑞)}) ⊆ (𝐾 × 𝐵) → ((𝐾 × {(𝐹𝑞)}) × V) ⊆ ((𝐾 × 𝐵) × V))
3027, 28, 293syl 18 . . . . . . . . . . 11 ((𝜑𝑞𝑉) → ((𝐾 × {(𝐹𝑞)}) × V) ⊆ ((𝐾 × 𝐵) × V))
3123, 30sstrid 3985 . . . . . . . . . 10 ((𝜑𝑞𝑉) → (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ ((𝐾 × 𝐵) × V))
3231ralrimiva 3138 . . . . . . . . 9 (𝜑 → ∀𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ ((𝐾 × 𝐵) × V))
33 iunss 5038 . . . . . . . . 9 ( 𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ ((𝐾 × 𝐵) × V) ↔ ∀𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ ((𝐾 × 𝐵) × V))
3432, 33sylibr 233 . . . . . . . 8 (𝜑 𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ ((𝐾 × 𝐵) × V))
3517, 34eqsstrd 4012 . . . . . . 7 (𝜑 ⊆ ((𝐾 × 𝐵) × V))
36 dmss 5892 . . . . . . 7 ( ⊆ ((𝐾 × 𝐵) × V) → dom ⊆ dom ((𝐾 × 𝐵) × V))
3735, 36syl 17 . . . . . 6 (𝜑 → dom ⊆ dom ((𝐾 × 𝐵) × V))
38 vn0 4330 . . . . . . 7 V ≠ ∅
39 dmxp 5918 . . . . . . 7 (V ≠ ∅ → dom ((𝐾 × 𝐵) × V) = (𝐾 × 𝐵))
4038, 39ax-mp 5 . . . . . 6 dom ((𝐾 × 𝐵) × V) = (𝐾 × 𝐵)
4137, 40sseqtrdi 4024 . . . . 5 (𝜑 → dom ⊆ (𝐾 × 𝐵))
42 forn 6798 . . . . . . 7 (𝐹:𝑉onto𝐵 → ran 𝐹 = 𝐵)
4311, 42syl 17 . . . . . 6 (𝜑 → ran 𝐹 = 𝐵)
4443xpeq2d 5696 . . . . 5 (𝜑 → (𝐾 × ran 𝐹) = (𝐾 × 𝐵))
4541, 44sseqtrrd 4015 . . . 4 (𝜑 → dom ⊆ (𝐾 × ran 𝐹))
46 df-br 5139 . . . . . . . . . 10 (⟨𝑝, (𝐹𝑎)⟩ 𝑤 ↔ ⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ )
4717eleq2d 2811 . . . . . . . . . . . 12 (𝜑 → (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ ↔ ⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ 𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))))
4847adantr 480 . . . . . . . . . . 11 ((𝜑 ∧ (𝑝𝐾𝑎𝑉)) → (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ ↔ ⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ 𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))))
49 eliun 4991 . . . . . . . . . . . 12 (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ 𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ↔ ∃𝑞𝑉 ⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))))
50 df-3an 1086 . . . . . . . . . . . . . . 15 ((𝑝𝐾𝑎𝑉𝑞𝑉) ↔ ((𝑝𝐾𝑎𝑉) ∧ 𝑞𝑉))
511mpofun 7524 . . . . . . . . . . . . . . . . . . . 20 Fun (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))
52 funopfv 6933 . . . . . . . . . . . . . . . . . . . 20 (Fun (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → ((𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))‘⟨𝑝, (𝐹𝑎)⟩) = 𝑤))
5351, 52ax-mp 5 . . . . . . . . . . . . . . . . . . 19 (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → ((𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))‘⟨𝑝, (𝐹𝑎)⟩) = 𝑤)
54 df-ov 7404 . . . . . . . . . . . . . . . . . . . 20 (𝑝(𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))(𝐹𝑎)) = ((𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))‘⟨𝑝, (𝐹𝑎)⟩)
55 opex 5454 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑝, (𝐹𝑎)⟩ ∈ V
56 vex 3470 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑤 ∈ V
5755, 56opeldm 5897 . . . . . . . . . . . . . . . . . . . . . . 23 (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → ⟨𝑝, (𝐹𝑎)⟩ ∈ dom (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))))
581, 2dmmpo 8050 . . . . . . . . . . . . . . . . . . . . . . 23 dom (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) = (𝐾 × {(𝐹𝑞)})
5957, 58eleqtrdi 2835 . . . . . . . . . . . . . . . . . . . . . 22 (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → ⟨𝑝, (𝐹𝑎)⟩ ∈ (𝐾 × {(𝐹𝑞)}))
60 opelxp 5702 . . . . . . . . . . . . . . . . . . . . . 22 (⟨𝑝, (𝐹𝑎)⟩ ∈ (𝐾 × {(𝐹𝑞)}) ↔ (𝑝𝐾 ∧ (𝐹𝑎) ∈ {(𝐹𝑞)}))
6159, 60sylib 217 . . . . . . . . . . . . . . . . . . . . 21 (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → (𝑝𝐾 ∧ (𝐹𝑎) ∈ {(𝐹𝑞)}))
62 fvoveq1 7424 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧 = 𝑝 → (𝐹‘(𝑧 · 𝑞)) = (𝐹‘(𝑝 · 𝑞)))
63 eqidd 2725 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = (𝐹𝑎) → (𝐹‘(𝑝 · 𝑞)) = (𝐹‘(𝑝 · 𝑞)))
64 fvoveq1 7424 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑝 = 𝑧 → (𝐹‘(𝑝 · 𝑞)) = (𝐹‘(𝑧 · 𝑞)))
65 eqidd 2725 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = 𝑦 → (𝐹‘(𝑧 · 𝑞)) = (𝐹‘(𝑧 · 𝑞)))
6664, 65cbvmpov 7496 . . . . . . . . . . . . . . . . . . . . . 22 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) = (𝑧𝐾, 𝑦 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑧 · 𝑞)))
6762, 63, 66, 2ovmpo 7560 . . . . . . . . . . . . . . . . . . . . 21 ((𝑝𝐾 ∧ (𝐹𝑎) ∈ {(𝐹𝑞)}) → (𝑝(𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))(𝐹𝑎)) = (𝐹‘(𝑝 · 𝑞)))
6861, 67syl 17 . . . . . . . . . . . . . . . . . . . 20 (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → (𝑝(𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))(𝐹𝑎)) = (𝐹‘(𝑝 · 𝑞)))
6954, 68eqtr3id 2778 . . . . . . . . . . . . . . . . . . 19 (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → ((𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))‘⟨𝑝, (𝐹𝑎)⟩) = (𝐹‘(𝑝 · 𝑞)))
7053, 69eqtr3d 2766 . . . . . . . . . . . . . . . . . 18 (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → 𝑤 = (𝐹‘(𝑝 · 𝑞)))
7170adantl 481 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑝𝐾𝑎𝑉𝑞𝑉)) ∧ ⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))) → 𝑤 = (𝐹‘(𝑝 · 𝑞)))
72 imasvscaf.e . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑝𝐾𝑎𝑉𝑞𝑉)) → ((𝐹𝑎) = (𝐹𝑞) → (𝐹‘(𝑝 · 𝑎)) = (𝐹‘(𝑝 · 𝑞))))
73 elsni 4637 . . . . . . . . . . . . . . . . . . 19 ((𝐹𝑎) ∈ {(𝐹𝑞)} → (𝐹𝑎) = (𝐹𝑞))
7461, 73simpl2im 503 . . . . . . . . . . . . . . . . . 18 (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → (𝐹𝑎) = (𝐹𝑞))
7572, 74impel 505 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑝𝐾𝑎𝑉𝑞𝑉)) ∧ ⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))) → (𝐹‘(𝑝 · 𝑎)) = (𝐹‘(𝑝 · 𝑞)))
7671, 75eqtr4d 2767 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑝𝐾𝑎𝑉𝑞𝑉)) ∧ ⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞)))) → 𝑤 = (𝐹‘(𝑝 · 𝑎)))
7776ex 412 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑝𝐾𝑎𝑉𝑞𝑉)) → (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → 𝑤 = (𝐹‘(𝑝 · 𝑎))))
7850, 77sylan2br 594 . . . . . . . . . . . . . 14 ((𝜑 ∧ ((𝑝𝐾𝑎𝑉) ∧ 𝑞𝑉)) → (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → 𝑤 = (𝐹‘(𝑝 · 𝑎))))
7978anassrs 467 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑝𝐾𝑎𝑉)) ∧ 𝑞𝑉) → (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → 𝑤 = (𝐹‘(𝑝 · 𝑎))))
8079rexlimdva 3147 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑝𝐾𝑎𝑉)) → (∃𝑞𝑉 ⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → 𝑤 = (𝐹‘(𝑝 · 𝑎))))
8149, 80biimtrid 241 . . . . . . . . . . 11 ((𝜑 ∧ (𝑝𝐾𝑎𝑉)) → (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ 𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → 𝑤 = (𝐹‘(𝑝 · 𝑎))))
8248, 81sylbid 239 . . . . . . . . . 10 ((𝜑 ∧ (𝑝𝐾𝑎𝑉)) → (⟨⟨𝑝, (𝐹𝑎)⟩, 𝑤⟩ ∈ 𝑤 = (𝐹‘(𝑝 · 𝑎))))
8346, 82biimtrid 241 . . . . . . . . 9 ((𝜑 ∧ (𝑝𝐾𝑎𝑉)) → (⟨𝑝, (𝐹𝑎)⟩ 𝑤𝑤 = (𝐹‘(𝑝 · 𝑎))))
8483alrimiv 1922 . . . . . . . 8 ((𝜑 ∧ (𝑝𝐾𝑎𝑉)) → ∀𝑤(⟨𝑝, (𝐹𝑎)⟩ 𝑤𝑤 = (𝐹‘(𝑝 · 𝑎))))
85 mo2icl 3702 . . . . . . . 8 (∀𝑤(⟨𝑝, (𝐹𝑎)⟩ 𝑤𝑤 = (𝐹‘(𝑝 · 𝑎))) → ∃*𝑤𝑝, (𝐹𝑎)⟩ 𝑤)
8684, 85syl 17 . . . . . . 7 ((𝜑 ∧ (𝑝𝐾𝑎𝑉)) → ∃*𝑤𝑝, (𝐹𝑎)⟩ 𝑤)
8786ralrimivva 3192 . . . . . 6 (𝜑 → ∀𝑝𝐾𝑎𝑉 ∃*𝑤𝑝, (𝐹𝑎)⟩ 𝑤)
88 fofn 6797 . . . . . . . 8 (𝐹:𝑉onto𝐵𝐹 Fn 𝑉)
89 opeq2 4866 . . . . . . . . . . 11 (𝑦 = (𝐹𝑎) → ⟨𝑝, 𝑦⟩ = ⟨𝑝, (𝐹𝑎)⟩)
9089breq1d 5148 . . . . . . . . . 10 (𝑦 = (𝐹𝑎) → (⟨𝑝, 𝑦 𝑤 ↔ ⟨𝑝, (𝐹𝑎)⟩ 𝑤))
9190mobidv 2535 . . . . . . . . 9 (𝑦 = (𝐹𝑎) → (∃*𝑤𝑝, 𝑦 𝑤 ↔ ∃*𝑤𝑝, (𝐹𝑎)⟩ 𝑤))
9291ralrn 7079 . . . . . . . 8 (𝐹 Fn 𝑉 → (∀𝑦 ∈ ran 𝐹∃*𝑤𝑝, 𝑦 𝑤 ↔ ∀𝑎𝑉 ∃*𝑤𝑝, (𝐹𝑎)⟩ 𝑤))
9311, 88, 923syl 18 . . . . . . 7 (𝜑 → (∀𝑦 ∈ ran 𝐹∃*𝑤𝑝, 𝑦 𝑤 ↔ ∀𝑎𝑉 ∃*𝑤𝑝, (𝐹𝑎)⟩ 𝑤))
9493ralbidv 3169 . . . . . 6 (𝜑 → (∀𝑝𝐾𝑦 ∈ ran 𝐹∃*𝑤𝑝, 𝑦 𝑤 ↔ ∀𝑝𝐾𝑎𝑉 ∃*𝑤𝑝, (𝐹𝑎)⟩ 𝑤))
9587, 94mpbird 257 . . . . 5 (𝜑 → ∀𝑝𝐾𝑦 ∈ ran 𝐹∃*𝑤𝑝, 𝑦 𝑤)
96 breq1 5141 . . . . . . 7 (𝑥 = ⟨𝑝, 𝑦⟩ → (𝑥 𝑤 ↔ ⟨𝑝, 𝑦 𝑤))
9796mobidv 2535 . . . . . 6 (𝑥 = ⟨𝑝, 𝑦⟩ → (∃*𝑤 𝑥 𝑤 ↔ ∃*𝑤𝑝, 𝑦 𝑤))
9897ralxp 5831 . . . . 5 (∀𝑥 ∈ (𝐾 × ran 𝐹)∃*𝑤 𝑥 𝑤 ↔ ∀𝑝𝐾𝑦 ∈ ran 𝐹∃*𝑤𝑝, 𝑦 𝑤)
9995, 98sylibr 233 . . . 4 (𝜑 → ∀𝑥 ∈ (𝐾 × ran 𝐹)∃*𝑤 𝑥 𝑤)
100 ssralv 4042 . . . 4 (dom ⊆ (𝐾 × ran 𝐹) → (∀𝑥 ∈ (𝐾 × ran 𝐹)∃*𝑤 𝑥 𝑤 → ∀𝑥 ∈ dom ∃*𝑤 𝑥 𝑤))
10145, 99, 100sylc 65 . . 3 (𝜑 → ∀𝑥 ∈ dom ∃*𝑤 𝑥 𝑤)
102 dffun7 6565 . . 3 (Fun ↔ (Rel ∧ ∀𝑥 ∈ dom ∃*𝑤 𝑥 𝑤))
10319, 101, 102sylanbrc 582 . 2 (𝜑 → Fun )
104 eqimss2 4033 . . . . . . . . . . . . . . 15 ( = 𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) → 𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ )
10517, 104syl 17 . . . . . . . . . . . . . 14 (𝜑 𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ )
106 iunss 5038 . . . . . . . . . . . . . 14 ( 𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ ↔ ∀𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ )
107105, 106sylib 217 . . . . . . . . . . . . 13 (𝜑 → ∀𝑞𝑉 (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ )
108107r19.21bi 3240 . . . . . . . . . . . 12 ((𝜑𝑞𝑉) → (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ )
109108adantrl 713 . . . . . . . . . . 11 ((𝜑 ∧ (𝑝𝐾𝑞𝑉)) → (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ )
110 dmss 5892 . . . . . . . . . . 11 ((𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ → dom (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ dom )
111109, 110syl 17 . . . . . . . . . 10 ((𝜑 ∧ (𝑝𝐾𝑞𝑉)) → dom (𝑝𝐾, 𝑥 ∈ {(𝐹𝑞)} ↦ (𝐹‘(𝑝 · 𝑞))) ⊆ dom )
11258, 111eqsstrrid 4023 . . . . . . . . 9 ((𝜑 ∧ (𝑝𝐾𝑞𝑉)) → (𝐾 × {(𝐹𝑞)}) ⊆ dom )
113 simprl 768 . . . . . . . . . 10 ((𝜑 ∧ (𝑝𝐾𝑞𝑉)) → 𝑝𝐾)
114 fvex 6894 . . . . . . . . . . 11 (𝐹𝑞) ∈ V
115114snid 4656 . . . . . . . . . 10 (𝐹𝑞) ∈ {(𝐹𝑞)}
116 opelxpi 5703 . . . . . . . . . 10 ((𝑝𝐾 ∧ (𝐹𝑞) ∈ {(𝐹𝑞)}) → ⟨𝑝, (𝐹𝑞)⟩ ∈ (𝐾 × {(𝐹𝑞)}))
117113, 115, 116sylancl 585 . . . . . . . . 9 ((𝜑 ∧ (𝑝𝐾𝑞𝑉)) → ⟨𝑝, (𝐹𝑞)⟩ ∈ (𝐾 × {(𝐹𝑞)}))
118112, 117sseldd 3975 . . . . . . . 8 ((𝜑 ∧ (𝑝𝐾𝑞𝑉)) → ⟨𝑝, (𝐹𝑞)⟩ ∈ dom )
119118ralrimivva 3192 . . . . . . 7 (𝜑 → ∀𝑝𝐾𝑞𝑉𝑝, (𝐹𝑞)⟩ ∈ dom )
120 opeq2 4866 . . . . . . . . . . 11 (𝑦 = (𝐹𝑞) → ⟨𝑝, 𝑦⟩ = ⟨𝑝, (𝐹𝑞)⟩)
121120eleq1d 2810 . . . . . . . . . 10 (𝑦 = (𝐹𝑞) → (⟨𝑝, 𝑦⟩ ∈ dom ↔ ⟨𝑝, (𝐹𝑞)⟩ ∈ dom ))
122121ralrn 7079 . . . . . . . . 9 (𝐹 Fn 𝑉 → (∀𝑦 ∈ ran 𝐹𝑝, 𝑦⟩ ∈ dom ↔ ∀𝑞𝑉𝑝, (𝐹𝑞)⟩ ∈ dom ))
12311, 88, 1223syl 18 . . . . . . . 8 (𝜑 → (∀𝑦 ∈ ran 𝐹𝑝, 𝑦⟩ ∈ dom ↔ ∀𝑞𝑉𝑝, (𝐹𝑞)⟩ ∈ dom ))
124123ralbidv 3169 . . . . . . 7 (𝜑 → (∀𝑝𝐾𝑦 ∈ ran 𝐹𝑝, 𝑦⟩ ∈ dom ↔ ∀𝑝𝐾𝑞𝑉𝑝, (𝐹𝑞)⟩ ∈ dom ))
125119, 124mpbird 257 . . . . . 6 (𝜑 → ∀𝑝𝐾𝑦 ∈ ran 𝐹𝑝, 𝑦⟩ ∈ dom )
126 eleq1 2813 . . . . . . 7 (𝑥 = ⟨𝑝, 𝑦⟩ → (𝑥 ∈ dom ↔ ⟨𝑝, 𝑦⟩ ∈ dom ))
127126ralxp 5831 . . . . . 6 (∀𝑥 ∈ (𝐾 × ran 𝐹)𝑥 ∈ dom ↔ ∀𝑝𝐾𝑦 ∈ ran 𝐹𝑝, 𝑦⟩ ∈ dom )
128125, 127sylibr 233 . . . . 5 (𝜑 → ∀𝑥 ∈ (𝐾 × ran 𝐹)𝑥 ∈ dom )
129 dfss3 3962 . . . . 5 ((𝐾 × ran 𝐹) ⊆ dom ↔ ∀𝑥 ∈ (𝐾 × ran 𝐹)𝑥 ∈ dom )
130128, 129sylibr 233 . . . 4 (𝜑 → (𝐾 × ran 𝐹) ⊆ dom )
13144, 130eqsstrrd 4013 . . 3 (𝜑 → (𝐾 × 𝐵) ⊆ dom )
13241, 131eqssd 3991 . 2 (𝜑 → dom = (𝐾 × 𝐵))
133 df-fn 6536 . 2 ( Fn (𝐾 × 𝐵) ↔ (Fun ∧ dom = (𝐾 × 𝐵)))
134103, 132, 133sylanbrc 582 1 (𝜑 Fn (𝐾 × 𝐵))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395  w3a 1084  wal 1531   = wceq 1533  wcel 2098  ∃*wmo 2524  wne 2932  wral 3053  wrex 3062  Vcvv 3466  wss 3940  c0 4314  {csn 4620  cop 4626   ciun 4987   class class class wbr 5138   × cxp 5664  dom cdm 5666  ran crn 5667  Rel wrel 5671  Fun wfun 6527   Fn wfn 6528  wf 6529  ontowfo 6531  cfv 6533  (class class class)co 7401  cmpo 7403  Basecbs 17140  Scalarcsca 17196   ·𝑠 cvsca 17197  s cimas 17446
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7718  ax-cnex 11161  ax-resscn 11162  ax-1cn 11163  ax-icn 11164  ax-addcl 11165  ax-addrcl 11166  ax-mulcl 11167  ax-mulrcl 11168  ax-mulcom 11169  ax-addass 11170  ax-mulass 11171  ax-distr 11172  ax-i2m1 11173  ax-1ne0 11174  ax-1rid 11175  ax-rnegex 11176  ax-rrecex 11177  ax-cnre 11178  ax-pre-lttri 11179  ax-pre-lttrn 11180  ax-pre-ltadd 11181  ax-pre-mulgt0 11182
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-pss 3959  df-nul 4315  df-if 4521  df-pw 4596  df-sn 4621  df-pr 4623  df-tp 4625  df-op 4627  df-uni 4900  df-iun 4989  df-br 5139  df-opab 5201  df-mpt 5222  df-tr 5256  df-id 5564  df-eprel 5570  df-po 5578  df-so 5579  df-fr 5621  df-we 5623  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6290  df-ord 6357  df-on 6358  df-lim 6359  df-suc 6360  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-riota 7357  df-ov 7404  df-oprab 7405  df-mpo 7406  df-om 7849  df-1st 7968  df-2nd 7969  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-er 8698  df-en 8935  df-dom 8936  df-sdom 8937  df-fin 8938  df-sup 9432  df-inf 9433  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-nn 12209  df-2 12271  df-3 12272  df-4 12273  df-5 12274  df-6 12275  df-7 12276  df-8 12277  df-9 12278  df-n0 12469  df-z 12555  df-dec 12674  df-uz 12819  df-fz 13481  df-struct 17076  df-slot 17111  df-ndx 17123  df-base 17141  df-plusg 17206  df-mulr 17207  df-sca 17209  df-vsca 17210  df-ip 17211  df-tset 17212  df-ple 17213  df-ds 17215  df-imas 17450
This theorem is referenced by:  imasvscaval  17480  imasvscaf  17481
  Copyright terms: Public domain W3C validator