module Week1 where -- this is our fiurst haskell program -- it is just a test square :: Float -> Float square x = x * x