aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/TransformListComp/group-by-using.hs
{- ORACLE_TEST pass -}
{-# LANGUAGE TransformListComp #-}
module GroupByUsing where
import GHC.Exts (the, groupWith)
f xs = [ (the x, y) | x <- xs, y <- ys, then group by x using groupWith ]