added calc.hs sample