input-output.hs updates