:set -fglasgow-exts -XOverlappingInstances -XUndecidableInstances -XNoMonomorphismRestriction -XOverloadedStrings