Create Calculator.hs

Påbörjade P2