static <A> S formatDoubleArrowPairs_horizontallyAligned(LPair<A> l) {
  ret asciiSideBySideWithSeparator(" => " , lines(pairsA(l)), lines(pairsB(l)));
}