1{-# LANGUAGE TransformListComp #-} 2 3oldest :: [Int] -> [String] 4oldest tbl = [ "str" 5 | n <- tbl 6 , then id 7 ] 8