Definition pointwise_runit (run : X) (runax : isrunit op run) : isrunit (pointwise n op) (const_vec run). Proof. intros ?; apply funextfun; intro; apply runax. Defined.
Require Import UniMath.Foundations.PartA. Require Import UniMath.MoreFoundations.PartA. Require Import UniMath.Combinatorics.FiniteSequences. Require Import UniMath.Algebra.BinaryOperations. Require Import UniMath.Algebra.IteratedBinaryOperations. Require Import UniMath.Algebra.RigsAndRings.