Plate tectonics simulation in Haskell