I dunno why people complain about ports. Do you complain every time a movie is ported $(PseudoTemplateEnglish.PrepositionalPhraseSeq $ let formats=[VHS, DVD, theater, videodisc, UMD, laserdisc, Blu-Ray] in [[|from $(x) to $(y)|] | x, y <- formats, x /= y]) ?