import Control.Arrow
error = (&&&) ==> (***)
