proposition: Lemma simplify_cochain_step {u v : nat} (x : forall n, X n) (e : S v = u) : dmor coch e (x u) = π' v (x (S v)).
proof: Proof. unfold π', π in *; unfold dmor. (induction e; auto). Defined.
imports: UniMath.Foundations.PartD UniMath.Foundations.Sets UniMath.MoreFoundations.Univalence UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.Categories.Type.Core UniMath.CategoryTheory.Limits.Graphs.Limits UniMath.CategoryTheory.Limits.Graphs.Colimits UniMath.CategoryTheory.Chains.Cochains