| Step | Hyp | Ref | Expression | 
						
							| 1 |  | gsmsymgrfix.s | ⊢ 𝑆  =  ( SymGrp ‘ 𝑁 ) | 
						
							| 2 |  | gsmsymgrfix.b | ⊢ 𝐵  =  ( Base ‘ 𝑆 ) | 
						
							| 3 |  | gsmsymgreq.z | ⊢ 𝑍  =  ( SymGrp ‘ 𝑀 ) | 
						
							| 4 |  | gsmsymgreq.p | ⊢ 𝑃  =  ( Base ‘ 𝑍 ) | 
						
							| 5 |  | gsmsymgreq.i | ⊢ 𝐼  =  ( 𝑁  ∩  𝑀 ) | 
						
							| 6 |  | simpr | ⊢ ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  →  𝐶  ∈  𝐵 ) | 
						
							| 7 |  | simpr | ⊢ ( ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  →  𝑅  ∈  𝑃 ) | 
						
							| 8 | 6 7 | anim12i | ⊢ ( ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 ) )  →  ( 𝐶  ∈  𝐵  ∧  𝑅  ∈  𝑃 ) ) | 
						
							| 9 | 8 | 3adant3 | ⊢ ( ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) )  →  ( 𝐶  ∈  𝐵  ∧  𝑅  ∈  𝑃 ) ) | 
						
							| 10 | 9 | adantl | ⊢ ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  →  ( 𝐶  ∈  𝐵  ∧  𝑅  ∈  𝑃 ) ) | 
						
							| 11 | 10 | adantr | ⊢ ( ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  ∧  ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) )  →  ( 𝐶  ∈  𝐵  ∧  𝑅  ∈  𝑃 ) ) | 
						
							| 12 |  | simpll3 | ⊢ ( ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  ∧  ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) )  →  𝐽  ∈  𝐼 ) | 
						
							| 13 |  | simpr | ⊢ ( ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) )  →  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) | 
						
							| 14 | 13 | adantl | ⊢ ( ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  ∧  ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) )  →  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) | 
						
							| 15 |  | simprl | ⊢ ( ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  ∧  ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) )  →  ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 ) ) | 
						
							| 16 | 12 14 15 | 3jca | ⊢ ( ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  ∧  ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) )  →  ( 𝐽  ∈  𝐼  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 )  ∧  ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 ) ) ) | 
						
							| 17 | 1 2 3 4 5 | fvcosymgeq | ⊢ ( ( 𝐶  ∈  𝐵  ∧  𝑅  ∈  𝑃 )  →  ( ( 𝐽  ∈  𝐼  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 )  ∧  ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 ) )  →  ( ( ( 𝑆  Σg  𝑋 )  ∘  𝐶 ) ‘ 𝐽 )  =  ( ( ( 𝑍  Σg  𝑌 )  ∘  𝑅 ) ‘ 𝐽 ) ) ) | 
						
							| 18 | 11 16 17 | sylc | ⊢ ( ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  ∧  ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) )  →  ( ( ( 𝑆  Σg  𝑋 )  ∘  𝐶 ) ‘ 𝐽 )  =  ( ( ( 𝑍  Σg  𝑌 )  ∘  𝑅 ) ‘ 𝐽 ) ) | 
						
							| 19 |  | simpl1 | ⊢ ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  →  𝑁  ∈  Fin ) | 
						
							| 20 |  | simpr1l | ⊢ ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  →  𝑋  ∈  Word  𝐵 ) | 
						
							| 21 |  | simpr1r | ⊢ ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  →  𝐶  ∈  𝐵 ) | 
						
							| 22 | 19 20 21 | 3jca | ⊢ ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  →  ( 𝑁  ∈  Fin  ∧  𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 ) ) | 
						
							| 23 | 22 | adantr | ⊢ ( ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  ∧  ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) )  →  ( 𝑁  ∈  Fin  ∧  𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 ) ) | 
						
							| 24 | 1 2 | gsumccatsymgsn | ⊢ ( ( 𝑁  ∈  Fin  ∧  𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  →  ( 𝑆  Σg  ( 𝑋  ++  〈“ 𝐶 ”〉 ) )  =  ( ( 𝑆  Σg  𝑋 )  ∘  𝐶 ) ) | 
						
							| 25 | 23 24 | syl | ⊢ ( ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  ∧  ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) )  →  ( 𝑆  Σg  ( 𝑋  ++  〈“ 𝐶 ”〉 ) )  =  ( ( 𝑆  Σg  𝑋 )  ∘  𝐶 ) ) | 
						
							| 26 | 25 | fveq1d | ⊢ ( ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  ∧  ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) )  →  ( ( 𝑆  Σg  ( 𝑋  ++  〈“ 𝐶 ”〉 ) ) ‘ 𝐽 )  =  ( ( ( 𝑆  Σg  𝑋 )  ∘  𝐶 ) ‘ 𝐽 ) ) | 
						
							| 27 |  | simpl2 | ⊢ ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  →  𝑀  ∈  Fin ) | 
						
							| 28 |  | simpr2l | ⊢ ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  →  𝑌  ∈  Word  𝑃 ) | 
						
							| 29 |  | simpr2r | ⊢ ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  →  𝑅  ∈  𝑃 ) | 
						
							| 30 | 27 28 29 | 3jca | ⊢ ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  →  ( 𝑀  ∈  Fin  ∧  𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 ) ) | 
						
							| 31 | 30 | adantr | ⊢ ( ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  ∧  ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) )  →  ( 𝑀  ∈  Fin  ∧  𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 ) ) | 
						
							| 32 | 3 4 | gsumccatsymgsn | ⊢ ( ( 𝑀  ∈  Fin  ∧  𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  →  ( 𝑍  Σg  ( 𝑌  ++  〈“ 𝑅 ”〉 ) )  =  ( ( 𝑍  Σg  𝑌 )  ∘  𝑅 ) ) | 
						
							| 33 | 31 32 | syl | ⊢ ( ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  ∧  ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) )  →  ( 𝑍  Σg  ( 𝑌  ++  〈“ 𝑅 ”〉 ) )  =  ( ( 𝑍  Σg  𝑌 )  ∘  𝑅 ) ) | 
						
							| 34 | 33 | fveq1d | ⊢ ( ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  ∧  ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) )  →  ( ( 𝑍  Σg  ( 𝑌  ++  〈“ 𝑅 ”〉 ) ) ‘ 𝐽 )  =  ( ( ( 𝑍  Σg  𝑌 )  ∘  𝑅 ) ‘ 𝐽 ) ) | 
						
							| 35 | 18 26 34 | 3eqtr4d | ⊢ ( ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  ∧  ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) ) )  →  ( ( 𝑆  Σg  ( 𝑋  ++  〈“ 𝐶 ”〉 ) ) ‘ 𝐽 )  =  ( ( 𝑍  Σg  ( 𝑌  ++  〈“ 𝑅 ”〉 ) ) ‘ 𝐽 ) ) | 
						
							| 36 | 35 | ex | ⊢ ( ( ( 𝑁  ∈  Fin  ∧  𝑀  ∈  Fin  ∧  𝐽  ∈  𝐼 )  ∧  ( ( 𝑋  ∈  Word  𝐵  ∧  𝐶  ∈  𝐵 )  ∧  ( 𝑌  ∈  Word  𝑃  ∧  𝑅  ∈  𝑃 )  ∧  ( ♯ ‘ 𝑋 )  =  ( ♯ ‘ 𝑌 ) ) )  →  ( ( ∀ 𝑛  ∈  𝐼 ( ( 𝑆  Σg  𝑋 ) ‘ 𝑛 )  =  ( ( 𝑍  Σg  𝑌 ) ‘ 𝑛 )  ∧  ( 𝐶 ‘ 𝐽 )  =  ( 𝑅 ‘ 𝐽 ) )  →  ( ( 𝑆  Σg  ( 𝑋  ++  〈“ 𝐶 ”〉 ) ) ‘ 𝐽 )  =  ( ( 𝑍  Σg  ( 𝑌  ++  〈“ 𝑅 ”〉 ) ) ‘ 𝐽 ) ) ) |