static ItIt<UpDownSequence> allUpDownSequencesOfLength(int length) {
  ret mapI(allWordsOfAlphabetWithLength(length, "UD"),
    s -> UpDownSequence(s));
}