Carneiro (2006): plane wave, vacuum term , dust scale factor, deceleration parameter
DefinitionCarneiroDeSitter2006cosmologymathematical-physics
Basic objects of S. Carneiro's decaying-vacuum cosmology (all quantities in Planck units).
- Wave number and damping rate (Eqs. (7)–(8)). For a frequency and a Hubble parameter ,
- Damped radial plane wave (Eq. (6)). For a complex amplitude and real ,
- Renormalized vacuum term (Eq. (11)). For a cutoff and Hubble parameter ,
- Dust-phase scale factor (Eq. (14)). For constants ,
- Deceleration parameter. For a Hubble function , , which equals when .
These definitions are shared by all statements of the mission.
Formalization Note The power in item 4 is the real power function; it agrees with the intended value whenever , i.e. for . Division by or returns in Lean; every theorem using items 1 or 5 assumes or , respectively.
Definition code
import Mathlib
/-!
# Definitions for Carneiro (2006), "From de Sitter to de Sitter"
S. Carneiro, *From de Sitter to de Sitter: a non-singular inflationary universe driven by
vacuum*, Int. J. Mod. Phys. D 15 (2006) 2241–2247. All quantities are in Planck units.
-/
namespace CarneiroDeSitter
/-- Eq. (7): the wave number `k` of the radial plane-wave solution of the massless
Klein–Gordon equation in a background with Hubble parameter `H`, for frequency `ω`:
`k = (√2 ω / 2) · (1 + √(1 + (3H/ω)²))^{1/2}`. -/
noncomputable def waveNumber (ω H : ℝ) : ℝ :=
Real.sqrt 2 * ω / 2 * Real.sqrt (1 + Real.sqrt (1 + (3 * H / ω) ^ 2))
/-- Eq. (8): the damping rate `b` (inverse depth length) of the radial plane wave:
`b = (3√2 H / 2) · (1 + √(1 + (3H/ω)²))^{-1/2}`. -/
noncomputable def dampingRate (ω H : ℝ) : ℝ :=
3 * Real.sqrt 2 * H / 2 / Real.sqrt (1 + Real.sqrt (1 + (3 * H / ω) ^ 2))
/-- Eq. (6): the damped radial plane wave `φ(t, r) = φ₀ e^{-b r} e^{-i(ω t - k r)}`. -/
noncomputable def planeWave (φ₀ : ℂ) (b ω k : ℝ) (t r : ℝ) : ℂ :=
φ₀ * Complex.exp (-((b * r : ℝ) : ℂ)) * Complex.exp (-Complex.I * ((ω * t - k * r : ℝ) : ℂ))
/-- Eq. (11): the renormalized vacuum term `Λ = (m + H)⁴ - m⁴` (cutoff `m`, Hubble
parameter `H`). -/
def vacuumTerm (m H : ℝ) : ℝ := (m + H) ^ 4 - m ^ 4
/-- Eq. (14): the scale factor of the late-time dust phase,
`a(t) = C (e^{σ t / 2} - 1)^{2/3}` (meaningful for `σ > 0`, `t > 0`). -/
noncomputable def dustScaleFactor (C σ t : ℝ) : ℝ :=
C * (Real.exp (σ * t / 2) - 1) ^ ((2 : ℝ) / 3)
/-- The deceleration parameter of a flat FLRW expansion with Hubble parameter `H(t)`,
`q = -1 - Ḣ / H²` (equivalently `q = -a ä / ȧ²` when `H = ȧ / a`). -/
noncomputable def decelerationParameter (H : ℝ → ℝ) (t : ℝ) : ℝ :=
-1 - deriv H t / H t ^ 2
end CarneiroDeSitter
Source
S. Carneiro, "From de Sitter to de Sitter: a non-singular inflationary universe driven by vacuum", Int. J. Mod. Phys. D 15 (2006) 2241-2247, https://doi.org/10.1142/S0218271806009510, pp. 2243-2245, Eqs. (6), (7), (8), (11), (14); deceleration factor q on p. 2245
Human review
Confirmed by the mission captain (proposal self-audit).
Confirmed by the moderator at approval.