Metamath Proof Explorer


Theorem lazssaz

Description: A linear adjunction of a complex number to the ring of integers is a subset of the adjunction of the complex number to the ring of integers. (Contributed by AV, 31-Oct-2026)

Ref Expression
Assertion lazssaz Could not format assertion : No typesetting found for |- ( S e. CC -> ( Z[]l ` S ) C_ ( Z[] ` S ) ) with typecode |-

Proof

Step Hyp Ref Expression
1 ellazim Could not format ( ( S e. CC /\ x e. ( Z[]l ` S ) ) -> E. a e. ZZ E. b e. ZZ x = ( a + ( b x. S ) ) ) : No typesetting found for |- ( ( S e. CC /\ x e. ( Z[]l ` S ) ) -> E. a e. ZZ E. b e. ZZ x = ( a + ( b x. S ) ) ) with typecode |-
2 1 ex Could not format ( S e. CC -> ( x e. ( Z[]l ` S ) -> E. a e. ZZ E. b e. ZZ x = ( a + ( b x. S ) ) ) ) : No typesetting found for |- ( S e. CC -> ( x e. ( Z[]l ` S ) -> E. a e. ZZ E. b e. ZZ x = ( a + ( b x. S ) ) ) ) with typecode |-
3 zsscn ⊢ ℤ ⊆ ℂ
4 zex ⊢ ℤ ∈ V
5 4 a1i ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → ℤ ∈ V
6 nn0ex ⊢ ℕ 0 ∈ V
7 6 a1i ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → ℕ 0 ∈ V
8 ifcl ⊢ a ∈ ℤ ∧ b ∈ ℤ → if x = 0 a b ∈ ℤ
9 8 adantl ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → if x = 0 a b ∈ ℤ
10 9 adantr ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ ∧ x ∈ ℕ 0 → if x = 0 a b ∈ ℤ
11 eqid ⊢ x ∈ ℕ 0 ⟼ if x = 0 a b = x ∈ ℕ 0 ⟼ if x = 0 a b
12 10 11 fmptd ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → x ∈ ℕ 0 ⟼ if x = 0 a b : ℕ 0 ⟶ ℤ
13 5 7 12 elmapdd ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → x ∈ ℕ 0 ⟼ if x = 0 a b ∈ ℤ ℕ 0
14 eqid ⊢ c ∈ ℂ ⟼ ∑ i = 0 1 x ∈ ℕ 0 ⟼ if x = 0 a b ⁡ i ⁢ c i = c ∈ ℂ ⟼ ∑ i = 0 1 x ∈ ℕ 0 ⟼ if x = 0 a b ⁡ i ⁢ c i
15 14 linply ⊢ ℤ ⊆ ℂ ∧ x ∈ ℕ 0 ⟼ if x = 0 a b ∈ ℤ ℕ 0 → c ∈ ℂ ⟼ ∑ i = 0 1 x ∈ ℕ 0 ⟼ if x = 0 a b ⁡ i ⁢ c i ∈ Poly ⁡ ℤ
16 3 13 15 sylancr ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → c ∈ ℂ ⟼ ∑ i = 0 1 x ∈ ℕ 0 ⟼ if x = 0 a b ⁡ i ⁢ c i ∈ Poly ⁡ ℤ
17 fveq1 ⊢ p = c ∈ ℂ ⟼ ∑ i = 0 1 x ∈ ℕ 0 ⟼ if x = 0 a b ⁡ i ⁢ c i → p ⁡ S = c ∈ ℂ ⟼ ∑ i = 0 1 x ∈ ℕ 0 ⟼ if x = 0 a b ⁡ i ⁢ c i ⁡ S
18 17 eqeq2d ⊢ p = c ∈ ℂ ⟼ ∑ i = 0 1 x ∈ ℕ 0 ⟼ if x = 0 a b ⁡ i ⁢ c i → a + b ⁢ S = p ⁡ S ↔ a + b ⁢ S = c ∈ ℂ ⟼ ∑ i = 0 1 x ∈ ℕ 0 ⟼ if x = 0 a b ⁡ i ⁢ c i ⁡ S
19 18 adantl ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ ∧ p = c ∈ ℂ ⟼ ∑ i = 0 1 x ∈ ℕ 0 ⟼ if x = 0 a b ⁡ i ⁢ c i → a + b ⁢ S = p ⁡ S ↔ a + b ⁢ S = c ∈ ℂ ⟼ ∑ i = 0 1 x ∈ ℕ 0 ⟼ if x = 0 a b ⁡ i ⁢ c i ⁡ S
20 simpr ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → a ∈ ℤ ∧ b ∈ ℤ
21 simpl ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → S ∈ ℂ
22 14 11 linply2cfv ⊢ ℤ ⊆ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ ∧ S ∈ ℂ → c ∈ ℂ ⟼ ∑ i = 0 1 x ∈ ℕ 0 ⟼ if x = 0 a b ⁡ i ⁢ c i ⁡ S = a + b ⁢ S
23 3 20 21 22 mp3an2i ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → c ∈ ℂ ⟼ ∑ i = 0 1 x ∈ ℕ 0 ⟼ if x = 0 a b ⁡ i ⁢ c i ⁡ S = a + b ⁢ S
24 23 eqcomd ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → a + b ⁢ S = c ∈ ℂ ⟼ ∑ i = 0 1 x ∈ ℕ 0 ⟼ if x = 0 a b ⁡ i ⁢ c i ⁡ S
25 16 19 24 rspcedvd ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → ∃ p ∈ Poly ⁡ ℤ a + b ⁢ S = p ⁡ S
26 zsubrg ⊢ ℤ ∈ SubRing ⁡ ℂ fld
27 26 a1i ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → ℤ ∈ SubRing ⁡ ℂ fld
28 eqidd ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → RingSpan ⁡ ℂ fld ⁡ ℤ ∪ S = RingSpan ⁡ ℂ fld ⁡ ℤ ∪ S
29 27 21 28 rngunsnply ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → a + b ⁢ S ∈ RingSpan ⁡ ℂ fld ⁡ ℤ ∪ S ↔ ∃ p ∈ Poly ⁡ ℤ a + b ⁢ S = p ⁡ S
30 25 29 mpbird ⊢ S ∈ ℂ ∧ a ∈ ℤ ∧ b ∈ ℤ → a + b ⁢ S ∈ RingSpan ⁡ ℂ fld ⁡ ℤ ∪ S
31 elaz Could not format ( S e. CC -> ( ( a + ( b x. S ) ) e. ( Z[] ` S ) <-> ( a + ( b x. S ) ) e. ( ( RingSpan ` CCfld ) ` ( ZZ u. { S } ) ) ) ) : No typesetting found for |- ( S e. CC -> ( ( a + ( b x. S ) ) e. ( Z[] ` S ) <-> ( a + ( b x. S ) ) e. ( ( RingSpan ` CCfld ) ` ( ZZ u. { S } ) ) ) ) with typecode |-
32 31 adantr Could not format ( ( S e. CC /\ ( a e. ZZ /\ b e. ZZ ) ) -> ( ( a + ( b x. S ) ) e. ( Z[] ` S ) <-> ( a + ( b x. S ) ) e. ( ( RingSpan ` CCfld ) ` ( ZZ u. { S } ) ) ) ) : No typesetting found for |- ( ( S e. CC /\ ( a e. ZZ /\ b e. ZZ ) ) -> ( ( a + ( b x. S ) ) e. ( Z[] ` S ) <-> ( a + ( b x. S ) ) e. ( ( RingSpan ` CCfld ) ` ( ZZ u. { S } ) ) ) ) with typecode |-
33 30 32 mpbird Could not format ( ( S e. CC /\ ( a e. ZZ /\ b e. ZZ ) ) -> ( a + ( b x. S ) ) e. ( Z[] ` S ) ) : No typesetting found for |- ( ( S e. CC /\ ( a e. ZZ /\ b e. ZZ ) ) -> ( a + ( b x. S ) ) e. ( Z[] ` S ) ) with typecode |-
34 eleq1 Could not format ( x = ( a + ( b x. S ) ) -> ( x e. ( Z[] ` S ) <-> ( a + ( b x. S ) ) e. ( Z[] ` S ) ) ) : No typesetting found for |- ( x = ( a + ( b x. S ) ) -> ( x e. ( Z[] ` S ) <-> ( a + ( b x. S ) ) e. ( Z[] ` S ) ) ) with typecode |-
35 33 34 syl5ibrcom Could not format ( ( S e. CC /\ ( a e. ZZ /\ b e. ZZ ) ) -> ( x = ( a + ( b x. S ) ) -> x e. ( Z[] ` S ) ) ) : No typesetting found for |- ( ( S e. CC /\ ( a e. ZZ /\ b e. ZZ ) ) -> ( x = ( a + ( b x. S ) ) -> x e. ( Z[] ` S ) ) ) with typecode |-
36 35 rexlimdvva Could not format ( S e. CC -> ( E. a e. ZZ E. b e. ZZ x = ( a + ( b x. S ) ) -> x e. ( Z[] ` S ) ) ) : No typesetting found for |- ( S e. CC -> ( E. a e. ZZ E. b e. ZZ x = ( a + ( b x. S ) ) -> x e. ( Z[] ` S ) ) ) with typecode |-
37 2 36 syld Could not format ( S e. CC -> ( x e. ( Z[]l ` S ) -> x e. ( Z[] ` S ) ) ) : No typesetting found for |- ( S e. CC -> ( x e. ( Z[]l ` S ) -> x e. ( Z[] ` S ) ) ) with typecode |-
38 37 ssrdv Could not format ( S e. CC -> ( Z[]l ` S ) C_ ( Z[] ` S ) ) : No typesetting found for |- ( S e. CC -> ( Z[]l ` S ) C_ ( Z[] ` S ) ) with typecode |-