Proof of Theorem sspmlem
| Step | Hyp | Ref | Expression | 
|---|
| 1 |  | sspmlem.1 | . . . . 5
⊢ (((𝑈 ∈ NrmCVec ∧ 𝑊 ∈ 𝐻) ∧ (𝑥 ∈ 𝑌 ∧ 𝑦 ∈ 𝑌)) → (𝑥𝐹𝑦) = (𝑥𝐺𝑦)) | 
| 2 |  | ovres 7599 | . . . . . 6
⊢ ((𝑥 ∈ 𝑌 ∧ 𝑦 ∈ 𝑌) → (𝑥(𝐺 ↾ (𝑌 × 𝑌))𝑦) = (𝑥𝐺𝑦)) | 
| 3 | 2 | adantl 481 | . . . . 5
⊢ (((𝑈 ∈ NrmCVec ∧ 𝑊 ∈ 𝐻) ∧ (𝑥 ∈ 𝑌 ∧ 𝑦 ∈ 𝑌)) → (𝑥(𝐺 ↾ (𝑌 × 𝑌))𝑦) = (𝑥𝐺𝑦)) | 
| 4 | 1, 3 | eqtr4d 2780 | . . . 4
⊢ (((𝑈 ∈ NrmCVec ∧ 𝑊 ∈ 𝐻) ∧ (𝑥 ∈ 𝑌 ∧ 𝑦 ∈ 𝑌)) → (𝑥𝐹𝑦) = (𝑥(𝐺 ↾ (𝑌 × 𝑌))𝑦)) | 
| 5 | 4 | ralrimivva 3202 | . . 3
⊢ ((𝑈 ∈ NrmCVec ∧ 𝑊 ∈ 𝐻) → ∀𝑥 ∈ 𝑌 ∀𝑦 ∈ 𝑌 (𝑥𝐹𝑦) = (𝑥(𝐺 ↾ (𝑌 × 𝑌))𝑦)) | 
| 6 |  | eqid 2737 | . . 3
⊢ (𝑌 × 𝑌) = (𝑌 × 𝑌) | 
| 7 | 5, 6 | jctil 519 | . 2
⊢ ((𝑈 ∈ NrmCVec ∧ 𝑊 ∈ 𝐻) → ((𝑌 × 𝑌) = (𝑌 × 𝑌) ∧ ∀𝑥 ∈ 𝑌 ∀𝑦 ∈ 𝑌 (𝑥𝐹𝑦) = (𝑥(𝐺 ↾ (𝑌 × 𝑌))𝑦))) | 
| 8 |  | sspmlem.h | . . . . 5
⊢ 𝐻 = (SubSp‘𝑈) | 
| 9 | 8 | sspnv 30745 | . . . 4
⊢ ((𝑈 ∈ NrmCVec ∧ 𝑊 ∈ 𝐻) → 𝑊 ∈ NrmCVec) | 
| 10 |  | sspmlem.2 | . . . 4
⊢ (𝑊 ∈ NrmCVec → 𝐹:(𝑌 × 𝑌)⟶𝑅) | 
| 11 |  | ffn 6736 | . . . 4
⊢ (𝐹:(𝑌 × 𝑌)⟶𝑅 → 𝐹 Fn (𝑌 × 𝑌)) | 
| 12 | 9, 10, 11 | 3syl 18 | . . 3
⊢ ((𝑈 ∈ NrmCVec ∧ 𝑊 ∈ 𝐻) → 𝐹 Fn (𝑌 × 𝑌)) | 
| 13 |  | sspmlem.3 | . . . . . 6
⊢ (𝑈 ∈ NrmCVec → 𝐺:((BaseSet‘𝑈) × (BaseSet‘𝑈))⟶𝑆) | 
| 14 | 13 | ffnd 6737 | . . . . 5
⊢ (𝑈 ∈ NrmCVec → 𝐺 Fn ((BaseSet‘𝑈) × (BaseSet‘𝑈))) | 
| 15 | 14 | adantr 480 | . . . 4
⊢ ((𝑈 ∈ NrmCVec ∧ 𝑊 ∈ 𝐻) → 𝐺 Fn ((BaseSet‘𝑈) × (BaseSet‘𝑈))) | 
| 16 |  | eqid 2737 | . . . . . 6
⊢
(BaseSet‘𝑈) =
(BaseSet‘𝑈) | 
| 17 |  | sspmlem.y | . . . . . 6
⊢ 𝑌 = (BaseSet‘𝑊) | 
| 18 | 16, 17, 8 | sspba 30746 | . . . . 5
⊢ ((𝑈 ∈ NrmCVec ∧ 𝑊 ∈ 𝐻) → 𝑌 ⊆ (BaseSet‘𝑈)) | 
| 19 |  | xpss12 5700 | . . . . 5
⊢ ((𝑌 ⊆ (BaseSet‘𝑈) ∧ 𝑌 ⊆ (BaseSet‘𝑈)) → (𝑌 × 𝑌) ⊆ ((BaseSet‘𝑈) × (BaseSet‘𝑈))) | 
| 20 | 18, 18, 19 | syl2anc 584 | . . . 4
⊢ ((𝑈 ∈ NrmCVec ∧ 𝑊 ∈ 𝐻) → (𝑌 × 𝑌) ⊆ ((BaseSet‘𝑈) × (BaseSet‘𝑈))) | 
| 21 |  | fnssres 6691 | . . . 4
⊢ ((𝐺 Fn ((BaseSet‘𝑈) × (BaseSet‘𝑈)) ∧ (𝑌 × 𝑌) ⊆ ((BaseSet‘𝑈) × (BaseSet‘𝑈))) → (𝐺 ↾ (𝑌 × 𝑌)) Fn (𝑌 × 𝑌)) | 
| 22 | 15, 20, 21 | syl2anc 584 | . . 3
⊢ ((𝑈 ∈ NrmCVec ∧ 𝑊 ∈ 𝐻) → (𝐺 ↾ (𝑌 × 𝑌)) Fn (𝑌 × 𝑌)) | 
| 23 |  | eqfnov 7562 | . . 3
⊢ ((𝐹 Fn (𝑌 × 𝑌) ∧ (𝐺 ↾ (𝑌 × 𝑌)) Fn (𝑌 × 𝑌)) → (𝐹 = (𝐺 ↾ (𝑌 × 𝑌)) ↔ ((𝑌 × 𝑌) = (𝑌 × 𝑌) ∧ ∀𝑥 ∈ 𝑌 ∀𝑦 ∈ 𝑌 (𝑥𝐹𝑦) = (𝑥(𝐺 ↾ (𝑌 × 𝑌))𝑦)))) | 
| 24 | 12, 22, 23 | syl2anc 584 | . 2
⊢ ((𝑈 ∈ NrmCVec ∧ 𝑊 ∈ 𝐻) → (𝐹 = (𝐺 ↾ (𝑌 × 𝑌)) ↔ ((𝑌 × 𝑌) = (𝑌 × 𝑌) ∧ ∀𝑥 ∈ 𝑌 ∀𝑦 ∈ 𝑌 (𝑥𝐹𝑦) = (𝑥(𝐺 ↾ (𝑌 × 𝑌))𝑦)))) | 
| 25 | 7, 24 | mpbird 257 | 1
⊢ ((𝑈 ∈ NrmCVec ∧ 𝑊 ∈ 𝐻) → 𝐹 = (𝐺 ↾ (𝑌 × 𝑌))) |