OAI/Geometry/SurfaceImmersion/Correction/MixedJetPolynomial.lean
13 declarations, 0 contain sorry, 0 declared as axioms
Polynomials in the base-map jet and three independent variation jets. Differentiating the base map increases the scale loss by at most two.
- inductive
OAI.ClosedSurfaceR4.JetPolynomial.MixedExpressionline 12 - def
OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression.evalline 19 - def
OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression.lossline 24 - def
OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression.SmoothCoeffsline 29 - def
OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression.ofExpressionline 34 - lemma
OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression.ofExpression_evalline 39 - lemma
OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression.ofExpression_lossline 46 - def
OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression.sumListline 52 - lemma
OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression.loss_sumList_leline 56 - def
OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression.coefficientDerivativeline 64 - def
OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression.differentiateline 69Source documentation
Only the base-map slot is differentiated. The new direction is one of the three variation slots, so a third variation uses no extra map slots.
def differentiate (j : Fin 3) : MixedExpression → MixedExpression | .coeff c => sumList Finset.univ.toList (fun i : Fin 7 × Fin 4 => .atom j.succ (lowWord i.1) i.2 (.coeff (coefficientDerivative c i))) | .atom i w a e => if i = 0 then .add (.atom j.succ w a e) (.atom i w a (differentiate j e)) else .atom i w a (differentiate j e) | .add e f => .add (differentiate j e) (differentiate j f)Mentions: OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression, OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression.sumList, OAI.ClosedSurfaceR4.JetPolynomial.lowWord, OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression.coefficientDerivative
- theorem
OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression.loss_differentiateline 77 - theorem
OAI.ClosedSurfaceR4.JetPolynomial.MixedExpression.loss_third_variationline 98