Remove redundant () in A.hs