fact: Definition make_nat_alg_sec : ∏ (FA : fibered_alg nat_alg_z), let FA' := fibered_algebra_nat FA in ∏ (x : ∏ n : ℕ, pr1 FA' n) (p1 : x 0 = pr1 (pr2 FA')) (p2 : (∏ n, pr2 (pr2 FA') n (x n) = x (S n))), algebra_section FA.
imports: UniMath.Foundations.Preamble UniMath.Foundations.PartA UniMath.Foundations.PartD UniMath.Foundations.UnivalenceAxiom UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.Categories.Type.Core UniMath.Induction.FunctorAlgebras_legacy UniMath.Induction.PolynomialFunctors UniMath.Induction.W.Core UniMath.Induction.W.Fibered