aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/TransformListComp/then-by-complex-expr.hs
{- ORACLE_TEST pass -}
{-# LANGUAGE TransformListComp #-}
module ThenByComplexExpr where
f xs = [ (x, y) | x <- xs, y <- ys, then sortWith by (x + y) ]
{- ORACLE_TEST pass -}
{-# LANGUAGE TransformListComp #-}
module ThenByComplexExpr where
f xs = [ (x, y) | x <- xs, y <- ys, then sortWith by (x + y) ]