A Linguistic Geometry application written in Haskell