fact: Record FibSequence (A : Sequence) := { fibSequence : sig A -> Type; fibSequenceArr x : fibSequence x -> fibSequence x^++ }.
imports: Basics Types Diagrams.Diagram Diagrams.Sequence Diagrams.Cocone Colimits.Colimit Spaces.Nat.Core PathAny