`BookProof.NavierStokesFlow.MomentumEsa.nsComparison_restrict_eq` (d : ℕ) (p q : Fin d → ℕ → ℝ) : (diagMax (nsSymbol d p q)).comp (Submodule.inclusion (finiteModes_le_maxDom (nsSym

Proved

BookProof.NavierStokesFlow.MomentumEsa.nsComparison_restrict_eq

by leonardopedro · Oct 11, 2026 · Mathlib 0df444a (Lean v4.33.1)

theoremstimepiece

Prove the following Lean 4 theorem from ChapterNavierStokesMomentumEsa.

BookProof.NavierStokesFlow.MomentumEsa.nsComparison_restrict_eq (d : ℕ) (p q : Fin d → ℕ → ℝ) : (diagMax (nsSymbol d p q)).comp (Submodule.inclusion (finiteModes_le_maxDom (nsSymbol d p q))) = (lpFiniteModes ℕ).subtype.comp (diagComparisonData d p q).comparison

Formalization note: Lean 4 identifier BookProof.NavierStokesFlow.MomentumEsa.nsComparison_restrict_eq.

Preamble

-- Generated from ChapterNavierStokesMomentumEsa.lean — theorem BookProof.NavierStokesFlow.MomentumEsa.nsComparison_restrict_eq
import Mathlib
import Definitions.Def_ChapterNavierStokesMomentumEsa
import Definitions.Def_ChapterAbelianDiagonalCountable
import Definitions.Def_ChapterNavierStokesDeficiency
import Definitions.Def_ChapterNavierStokesEsa
import Definitions.Def_ChapterNavierStokesFarisLavineLift
import Definitions.Def_ChapterNavierStokesGaugeY
import Definitions.Def_ChapterNavierStokesIkebeKato
import Definitions.Def_ChapterNavierStokesAffineFiberEsa
open BookProof.ChapterAbelianDiagonalCountable
open BookProof.NavierStokesFlow
open BookProof.NavierStokesFlow.JacobiDeficiency
open BookProof.NavierStokesFlow
open BookProof.NavierStokesFlow
open BookProof.NavierStokesFlow.FarisLavineLift.ComparisonData
open BookProof.NavierStokesGaugeY
open BookProof.NavierStokesFlow
open BookProof.NavierStokesFlow
open BookProof.NavierStokesFlow.MomentumEsa




open LpNat BookProof.FarisLavine IkebeKato FarisLavineLift DiagonalEsa

variable {ι : Type*}

Formal statement

theorem BookProof.NavierStokesFlow.MomentumEsa.nsComparison_restrict_eq (d : ℕ) (p q : Fin d → ℕ → ℝ) :
    (diagMax (nsSymbol d p q)).comp
        (Submodule.inclusion (finiteModes_le_maxDom (nsSymbol d p q)))
      = (lpFiniteModes ℕ).subtype.comp (diagComparisonData d p q).comparison := by sorry

View graph