Import Control.Arrow as CA