Titius–Bode and Dermott laws: basic definitions
DefinitionTitiusBode_DefsBasic objects of the Titius–Bode and Dermott laws.
- The extended power of two for , with .
- The sequence , , , i.e. , and the original formulation (Earth ).
- The form (Earth ) and the form in astronomical units , both for .
- The canonical form for .
- The recursive form as printed in the source: , .
- The relative deviation of an observed value from a prediction .
- Dermott's law .
These are the shared definitions for every statement of the mission.
Formalization Note The exponent is the bottom element of the natural numbers with a bottom adjoined. The deviation is the plain real quotient (Lean returns when ); statements only use it at positive . Dermott's period is defined for every ; the source uses .
import Mathlib namespace TitiusBode /-- The extended power of two used by the Titius–Bode law: `2 ^ n` for a natural number `n`, and `2 ^ (-∞) = 0` for the formal exponent `n = -∞` (encoded as `⊥`). -/ noncomputable def twoPowExt : WithBot ℕ → ℝ | ⊥ => 0 | (n : ℕ) => 2 ^ n /-- The sequence `x = 0, 3, 6, 12, 24, 48, 96, 192, 384, 768, …` of the original Titius–Bode formulation: `x₀ = 0`, `x₁ = 3`, and from then on each value is twice the previous one. -/ def tbX : ℕ → ℕ | 0 => 0 | 1 => 3 | (i + 2) => 2 * tbX (i + 1) /-- The original Titius–Bode formulation `a = 4 + x`, in units in which the Earth's semi-major axis equals `10`; `i = 0, 1, 2, …` indexes the terms of `x`. -/ def tbOriginal (i : ℕ) : ℕ := 4 + tbX i /-- The second representation `a = 4 + 3 × 2 ^ n`, `n = -∞, 0, 1, 2, …`, in units in which the Earth's semi-major axis equals `10`. -/ noncomputable def tbTenths (n : WithBot ℕ) : ℝ := 4 + 3 * twoPowExt n /-- The Titius–Bode distance in astronomical units, `a = 0.4 + 0.3 × 2 ^ n`, `n = -∞, 0, 1, 2, …`. These are the predicted positions of the law. -/ noncomputable def tbAU (n : WithBot ℕ) : ℝ := 0.4 + 0.3 * twoPowExt n /-- The "classical" (canonical) form `aₙ = 0.4 + 0.3 × 2 ^ n`, `n = 0, 1, 2, …`. -/ noncomputable def tbCanonical (n : ℕ) : ℝ := 0.4 + 0.3 * 2 ^ n /-- The "recursive" form as printed in the source: `a₀ = 0.55` and `aₙ₊₁ = 2 × aₙ - 0.4`. -/ noncomputable def tbRecursive : ℕ → ℝ | 0 => 0.55 | (n + 1) => 2 * tbRecursive n - 0.4 /-- Relative deviation of an observed value from a predicted value, `(observed - predicted) / predicted` (multiply by `100` for a percentage). -/ noncomputable def deviation (observed predicted : ℝ) : ℝ := (observed - predicted) / predicted /-- Dermott's law: the orbital period of the `n`-th satellite is `T(n) = T(0) · C ^ n` (the source uses `n = 1, 2, 3, …`). -/ noncomputable def dermottPeriod (T₀ C : ℝ) (n : ℕ) : ℝ := T₀ * C ^ n end TitiusBode
Read-back
What the Lean code literally says, in plain math · Aristotle (Harmonic) — non-blind, same agent as the drafter
Non-blind read-back — not independent testimony. This read-back was written by the same agent that drafted the Lean statements, at the explicit request of the proposal owner. Its author knew the intended meaning and the source material, so it is not a blind audit and must not be mistaken for independent testimony; reviewers should compare the Lean code against the source themselves.
The file declares, inside the namespace TitiusBode, the following objects (all real-valued unless stated).
- Extended power of two with and for .
- Sequence with , , . Hence for .
- Original value .
- Tenths form for .
- AU form for ; so and .
- Canonical form for .
- Recursive sequence , .
- Deviation , with the convention that division by gives , so for every .
- Dermott period for real and every (including ), with no sign restrictions.
No hypotheses or theorems are contained in the file; it is sorry-free.
Confirmed by the mission captain (proposal self-audit).
Confirmed by the moderator at approval.