Create calc.hs