implementation of Elm's Mario demo in PureScript