module Math let addOne x = x + 1 let square x = x * x let slash x = x / x let recursive x = 1 / x