Documentation

LeanPool.NavierStokesAndEuler.Euler.ParentInitializedRadiusPolynomial

Polynomial control of the literal canonical initialized radius built from the parent fields. The boundary coefficient remains an explicit scalar input.

A fixed polynomial in the genuine parent label bound controls the coefficient leaves of the normal, joined and mean packet budgets.

Radius ceiling, given by 1024+4*K.

Equations
Instances For

    Curvature ceiling, given by 27*(frameAmplitude K)^2*gradientAmplitude K.

    Equations
    Instances For

      Normal inverse, given by EulerPacketParentNormalBudget.inverseRadius (radiusCeiling K) (frameAmplitude K) (gradientAmplitude K).

      Equations
      • One or more equations did not get rendered due to their size.
      Instances For

        Normal radius, given by EulerPacketParentNormalBudget.radius (radiusCeiling K) (frameAmplitude K) (gradientAmplitude K).

        Equations
        • One or more equations did not get rendered due to their size.
        Instances For

          Transverse inverse, given by EulerPacketParentTransverseCosts.inverseRadius (radiusCeiling K) (frameAmplitude K).

          Equations
          • One or more equations did not get rendered due to their size.
          Instances For

            Leaf envelope as an element of ℝ.

            Equations
            • One or more equations did not get rendered due to their size.
            Instances For

              Leaf polynomial as an element of Polynomial ℝ.

              Equations
              • One or more equations did not get rendered due to their size.
              Instances For

                Composing the actual coefficient envelope with the parent label polynomial gives a single fixed polynomial in the parent size K.

                noncomputable def EulerParentCorrectionCost.parentEnvelope (P : ℝ) [Fact (0 < P)] (K : ℝ) :

                Parent envelope, given by 1+leafEnvelope K+primitiveEnvelope P (leafEnvelope K).

                Equations
                • One or more equations did not get rendered due to their size.
                Instances For

                  Parent polynomial, given by 1+leafPolynomial+(primitivePolynomial P).comp leafPolynomial.

                  Equations
                  • One or more equations did not get rendered due to their size.
                  Instances For
                    noncomputable def EulerParentCorrectionCost.parentConstant (P : ℝ) [Fact (0 < P)] :

                    Parent constant, given by coefficientCost (parentPolynomial P).

                    Equations
                    Instances For
                      noncomputable def EulerParentCorrectionCost.parentPower (P : ℝ) [Fact (0 < P)] :

                      Parent power, given by (parentPolynomial P).natDegree.

                      Equations
                      Instances For

                        Input envelope, given by let a := parentConstant period*X^parentPower period 1+X+a+3*a^3*X.

                        Equations
                        • One or more equations did not get rendered due to their size.
                        Instances For

                          Input polynomial, given by let X : Polynomial ℝ := Polynomial.X let a := Polynomial.C (parentConstant period)*X^parentPower period 1+X+a+3*a^3*X.

                          Equations
                          • One or more equations did not get rendered due to their size.
                          Instances For
                            noncomputable def EulerParentInitializedRadius.parameterSize (K Ti TiTotal Cp B δ N : ℝ) :

                            Parameter size, given by 1+K+Ti+TiTotal+Cp+B+δ⁻¹+N.

                            Equations
                            Instances For
                              theorem EulerParentInitializedRadius.parameterSize_bounds (K Ti TiTotal Cp B δ N : ℝ) (hK : 0 ≤ K) (hTi : 0 ≤ Ti) (hTiTotal : 0 ≤ TiTotal) (hCp : 0 ≤ Cp) (hB : 0 ≤ B) (hδ : 0 < δ) (hN : 0 ≤ N) :
                              1 ≤ parameterSize K Ti TiTotal Cp B δ N ∧ K ≤ parameterSize K Ti TiTotal Cp B δ N ∧ Ti ≤ parameterSize K Ti TiTotal Cp B δ N ∧ TiTotal ≤ parameterSize K Ti TiTotal Cp B δ N ∧ Cp ≤ parameterSize K Ti TiTotal Cp B δ N ∧ B ≤ parameterSize K Ti TiTotal Cp B δ N ∧ δ⁻¹ ≤ parameterSize K Ti TiTotal Cp B δ N ∧ N ≤ parameterSize K Ti TiTotal Cp B δ N

                              Full polynomial, given by radiusPolynomial.comp (sourceRadiusPolynomial.comp inputPolynomial).

                              Equations
                              • One or more equations did not get rendered due to their size.
                              Instances For
                                noncomputable def EulerParentPacketFrames.LabelData.canonicalInitializedRadius {U : Type} [NormedAddCommGroup U] [InnerProductSpace ℝ U] [CompleteSpace U] {G : Parent} (L : LabelData G) (H : LowBounds G) (m : EulerSmoothLimit.Space) (hm : ‖m‖ = 1) (R : U ≃ₗᵢ[ℝ] ↥(EulerTransverseFrameCoordinates.referencePlane m)) (S : Set EulerSmoothLimit.Space) (hS : IsCompact S) (τ : ℝ) (hτ : 0 < τ) (hτT : τ < G.T) (Ti Cp : ℝ) (hτ1 : τ ≤ 1) (hTi : τ⁻¹ ≤ Ti) (hCp : 0 ≤ Cp) (g : C(↑(Set.Icc 0 (G.T - τ)), ℝ)) (hg : ∀ (t : ↑(Set.Icc 0 (G.T - τ))), 0 < g t) (hg0 : g ⟨0, ⋯⟩ = 1) (Ω : Set EulerSmoothLimit.Space) (hΩ : MeasurableSet Ω) (hΩo : IsOpen Ω) (hsub : S ⊆ Ω) (hΩball : ∀ x ∈ Ω, ‖x‖ ≤ 1 / 2) (hphysical : EulerPacketSourcePropagator.PhysicalGrowth ((G.transverseData m hm R S hS).tail τ ⋯ hτT) EulerPacketParentPhysicalBudgets.halfBall (⇑g) Cp) (TiTotal : ℝ) (hT1 : G.T ≤ 1) (hTiTotal : G.T⁻¹ ≤ TiTotal) (δ : ℝ) (ξ : U) :

                                Canonical initialized radius, given by initializedRadius (J).mean (J).linear (J).normal BC δ ξ.

                                Equations
                                • One or more equations did not get rendered due to their size.
                                Instances For
                                  theorem EulerParentPacketFrames.LabelData.joined_radius_primitives {U : Type} [NormedAddCommGroup U] [InnerProductSpace ℝ U] [CompleteSpace U] {G : Parent} (L : LabelData G) (H : LowBounds G) (m : EulerSmoothLimit.Space) (hm : ‖m‖ = 1) (R : U ≃ₗᵢ[ℝ] ↥(EulerTransverseFrameCoordinates.referencePlane m)) (S : Set EulerSmoothLimit.Space) (hS : IsCompact S) (τ : ℝ) (hτ : 0 < τ) (hτT : τ < G.T) (Ti Cp : ℝ) (hτ1 : τ ≤ 1) (hTi : τ⁻¹ ≤ Ti) (hCp : 0 ≤ Cp) (g : C(↑(Set.Icc 0 (G.T - τ)), ℝ)) (hg : ∀ (t : ↑(Set.Icc 0 (G.T - τ))), 0 < g t) (hg0 : g ⟨0, ⋯⟩ = 1) (Ω : Set EulerSmoothLimit.Space) (hΩ : MeasurableSet Ω) (hΩo : IsOpen Ω) (hsub : S ⊆ Ω) (hΩball : ∀ x ∈ Ω, ‖x‖ ≤ 1 / 2) (hphysical : EulerPacketSourcePropagator.PhysicalGrowth ((G.transverseData m hm R S hS).tail τ ⋯ hτT) EulerPacketParentPhysicalBudgets.halfBall (⇑g) Cp) (TiTotal : ℝ) (hT1 : G.T ≤ 1) (hTiTotal : G.T⁻¹ ≤ TiTotal) (δ : ℝ) (ξ : U) (X : ℝ) (hKX : L.K ≤ X) (hTiX : Ti ≤ X) (hTiTotalX : TiTotal ≤ X) (hCpX : Cp ≤ X) (hLX : H.L ≤ X) (hδX : δ⁻¹ ≤ X) (hξX : ‖ξ‖ ≤ X) :
                                  EulerPacketRadiusPolynomial.RadiusPrimitives (L.joinedInputs H m hm R S hS τ hτ hτT Ti Cp hτ1 hTi hCp g hg hg0 Ω hΩ hΩo hsub hΩball hphysical TiTotal hT1 hTiTotal).mean (L.joinedInputs H m hm R S hS τ hτ hτT Ti Cp hτ1 hTi hCp g hg hg0 Ω hΩ hΩo hsub hΩball hphysical TiTotal hT1 hTiTotal).linear (L.joinedInputs H m hm R S hS τ hτ hτT Ti Cp hτ1 hTi hCp g hg hg0 Ω hΩ hΩo hsub hΩball hphysical TiTotal hT1 hTiTotal).normal (EulerPacketCylinderField.joinedCoefficientBudget EulerPacketTerminalDatum.period (G.meanData H) (G.transverseData m hm R S hS) ⋯ τ hτ hτT (G.historyOn H m hm R S hS τ hτ hτT) (L.joinedInputs H m hm R S hS τ hτ hτT Ti Cp hτ1 hTi hCp g hg hg0 Ω hΩ hΩo hsub hΩball hphysical TiTotal hT1 hTiTotal).normal) δ ξ (EulerPacketSourceRadius.sourceRadiusEnvelope (EulerParentInitializedRadius.inputEnvelope X))
                                  theorem EulerParentPacketFrames.LabelData.canonicalInitializedRadius_power {U : Type} [NormedAddCommGroup U] [InnerProductSpace ℝ U] [CompleteSpace U] {G : Parent} (L : LabelData G) (H : LowBounds G) (m : EulerSmoothLimit.Space) (hm : ‖m‖ = 1) (R : U ≃ₗᵢ[ℝ] ↥(EulerTransverseFrameCoordinates.referencePlane m)) (S : Set EulerSmoothLimit.Space) (hS : IsCompact S) (τ : ℝ) (hτ : 0 < τ) (hτT : τ < G.T) (Ti Cp : ℝ) (hτ1 : τ ≤ 1) (hTi : τ⁻¹ ≤ Ti) (hCp : 0 ≤ Cp) (g : C(↑(Set.Icc 0 (G.T - τ)), ℝ)) (hg : ∀ (t : ↑(Set.Icc 0 (G.T - τ))), 0 < g t) (hg0 : g ⟨0, ⋯⟩ = 1) (Ω : Set EulerSmoothLimit.Space) (hΩ : MeasurableSet Ω) (hΩo : IsOpen Ω) (hsub : S ⊆ Ω) (hΩball : ∀ x ∈ Ω, ‖x‖ ≤ 1 / 2) (hphysical : EulerPacketSourcePropagator.PhysicalGrowth ((G.transverseData m hm R S hS).tail τ ⋯ hτT) EulerPacketParentPhysicalBudgets.halfBall (⇑g) Cp) (TiTotal : ℝ) (hT1 : G.T ≤ 1) (hTiTotal : G.T⁻¹ ≤ TiTotal) (δ : ℝ) (hδ : 0 < δ) (ξ : U) (X : ℝ) (hKX : L.K ≤ X) (hTiX : Ti ≤ X) (hTiTotalX : TiTotal ≤ X) (hCpX : Cp ≤ X) (hLX : H.L ≤ X) (hδX : δ⁻¹ ≤ X) (hξX : ‖ξ‖ ≤ X) :
                                  L.canonicalInitializedRadius H m hm R S hS τ hτ hτT Ti Cp hτ1 hTi hCp g hg hg0 Ω hΩ hΩo hsub hΩball hphysical TiTotal hT1 hTiTotal δ ξ ≤ EulerParentInitializedRadius.fullConstant * X ^ EulerParentInitializedRadius.fullPower
                                  theorem EulerParentPacketFrames.LabelData.joined_radius_primitive_polynomial {U : Type} [NormedAddCommGroup U] [InnerProductSpace ℝ U] [CompleteSpace U] {G : Parent} (L : LabelData G) (H : LowBounds G) (m : EulerSmoothLimit.Space) (hm : ‖m‖ = 1) (R : U ≃ₗᵢ[ℝ] ↥(EulerTransverseFrameCoordinates.referencePlane m)) (S : Set EulerSmoothLimit.Space) (hS : IsCompact S) (τ : ℝ) (hτ : 0 < τ) (hτT : τ < G.T) (Ti Cp : ℝ) (hτ1 : τ ≤ 1) (hTi : τ⁻¹ ≤ Ti) (hCp : 0 ≤ Cp) (g : C(↑(Set.Icc 0 (G.T - τ)), ℝ)) (hg : ∀ (t : ↑(Set.Icc 0 (G.T - τ))), 0 < g t) (hg0 : g ⟨0, ⋯⟩ = 1) (Ω : Set EulerSmoothLimit.Space) (hΩ : MeasurableSet Ω) (hΩo : IsOpen Ω) (hsub : S ⊆ Ω) (hΩball : ∀ x ∈ Ω, ‖x‖ ≤ 1 / 2) (hphysical : EulerPacketSourcePropagator.PhysicalGrowth ((G.transverseData m hm R S hS).tail τ ⋯ hτT) EulerPacketParentPhysicalBudgets.halfBall (⇑g) Cp) (TiTotal : ℝ) (hT1 : G.T ≤ 1) (hTiTotal : G.T⁻¹ ≤ TiTotal) (δ : ℝ) (hδ : 0 < δ) (ξ : U) :
                                  have X := EulerParentInitializedRadius.parameterSize L.K Ti TiTotal Cp H.L δ ‖ξ‖; EulerPacketRadiusPolynomial.RadiusPrimitives (L.joinedInputs H m hm R S hS τ hτ hτT Ti Cp hτ1 hTi hCp g hg hg0 Ω hΩ hΩo hsub hΩball hphysical TiTotal hT1 hTiTotal).mean (L.joinedInputs H m hm R S hS τ hτ hτT Ti Cp hτ1 hTi hCp g hg hg0 Ω hΩ hΩo hsub hΩball hphysical TiTotal hT1 hTiTotal).linear (L.joinedInputs H m hm R S hS τ hτ hτT Ti Cp hτ1 hTi hCp g hg hg0 Ω hΩ hΩo hsub hΩball hphysical TiTotal hT1 hTiTotal).normal (EulerPacketCylinderField.joinedCoefficientBudget EulerPacketTerminalDatum.period (G.meanData H) (G.transverseData m hm R S hS) ⋯ τ hτ hτT (G.historyOn H m hm R S hS τ hτ hτT) (L.joinedInputs H m hm R S hS τ hτ hτT Ti Cp hτ1 hTi hCp g hg hg0 Ω hΩ hΩo hsub hΩball hphysical TiTotal hT1 hTiTotal).normal) δ ξ (EulerParentInitializedRadius.sourceEnvelope X) ∧ EulerParentInitializedRadius.sourceEnvelope X ≤ EulerParentInitializedRadius.sourceConstant * X ^ EulerParentInitializedRadius.sourcePower
                                  theorem EulerParentPacketFrames.LabelData.canonicalInitializedRadius_polynomial {U : Type} [NormedAddCommGroup U] [InnerProductSpace ℝ U] [CompleteSpace U] {G : Parent} (L : LabelData G) (H : LowBounds G) (m : EulerSmoothLimit.Space) (hm : ‖m‖ = 1) (R : U ≃ₗᵢ[ℝ] ↥(EulerTransverseFrameCoordinates.referencePlane m)) (S : Set EulerSmoothLimit.Space) (hS : IsCompact S) (τ : ℝ) (hτ : 0 < τ) (hτT : τ < G.T) (Ti Cp : ℝ) (hτ1 : τ ≤ 1) (hTi : τ⁻¹ ≤ Ti) (hCp : 0 ≤ Cp) (g : C(↑(Set.Icc 0 (G.T - τ)), ℝ)) (hg : ∀ (t : ↑(Set.Icc 0 (G.T - τ))), 0 < g t) (hg0 : g ⟨0, ⋯⟩ = 1) (Ω : Set EulerSmoothLimit.Space) (hΩ : MeasurableSet Ω) (hΩo : IsOpen Ω) (hsub : S ⊆ Ω) (hΩball : ∀ x ∈ Ω, ‖x‖ ≤ 1 / 2) (hphysical : EulerPacketSourcePropagator.PhysicalGrowth ((G.transverseData m hm R S hS).tail τ ⋯ hτT) EulerPacketParentPhysicalBudgets.halfBall (⇑g) Cp) (TiTotal : ℝ) (hT1 : G.T ≤ 1) (hTiTotal : G.T⁻¹ ≤ TiTotal) (δ : ℝ) (hδ : 0 < δ) (ξ : U) :
                                  L.canonicalInitializedRadius H m hm R S hS τ hτ hτT Ti Cp hτ1 hTi hCp g hg hg0 Ω hΩ hΩo hsub hΩball hphysical TiTotal hT1 hTiTotal δ ξ ≤ EulerParentInitializedRadius.fullConstant * EulerParentInitializedRadius.parameterSize L.K Ti TiTotal Cp H.L δ ‖ξ‖ ^ EulerParentInitializedRadius.fullPower