theorem single_level_always_justified (M : ℕ) (spec : OrderedSpectrum M) (γ : ℝ) :
(⟨1, one_pos, 0, rfl, Fin.elim0, fun i => Fin.elim0 i,
fun i => Fin.elim0 i⟩ : HierarchySpec M).isJustified spec γ := by
intro i; exact Fin.elim0 iEndogenous Hierarchy: Why N Levels?