add main to calc.hs