If λ ∈ ℒ∖{0}, u ∈ ℒ̃, |u| is algebraic and e^{uλ} is algebraic, then u or uλ/λ̄ is rational (strong six exponentials and Baker)
ProvedDiazModulus.algebraic_modulus_log_multiplier_rationalHere is the set of logarithms of algebraic numbers, and is the -vector space spanned by and . Roy's strong six exponentials theorem is carried as the hypothesis hSSE: if are -linearly independent and so are , then one of the six products is not in . Baker's theorem is carried as the hypothesis hB, in its two-logarithm inhomogeneous form, as in DiazModulus.candidate_one_log_saturation.
Let , , and with algebraic. If is algebraic, then or .
For arbitrary complex this is an open problem listed in Waldschmidt's Diophantine Approximation on Linear Algebraic Groups (2000), p. 399, as a consequence of the strong four exponentials conjecture pointed out by G. Diaz (1997). This node proves the case .
Proof. If is algebraic, Gelfond–Schneider (Schanuel.gelfond_schneider) gives . Otherwise apply the strong six exponentials theorem to and . The six products are , , , , and , all in . As is linearly independent over , is not: . Baker's theorem makes and linearly dependent over , so with ; conjugating, .
Baker's theorem is needed: the strong six exponentials theorem alone gives only .
Novelty. The statement is Waldschmidt's (2000, p. 399), following Diaz (1997). The derivation of its case from the strong six exponentials theorem and Baker's theorem was not found in the sources read: Diaz (1997, §§III–IV; 2004; 2007, §2), Waldschmidt's Variations (§2) and The role of complex conjugation (§5), and Diophantine Approximation on Linear Algebraic Groups, §11.6.
import Definitions.Def_DiazModulus
open Complex ComplexConjugate
namespace DiazModulus
/-- If `l ∈ ℒ ∖ {0}`, `u ∈ ℒ̃`, `|u|` is algebraic and `e^{ul}` is algebraic, then `u ∈ ℚ` or `ul/l̄ ∈ ℚ`,
assuming Roy's strong six exponentials theorem `hSSE` and Baker's theorem `hB`. -/
theorem algebraic_modulus_log_multiplier_rational
(hSSE : ∀ (x : Fin 2 → ℂ) (y : Fin 3 → ℂ),
LinearIndependent (↥Qbar) x → LinearIndependent (↥Qbar) y →
¬ (∀ i j, x i * y j ∈ LogAlgTilde))
(hB : ∀ x y a b : ℂ,
IsAlgebraic ℚ (Complex.exp x) → IsAlgebraic ℚ (Complex.exp y) →
(∀ p q : ℚ, (p : ℂ) * x + (q : ℂ) * y = 0 → p = 0 ∧ q = 0) →
IsAlgebraic ℚ a → IsAlgebraic ℚ b → ¬(a = 0 ∧ b = 0) →
Transcendental ℚ (a * x + b * y))
{l u : ℂ} (hl : l ∈ LogAlg) (hl0 : l ≠ 0) (hu : u ∈ LogAlgTilde)
(hnorm : IsAlgebraic ℚ ((‖u‖ : ℝ) : ℂ))
(hexp : IsAlgebraic ℚ (Complex.exp (u * l))) :
(∃ q : ℚ, u = (q : ℂ)) ∨ (∃ q : ℚ, u * l / conj l = (q : ℂ)) := by
sorry
end DiazModulus