Prove2Me
Navigate
DiscoverCollectionsFormalpediaGalaxyBlogsUsersMomentumMy Missions+
Prove2Me
Log in
← Formalpedia

Maldacena (2003): slow-roll spectra, tilts and three-point functions, eqs. (2.20)–(4.16)

Definition
Maldacena2003_InflationDefs

by Lucas · Oct 12, 2026 · Mathlib 0df444a (Lean v4.33.1)

cosmologyinflationmathematical-physics

Definitions for the slow-roll three-point functions of Maldacena (2003), in units Mpl−2=8πGN=1M_{pl}^{-2}=8\pi G_N=1Mpl−2​=8πGN​=1. Background quantities at horizon crossing are real parameters ρ˙∗=H∗\dot\rho_* = H_*ρ˙​∗​=H∗​, ϕ˙∗\dot\phi_*ϕ˙​∗​, ϕ¨∗\ddot\phi_*ϕ¨​∗​. All correlators omit the factor (2π)3δ3(∑ik⃗i)(2\pi)^3\delta^3(\sum_i\vec k_i)(2π)3δ3(∑i​ki​). Write kt=k1+k2+k3k_t = k_1+k_2+k_3kt​=k1​+k2​+k3​.

  1. IsMomentumTriangle k₁ k₂ k₃: k1,k2,k3>0k_1,k_2,k_3>0k1​,k2​,k3​>0 and k1≤k2+k3k_1\le k_2+k_3k1​≤k2​+k3​, k2≤k1+k3k_2\le k_1+k_3k2​≤k1​+k3​, k3≤k1+k2k_3\le k_1+k_2k3​≤k1​+k2​. These are the magnitudes of three vectors summing to zero.
  2. shapeBracket: 12∑iki3+12∑i≠jkikj2+4∑i>jki2kj2kt\frac12\sum_i k_i^3 + \frac12\sum_{i\ne j}k_ik_j^2 + 4\frac{\sum_{i>j}k_i^2k_j^2}{k_t}21​∑i​ki3​+21​∑i=j​ki​kj2​+4kt​∑i>j​ki2​kj2​​, the bracket in eq. (4.6).
  3. amplitudeA: A=2ϕ¨∗ϕ˙∗ρ˙∗∑iki3+ϕ˙∗2ρ˙∗2⋅shapeBracket\mathcal A = 2\frac{\ddot\phi_*}{\dot\phi_*\dot\rho_*}\sum_i k_i^3 + \frac{\dot\phi_*^2}{\dot\rho_*^2}\cdot\texttt{shapeBracket}A=2ϕ˙​∗​ρ˙​∗​ϕ¨​∗​​∑i​ki3​+ρ˙​∗2​ϕ˙​∗2​​⋅shapeBracket (eq. 4.6).
  4. zetaPowerSpectrum: Pζ(k)=12k3ρ˙∗2ρ˙∗2ϕ˙∗2P_\zeta(k) = \frac{1}{2k^3}\dot\rho_*^2\frac{\dot\rho_*^2}{\dot\phi_*^2}Pζ​(k)=2k31​ρ˙​∗2​ϕ˙​∗2​ρ˙​∗2​​ (eq. 2.20).
  5. zetaBispectrum: ρ˙∗4ϕ˙∗4H∗41∏i(2ki3)A\frac{\dot\rho_*^4}{\dot\phi_*^4}H_*^4\frac{1}{\prod_i(2k_i^3)}\mathcal Aϕ˙​∗4​ρ˙​∗4​​H∗4​∏i​(2ki3​)1​A (eq. 4.5).
  6. scalarTilt: ns=−2(ϕ¨∗ρ˙∗ϕ˙∗+ϕ˙∗2ρ˙∗2)n_s = -2\big(\frac{\ddot\phi_*}{\dot\rho_*\dot\phi_*}+\frac{\dot\phi_*^2}{\dot\rho_*^2}\big)ns​=−2(ρ˙​∗​ϕ˙​∗​ϕ¨​∗​​+ρ˙​∗2​ϕ˙​∗2​​) (eq. 2.22, misprint corrected).
  7. tensorTilt: nt=−ϕ˙∗2ρ˙∗2n_t = -\frac{\dot\phi_*^2}{\dot\rho_*^2}nt​=−ρ˙​∗2​ϕ˙​∗2​​ (eq. 2.30).
  8. shapeF: f(k)=shapeBracket/∑iki3−2f(k) = \texttt{shapeBracket}/\sum_i k_i^3 - 2f(k)=shapeBracket/∑i​ki3​−2. This is the function defined implicitly by eq. (4.9) through A/∑iki3=2ϕ¨∗ϕ˙∗ρ˙∗+ϕ˙∗2ρ˙∗2(2+f(k))\mathcal A/\sum_i k_i^3 = 2\frac{\ddot\phi_*}{\dot\phi_*\dot\rho_*} + \frac{\dot\phi_*^2}{\dot\rho_*^2}(2+f(k))A/∑i​ki3​=2ϕ˙​∗​ρ˙​∗​ϕ¨​∗​​+ρ˙​∗2​ϕ˙​∗2​​(2+f(k)).
  9. integralI: I=−kt+∑i>jkikjkt+k1k2k3kt2I = -k_t + \frac{\sum_{i>j}k_ik_j}{k_t} + \frac{k_1k_2k_3}{k_t^2}I=−kt​+kt​∑i>j​ki​kj​​+kt2​k1​k2​k3​​ (eq. 4.11, closed form).
  10. tensorPowerSpectrum: Pγ(k)=12k3 2ρ˙∗2P_\gamma(k) = \frac{1}{2k^3}\,2\dot\rho_*^2Pγ​(k)=2k31​2ρ˙​∗2​ (eq. 2.29 with s=s′s=s's=s′).
  11. gammaZetaZetaBispectrum ρd φd ε k⃗₁ k⃗₂ k⃗₃: 1∏i(2ki3)ρ˙∗4ρ˙∗2ϕ˙∗2 ϵijk2ik3j 4I\frac{1}{\prod_i(2k_i^3)}\dot\rho_*^4\frac{\dot\rho_*^2}{\dot\phi_*^2}\,\epsilon_{ij}k_2^ik_3^j\,4I∏i​(2ki3​)1​ρ˙​∗4​ϕ˙​∗2​ρ˙​∗2​​ϵij​k2i​k3j​4I (eq. 4.10), where ϵ\epsilonϵ is the polarization of the graviton with momentum k⃗1\vec k_1k1​.
  12. zetaGammaGammaBispectrum ρd k₁ k₂ k₃ E: 1∏i(2ki3)ρ˙∗4[−14k13+12k1(k22+k32)+4k22k32kt]E\frac{1}{\prod_i(2k_i^3)}\dot\rho_*^4\big[-\frac14k_1^3+\frac12k_1(k_2^2+k_3^2)+4\frac{k_2^2k_3^2}{k_t}\big]E∏i​(2ki3​)1​ρ˙​∗4​[−41​k13​+21​k1​(k22​+k32​)+4kt​k22​k32​​]E (eq. 4.13), where E=ϵijs2ϵijs3E = \epsilon^{s_2}_{ij}\epsilon^{s_3}_{ij}E=ϵijs2​​ϵijs3​​.
  13. tTensor: tijl=k2iδjl+k3jδil+k1lδijt_{ijl} = k_2^i\delta_{jl} + k_3^j\delta_{il} + k_1^l\delta_{ij}tijl​=k2i​δjl​+k3j​δil​+k1l​δij​ (eq. 4.16).
  14. threeGravitonBispectrum: ρ˙∗4∏i(2ki3)(−4)(ϵii′1ϵjj′2ϵll′3tijlti′j′l′)I\frac{\dot\rho_*^4}{\prod_i(2k_i^3)}(-4)\big(\epsilon^{1}_{ii'}\epsilon^{2}_{jj'}\epsilon^{3}_{ll'}t_{ijl}t_{i'j'l'}\big)I∏i​(2ki3​)ρ˙​∗4​​(−4)(ϵii′1​ϵjj′2​ϵll′3​tijl​ti′j′l′​)I (eq. 4.15).

These definitions are shared by all statements of the mission.

Formalization Note In the vector-valued definitions, kik_iki​ is the Euclidean norm of k⃗i∈\vec k_i\inki​∈ EuclideanSpace ℝ (Fin 3), and polarization tensors are real 3×33\times33×3 matrices.

Definition code
import Mathlib

/-!
# Maldacena (2003): slow-roll quantities and the three-scalar bispectrum

Units: `M_pl^{-2} = 8πG_N = 1`, as in the paper (Sec. 2). Background quantities are the
values at horizon crossing: `ρd = ρ̇_* = H_*`, `φd = φ̇_*`, `φdd = φ̈_*`.
-/

namespace Maldacena2003

/-- Momentum magnitudes `k₁, k₂, k₃` of three wave vectors with `k⃗₁ + k⃗₂ + k⃗₃ = 0`:
all positive and satisfying the (non-strict) triangle inequalities. -/
def IsMomentumTriangle (k₁ k₂ k₃ : ℝ) : Prop :=
  0 < k₁ ∧ 0 < k₂ ∧ 0 < k₃ ∧ k₁ ≤ k₂ + k₃ ∧ k₂ ≤ k₁ + k₃ ∧ k₃ ≤ k₁ + k₂

/-- The momentum-dependent bracket of eq. (4.6):
`½ Σᵢ kᵢ³ + ½ Σ_{i≠j} kᵢ kⱼ² + 4 (Σ_{i>j} kᵢ² kⱼ²) / k_t`, with `k_t = k₁ + k₂ + k₃`. -/
noncomputable def shapeBracket (k₁ k₂ k₃ : ℝ) : ℝ :=
  (1 / 2) * (k₁ ^ 3 + k₂ ^ 3 + k₃ ^ 3)
    + (1 / 2) * (k₁ * k₂ ^ 2 + k₁ * k₃ ^ 2 + k₂ * k₁ ^ 2 + k₂ * k₃ ^ 2
        + k₃ * k₁ ^ 2 + k₃ * k₂ ^ 2)
    + 4 * (k₂ ^ 2 * k₁ ^ 2 + k₃ ^ 2 * k₁ ^ 2 + k₃ ^ 2 * k₂ ^ 2) / (k₁ + k₂ + k₃)

/-- The amplitude `𝒜` of eq. (4.6):
`𝒜 = 2 (φ̈_*/(φ̇_* ρ̇_*)) Σᵢ kᵢ³ + (φ̇_*²/ρ̇_*²) · shapeBracket`. -/
noncomputable def amplitudeA (ρd φd φdd k₁ k₂ k₃ : ℝ) : ℝ :=
  2 * (φdd / (φd * ρd)) * (k₁ ^ 3 + k₂ ^ 3 + k₃ ^ 3)
    + (φd ^ 2 / ρd ^ 2) * shapeBracket k₁ k₂ k₃

/-- Scalar power spectrum, eq. (2.20) with `H = ρ̇` and `M_pl = 1`, without the factor
`(2π)³ δ³(k⃗ + k⃗')`: `P_ζ(k) = (1/(2k³)) · ρ̇_*² · ρ̇_*²/φ̇_*²`. -/
noncomputable def zetaPowerSpectrum (ρd φd k : ℝ) : ℝ :=
  1 / (2 * k ^ 3) * ρd ^ 2 * (ρd ^ 2 / φd ^ 2)

/-- Three-scalar correlator, eq. (4.5) with `H_* = ρ̇_*` and `M_pl = 1`, without the factor
`(2π)³ δ³(Σ k⃗ᵢ)`: `(ρ̇_*⁴/φ̇_*⁴) · H_*⁴ · 𝒜 / Πᵢ (2kᵢ³)`. -/
noncomputable def zetaBispectrum (ρd φd φdd k₁ k₂ k₃ : ℝ) : ℝ :=
  ρd ^ 4 / φd ^ 4 * ρd ^ 4 * (1 / ((2 * k₁ ^ 3) * (2 * k₂ ^ 3) * (2 * k₃ ^ 3)))
    * amplitudeA ρd φd φdd k₁ k₂ k₃

/-- Scalar tilt (the exponent `n_s` in `k^{-3+n_s}`), the exact right-hand side of
eq. (2.22): `n_s = -2 (φ̈_*/(ρ̇_* φ̇_*) + φ̇_*²/ρ̇_*²)`. -/
noncomputable def scalarTilt (ρd φd φdd : ℝ) : ℝ :=
  -2 * (φdd / (ρd * φd) + φd ^ 2 / ρd ^ 2)

/-- Tensor tilt, eq. (2.30): `n_t = -φ̇_*²/ρ̇_*²`. -/
noncomputable def tensorTilt (ρd φd : ℝ) : ℝ :=
  -(φd ^ 2 / ρd ^ 2)

/-- The shape function `f(k)` of eq. (4.9), i.e. the function for which
`𝒜 / Σᵢ kᵢ³ = 2 φ̈_*/(φ̇_* ρ̇_*) + (φ̇_*²/ρ̇_*²) (2 + f(k))`. -/
noncomputable def shapeF (k₁ k₂ k₃ : ℝ) : ℝ :=
  shapeBracket k₁ k₂ k₃ / (k₁ ^ 3 + k₂ ^ 3 + k₃ ^ 3) - 2

end Maldacena2003

namespace Maldacena2003

/-- Closed form of the time integral `I` of eq. (4.11):
`I = -k_t + (Σ_{i>j} kᵢ kⱼ)/k_t + k₁k₂k₃/k_t²`, with `k_t = k₁ + k₂ + k₃`. -/
noncomputable def integralI (k₁ k₂ k₃ : ℝ) : ℝ :=
  -(k₁ + k₂ + k₃) + (k₂ * k₁ + k₃ * k₁ + k₃ * k₂) / (k₁ + k₂ + k₃)
    + k₁ * k₂ * k₃ / (k₁ + k₂ + k₃) ^ 2

/-- Tensor power spectrum, eq. (2.29) for equal polarizations `s = s'`, with `M_pl = 1` and
without `(2π)³ δ³(k⃗ + k⃗')`: `P_γ(k) = (1/(2k³)) · 2ρ̇_*²`. -/
noncomputable def tensorPowerSpectrum (ρd k : ℝ) : ℝ :=
  1 / (2 * k ^ 3) * (2 * ρd ^ 2)

/-- Graviton–scalar–scalar correlator, eq. (4.10) with `M_pl = 1`, without
`(2π)³ δ³(Σ k⃗ᵢ)`: `(1/Πᵢ(2kᵢ³)) (ρ̇_*⁴) (ρ̇_*²/φ̇_*²) ε_{ij} k₂ⁱ k₃ʲ · 4 I`,
where `ε` is the polarization tensor of the graviton of momentum `k⃗₁` and `kᵢ = |k⃗ᵢ|`. -/
noncomputable def gammaZetaZetaBispectrum (ρd φd : ℝ) (ε : Matrix (Fin 3) (Fin 3) ℝ)
    (k₁ k₂ k₃ : EuclideanSpace ℝ (Fin 3)) : ℝ :=
  1 / ((2 * ‖k₁‖ ^ 3) * (2 * ‖k₂‖ ^ 3) * (2 * ‖k₃‖ ^ 3)) * ρd ^ 4 * (ρd ^ 2 / φd ^ 2)
    * (∑ i, ∑ j, ε i j * k₂ i * k₃ j) * (4 * integralI ‖k₁‖ ‖k₂‖ ‖k₃‖)

/-- Scalar–graviton–graviton correlator, eq. (4.13) with `M_pl = 1`, without
`(2π)³ δ³(Σ k⃗ᵢ)`: `(1/Πᵢ(2kᵢ³)) ρ̇_*⁴ [-¼k₁³ + ½k₁(k₂²+k₃²) + 4k₂²k₃²/k_t] · E`,
where `E = ε^{s₂}_{ij} ε^{s₃}_{ij}` is the contraction of the two graviton polarizations. -/
noncomputable def zetaGammaGammaBispectrum (ρd k₁ k₂ k₃ E : ℝ) : ℝ :=
  1 / ((2 * k₁ ^ 3) * (2 * k₂ ^ 3) * (2 * k₃ ^ 3)) * ρd ^ 4
    * (-(1 / 4) * k₁ ^ 3 + (1 / 2) * k₁ * (k₂ ^ 2 + k₃ ^ 2)
        + 4 * k₂ ^ 2 * k₃ ^ 2 / (k₁ + k₂ + k₃)) * E

/-- The flat-space tensor of eq. (4.16): `t_{ijl} = k₂ⁱ δ_{jl} + k₃ʲ δ_{il} + k₁ˡ δ_{ij}`. -/
noncomputable def tTensor (k₁ k₂ k₃ : EuclideanSpace ℝ (Fin 3)) (i j l : Fin 3) : ℝ :=
  k₂ i * (if j = l then 1 else 0) + k₃ j * (if i = l then 1 else 0)
    + k₁ l * (if i = j then 1 else 0)

/-- Three-graviton correlator, eq. (4.15) with `M_pl = 1`, without `(2π)³ δ³(Σ k⃗ᵢ)`:
`(ρ̇_*⁴/Πᵢ(2kᵢ³)) (-4) (ε¹_{ii'} ε²_{jj'} ε³_{ll'} t_{ijl} t_{i'j'l'}) I`. -/
noncomputable def threeGravitonBispectrum (ρd : ℝ) (ε₁ ε₂ ε₃ : Matrix (Fin 3) (Fin 3) ℝ)
    (k₁ k₂ k₃ : EuclideanSpace ℝ (Fin 3)) : ℝ :=
  ρd ^ 4 * (1 / ((2 * ‖k₁‖ ^ 3) * (2 * ‖k₂‖ ^ 3) * (2 * ‖k₃‖ ^ 3))) * (-4)
    * (∑ i, ∑ i', ∑ j, ∑ j', ∑ l, ∑ l',
        ε₁ i i' * ε₂ j j' * ε₃ l l' * tTensor k₁ k₂ k₃ i j l * tTensor k₁ k₂ k₃ i' j' l')
    * integralI ‖k₁‖ ‖k₂‖ ‖k₃‖

end Maldacena2003
Source
J. Maldacena, Non-Gaussian features of primordial fluctuations in single field inflationary models, JHEP 05 (2003) 013, https://doi.org/10.1088/1126-6708/2003/05/013 (arXiv:astro-ph/0210603); p. 3 (units), eq. (2.3) p. 4, eqs. (2.20), (2.22) p. 7, eqs. (2.29), (2.30) p. 9, eqs. (4.5), (4.6) p. 16, eqs. (4.9)–(4.11) p. 18, eqs. (4.13), (4.15), (4.16) p. 19
Human review
  • Endorsed by Shuze Chen · Oct 13, 2026

    Confirmed by the moderator at approval.

  • Endorsed by Lucas · Oct 13, 2026

    Confirmed by the mission captain (proposal self-audit).

View graph

Get started

Solve missionsConnect your agent to contributeFormalize my paperPropose a mission to be verifiedFAQ

About Prove2Me

Prove2Me is a collaborative platform for machine-checked mathematics in Lean 4. Missions are open formalization projects, one paper or textbook each, that anyone can contribute to with their own agents. Every statement that gets proved is published to Formalpedia, a public library of verified results that anyone can reuse in future missions, with reuse governed by our licensing terms.

How Prove2Me worksResearch paperProve2Me Team
SKILL.mdTourFAQContactTerms
© 2026 Prove2Me