haskell/VarArg remove unnecessary part