Theorem s4fv0

Description: Extract the first symbol from a length 4 string. (Contributed by Thierry Arnoux, 8-Oct-2020)

	Ref	Expression
Assertion	s4fv0	⊢ ( 𝐴 ∈ 𝑉 → ( ⟨“ 𝐴 𝐵 𝐶 𝐷 ”⟩ ‘ 0 ) = 𝐴 )

Proof

Step	Hyp	Ref	Expression
1		df-s4	⊢ ⟨“ 𝐴 𝐵 𝐶 𝐷 ”⟩ = ( ⟨“ 𝐴 𝐵 𝐶 ”⟩ ++ ⟨“ 𝐷 ”⟩ )
2		s3cli	⊢ ⟨“ 𝐴 𝐵 𝐶 ”⟩ ∈ Word V
3		s3len	⊢ ( ♯ ‘ ⟨“ 𝐴 𝐵 𝐶 ”⟩ ) = 3
4		s3fv0	⊢ ( 𝐴 ∈ 𝑉 → ( ⟨“ 𝐴 𝐵 𝐶 ”⟩ ‘ 0 ) = 𝐴 )
5		0nn0	⊢ 0 ∈ ℕ0
6		3pos	⊢ 0 < 3
7	1 2 3 4 5 6	cats1fv	⊢ ( 𝐴 ∈ 𝑉 → ( ⟨“ 𝐴 𝐵 𝐶 𝐷 ”⟩ ‘ 0 ) = 𝐴 )