Data.Sequence.NonEmpty
data NonEmptySeq a
fore
aft
nonEmptySeqToSeq
seqToNonEmptySeq
prependSeq
appendSeq
singleton