f xs = head xs

g xs = f xs

main = g []