fact: Definition disassembleSequence {X} : Sequence X -> coprod unit (X × Sequence X).
imports: UniMath.Combinatorics.FiniteSets UniMath.Combinatorics.Lists UniMath.Combinatorics.Vectors UniMath.MoreFoundations.PartA UniMath.MoreFoundations.Tactics