Metamath Proof Explorer


Theorem lazcjcl

Description: The extended integers are closed under conjugation if the conjugation of the adjoined complex number is an extended integer. (Contributed by AV, 26-Oct-2026)

Ref Expression
Hypothesis laznegcl.r No typesetting found for |- R = ( Z[]l ` S ) with typecode |-
Assertion lazcjcl ⊢ S ∈ ℂ ∧ S ‾ ∈ R → A ∈ R → A ‾ ∈ R

Proof

Step Hyp Ref Expression
1 laznegcl.r Could not format R = ( Z[]l ` S ) : No typesetting found for |- R = ( Z[]l ` S ) with typecode |-
2 1 eleq2i Could not format ( A e. R <-> A e. ( Z[]l ` S ) ) : No typesetting found for |- ( A e. R <-> A e. ( Z[]l ` S ) ) with typecode |-
3 ellazim Could not format ( ( S e. CC /\ A e. ( Z[]l ` S ) ) -> E. a e. ZZ E. b e. ZZ A = ( a + ( b x. S ) ) ) : No typesetting found for |- ( ( S e. CC /\ A e. ( Z[]l ` S ) ) -> E. a e. ZZ E. b e. ZZ A = ( a + ( b x. S ) ) ) with typecode |-
4 3 ex Could not format ( S e. CC -> ( A e. ( Z[]l ` S ) -> E. a e. ZZ E. b e. ZZ A = ( a + ( b x. S ) ) ) ) : No typesetting found for |- ( S e. CC -> ( A e. ( Z[]l ` S ) -> E. a e. ZZ E. b e. ZZ A = ( a + ( b x. S ) ) ) ) with typecode |-
5 4 adantr Could not format ( ( S e. CC /\ ( * ` S ) e. R ) -> ( A e. ( Z[]l ` S ) -> E. a e. ZZ E. b e. ZZ A = ( a + ( b x. S ) ) ) ) : No typesetting found for |- ( ( S e. CC /\ ( * ` S ) e. R ) -> ( A e. ( Z[]l ` S ) -> E. a e. ZZ E. b e. ZZ A = ( a + ( b x. S ) ) ) ) with typecode |-
6 2 5 biimtrid ⊢ S ∈ ℂ ∧ S ‾ ∈ R → A ∈ R → ∃ a ∈ ℤ ∃ b ∈ ℤ A = a + b ⁢ S
7 fveq2 ⊢ A = a + b ⁢ S → A ‾ = a + b ⁢ S ‾
8 zcn ⊢ a ∈ ℤ → a ∈ ℂ
9 8 ad2antrl ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → a ∈ ℂ
10 zcn ⊢ b ∈ ℤ → b ∈ ℂ
11 10 adantl ⊢ a ∈ ℤ ∧ b ∈ ℤ → b ∈ ℂ
12 simpl ⊢ S ∈ ℂ ∧ S ‾ ∈ R → S ∈ ℂ
13 mulcl ⊢ b ∈ ℂ ∧ S ∈ ℂ → b ⁢ S ∈ ℂ
14 11 12 13 syl2anr ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → b ⁢ S ∈ ℂ
15 9 14 cjaddd ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → a + b ⁢ S ‾ = a ‾ + b ⁢ S ‾
16 zre ⊢ a ∈ ℤ → a ∈ ℝ
17 16 ad2antrl ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → a ∈ ℝ
18 17 cjred ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → a ‾ = a
19 11 adantl ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → b ∈ ℂ
20 12 adantr ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → S ∈ ℂ
21 19 20 cjmuld ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → b ⁢ S ‾ = b ‾ ⁢ S ‾
22 zre ⊢ b ∈ ℤ → b ∈ ℝ
23 22 adantl ⊢ a ∈ ℤ ∧ b ∈ ℤ → b ∈ ℝ
24 23 adantl ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → b ∈ ℝ
25 24 cjred ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → b ‾ = b
26 25 oveq1d ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → b ‾ ⁢ S ‾ = b ⁢ S ‾
27 21 26 eqtrd ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → b ⁢ S ‾ = b ⁢ S ‾
28 18 27 oveq12d ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → a ‾ + b ⁢ S ‾ = a + b ⁢ S ‾
29 15 28 eqtrd ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → a + b ⁢ S ‾ = a + b ⁢ S ‾
30 7 29 sylan9eqr ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ ∧ A = a + b ⁢ S → A ‾ = a + b ⁢ S ‾
31 zellaz Could not format ( ( S e. CC /\ a e. ZZ ) -> a e. ( Z[]l ` S ) ) : No typesetting found for |- ( ( S e. CC /\ a e. ZZ ) -> a e. ( Z[]l ` S ) ) with typecode |-
32 31 ad2ant2r Could not format ( ( ( S e. CC /\ ( * ` S ) e. R ) /\ ( a e. ZZ /\ b e. ZZ ) ) -> a e. ( Z[]l ` S ) ) : No typesetting found for |- ( ( ( S e. CC /\ ( * ` S ) e. R ) /\ ( a e. ZZ /\ b e. ZZ ) ) -> a e. ( Z[]l ` S ) ) with typecode |-
33 32 1 eleqtrrdi ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → a ∈ R
34 simpr ⊢ S ∈ ℂ ∧ S ‾ ∈ R → S ‾ ∈ R
35 simpr ⊢ a ∈ ℤ ∧ b ∈ ℤ → b ∈ ℤ
36 34 35 anim12ci ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → b ∈ ℤ ∧ S ‾ ∈ R
37 1 lazmulzcl ⊢ S ∈ ℂ → b ∈ ℤ ∧ S ‾ ∈ R → b ⁢ S ‾ ∈ R
38 20 36 37 sylc ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → b ⁢ S ‾ ∈ R
39 33 38 jca ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → a ∈ R ∧ b ⁢ S ‾ ∈ R
40 1 lazaddcl ⊢ S ∈ ℂ → a ∈ R ∧ b ⁢ S ‾ ∈ R → a + b ⁢ S ‾ ∈ R
41 20 39 40 sylc ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → a + b ⁢ S ‾ ∈ R
42 41 adantr ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ ∧ A = a + b ⁢ S → a + b ⁢ S ‾ ∈ R
43 30 42 eqeltrd ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ ∧ A = a + b ⁢ S → A ‾ ∈ R
44 43 ex ⊢ S ∈ ℂ ∧ S ‾ ∈ R ∧ a ∈ ℤ ∧ b ∈ ℤ → A = a + b ⁢ S → A ‾ ∈ R
45 44 rexlimdvva ⊢ S ∈ ℂ ∧ S ‾ ∈ R → ∃ a ∈ ℤ ∃ b ∈ ℤ A = a + b ⁢ S → A ‾ ∈ R
46 6 45 syld ⊢ S ∈ ℂ ∧ S ‾ ∈ R → A ∈ R → A ‾ ∈ R