Step | Hyp | Ref
| Expression |
1 | | simpl1 1057 |
. . . . . . 7
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → 𝐼 ∈ 𝑉) |
2 | | simpl2 1058 |
. . . . . . . . 9
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → 𝐽 ⊆ 𝐼) |
3 | | sswrd 13168 |
. . . . . . . . 9
⊢ (𝐽 ⊆ 𝐼 → Word 𝐽 ⊆ Word 𝐼) |
4 | 2, 3 | syl 17 |
. . . . . . . 8
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → Word 𝐽 ⊆ Word 𝐼) |
5 | | simprr 792 |
. . . . . . . 8
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → 𝑥 ∈ Word 𝐽) |
6 | 4, 5 | sseldd 3569 |
. . . . . . 7
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → 𝑥 ∈ Word 𝐼) |
7 | | frmdmnd.m |
. . . . . . . 8
⊢ 𝑀 = (freeMnd‘𝐼) |
8 | | frmdgsum.u |
. . . . . . . 8
⊢ 𝑈 =
(varFMnd‘𝐼) |
9 | 7, 8 | frmdgsum 17222 |
. . . . . . 7
⊢ ((𝐼 ∈ 𝑉 ∧ 𝑥 ∈ Word 𝐼) → (𝑀 Σg (𝑈 ∘ 𝑥)) = 𝑥) |
10 | 1, 6, 9 | syl2anc 691 |
. . . . . 6
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → (𝑀 Σg (𝑈 ∘ 𝑥)) = 𝑥) |
11 | | simpl3 1059 |
. . . . . . 7
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → 𝐴 ∈ (SubMnd‘𝑀)) |
12 | | wrdf 13165 |
. . . . . . . . . . 11
⊢ (𝑥 ∈ Word 𝐽 → 𝑥:(0..^(#‘𝑥))⟶𝐽) |
13 | 12 | ad2antll 761 |
. . . . . . . . . 10
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → 𝑥:(0..^(#‘𝑥))⟶𝐽) |
14 | | frn 5966 |
. . . . . . . . . 10
⊢ (𝑥:(0..^(#‘𝑥))⟶𝐽 → ran 𝑥 ⊆ 𝐽) |
15 | 13, 14 | syl 17 |
. . . . . . . . 9
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → ran 𝑥 ⊆ 𝐽) |
16 | | cores 5555 |
. . . . . . . . 9
⊢ (ran
𝑥 ⊆ 𝐽 → ((𝑈 ↾ 𝐽) ∘ 𝑥) = (𝑈 ∘ 𝑥)) |
17 | 15, 16 | syl 17 |
. . . . . . . 8
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → ((𝑈 ↾ 𝐽) ∘ 𝑥) = (𝑈 ∘ 𝑥)) |
18 | 8 | vrmdf 17218 |
. . . . . . . . . . . . . 14
⊢ (𝐼 ∈ 𝑉 → 𝑈:𝐼⟶Word 𝐼) |
19 | 18 | 3ad2ant1 1075 |
. . . . . . . . . . . . 13
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) → 𝑈:𝐼⟶Word 𝐼) |
20 | | ffn 5958 |
. . . . . . . . . . . . 13
⊢ (𝑈:𝐼⟶Word 𝐼 → 𝑈 Fn 𝐼) |
21 | 19, 20 | syl 17 |
. . . . . . . . . . . 12
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) → 𝑈 Fn 𝐼) |
22 | 21 | adantr 480 |
. . . . . . . . . . 11
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → 𝑈 Fn 𝐼) |
23 | | fnssres 5918 |
. . . . . . . . . . 11
⊢ ((𝑈 Fn 𝐼 ∧ 𝐽 ⊆ 𝐼) → (𝑈 ↾ 𝐽) Fn 𝐽) |
24 | 22, 2, 23 | syl2anc 691 |
. . . . . . . . . 10
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → (𝑈 ↾ 𝐽) Fn 𝐽) |
25 | | df-ima 5051 |
. . . . . . . . . . 11
⊢ (𝑈 “ 𝐽) = ran (𝑈 ↾ 𝐽) |
26 | | simprl 790 |
. . . . . . . . . . 11
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → (𝑈 “ 𝐽) ⊆ 𝐴) |
27 | 25, 26 | syl5eqssr 3613 |
. . . . . . . . . 10
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → ran (𝑈 ↾ 𝐽) ⊆ 𝐴) |
28 | | df-f 5808 |
. . . . . . . . . 10
⊢ ((𝑈 ↾ 𝐽):𝐽⟶𝐴 ↔ ((𝑈 ↾ 𝐽) Fn 𝐽 ∧ ran (𝑈 ↾ 𝐽) ⊆ 𝐴)) |
29 | 24, 27, 28 | sylanbrc 695 |
. . . . . . . . 9
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → (𝑈 ↾ 𝐽):𝐽⟶𝐴) |
30 | | wrdco 13428 |
. . . . . . . . 9
⊢ ((𝑥 ∈ Word 𝐽 ∧ (𝑈 ↾ 𝐽):𝐽⟶𝐴) → ((𝑈 ↾ 𝐽) ∘ 𝑥) ∈ Word 𝐴) |
31 | 5, 29, 30 | syl2anc 691 |
. . . . . . . 8
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → ((𝑈 ↾ 𝐽) ∘ 𝑥) ∈ Word 𝐴) |
32 | 17, 31 | eqeltrrd 2689 |
. . . . . . 7
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → (𝑈 ∘ 𝑥) ∈ Word 𝐴) |
33 | | gsumwsubmcl 17198 |
. . . . . . 7
⊢ ((𝐴 ∈ (SubMnd‘𝑀) ∧ (𝑈 ∘ 𝑥) ∈ Word 𝐴) → (𝑀 Σg (𝑈 ∘ 𝑥)) ∈ 𝐴) |
34 | 11, 32, 33 | syl2anc 691 |
. . . . . 6
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → (𝑀 Σg (𝑈 ∘ 𝑥)) ∈ 𝐴) |
35 | 10, 34 | eqeltrrd 2689 |
. . . . 5
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ ((𝑈 “ 𝐽) ⊆ 𝐴 ∧ 𝑥 ∈ Word 𝐽)) → 𝑥 ∈ 𝐴) |
36 | 35 | expr 641 |
. . . 4
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ (𝑈 “ 𝐽) ⊆ 𝐴) → (𝑥 ∈ Word 𝐽 → 𝑥 ∈ 𝐴)) |
37 | 36 | ssrdv 3574 |
. . 3
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ (𝑈 “ 𝐽) ⊆ 𝐴) → Word 𝐽 ⊆ 𝐴) |
38 | 37 | ex 449 |
. 2
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) → ((𝑈 “ 𝐽) ⊆ 𝐴 → Word 𝐽 ⊆ 𝐴)) |
39 | | simpl1 1057 |
. . . . . . 7
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ 𝑥 ∈ 𝐽) → 𝐼 ∈ 𝑉) |
40 | | simp2 1055 |
. . . . . . . 8
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) → 𝐽 ⊆ 𝐼) |
41 | 40 | sselda 3568 |
. . . . . . 7
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ 𝑥 ∈ 𝐽) → 𝑥 ∈ 𝐼) |
42 | 8 | vrmdval 17217 |
. . . . . . 7
⊢ ((𝐼 ∈ 𝑉 ∧ 𝑥 ∈ 𝐼) → (𝑈‘𝑥) = 〈“𝑥”〉) |
43 | 39, 41, 42 | syl2anc 691 |
. . . . . 6
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ 𝑥 ∈ 𝐽) → (𝑈‘𝑥) = 〈“𝑥”〉) |
44 | | simpr 476 |
. . . . . . 7
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ 𝑥 ∈ 𝐽) → 𝑥 ∈ 𝐽) |
45 | 44 | s1cld 13236 |
. . . . . 6
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ 𝑥 ∈ 𝐽) → 〈“𝑥”〉 ∈ Word 𝐽) |
46 | 43, 45 | eqeltrd 2688 |
. . . . 5
⊢ (((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) ∧ 𝑥 ∈ 𝐽) → (𝑈‘𝑥) ∈ Word 𝐽) |
47 | 46 | ralrimiva 2949 |
. . . 4
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) → ∀𝑥 ∈ 𝐽 (𝑈‘𝑥) ∈ Word 𝐽) |
48 | | fnfun 5902 |
. . . . . 6
⊢ (𝑈 Fn 𝐼 → Fun 𝑈) |
49 | 21, 48 | syl 17 |
. . . . 5
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) → Fun 𝑈) |
50 | | fndm 5904 |
. . . . . . 7
⊢ (𝑈 Fn 𝐼 → dom 𝑈 = 𝐼) |
51 | 21, 50 | syl 17 |
. . . . . 6
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) → dom 𝑈 = 𝐼) |
52 | 40, 51 | sseqtr4d 3605 |
. . . . 5
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) → 𝐽 ⊆ dom 𝑈) |
53 | | funimass4 6157 |
. . . . 5
⊢ ((Fun
𝑈 ∧ 𝐽 ⊆ dom 𝑈) → ((𝑈 “ 𝐽) ⊆ Word 𝐽 ↔ ∀𝑥 ∈ 𝐽 (𝑈‘𝑥) ∈ Word 𝐽)) |
54 | 49, 52, 53 | syl2anc 691 |
. . . 4
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) → ((𝑈 “ 𝐽) ⊆ Word 𝐽 ↔ ∀𝑥 ∈ 𝐽 (𝑈‘𝑥) ∈ Word 𝐽)) |
55 | 47, 54 | mpbird 246 |
. . 3
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) → (𝑈 “ 𝐽) ⊆ Word 𝐽) |
56 | | sstr2 3575 |
. . 3
⊢ ((𝑈 “ 𝐽) ⊆ Word 𝐽 → (Word 𝐽 ⊆ 𝐴 → (𝑈 “ 𝐽) ⊆ 𝐴)) |
57 | 55, 56 | syl 17 |
. 2
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) → (Word 𝐽 ⊆ 𝐴 → (𝑈 “ 𝐽) ⊆ 𝐴)) |
58 | 38, 57 | impbid 201 |
1
⊢ ((𝐼 ∈ 𝑉 ∧ 𝐽 ⊆ 𝐼 ∧ 𝐴 ∈ (SubMnd‘𝑀)) → ((𝑈 “ 𝐽) ⊆ 𝐴 ↔ Word 𝐽 ⊆ 𝐴)) |