     'body': '${1:name} <- ${0:expression}'
   'Main':
     'prefix': 'main'
-    'body': 'module Main where\n\nmain :: IO ()\nmain = ${0:putStrLn "Hello World"}\n'
+    'body': '''
+      module Main where
+
+      main :: IO ()
+      main = ${0:putStrLn "Hello World"}\n
+      '''
   'Right Arrow':
     'prefix': '>'
     'body': '${1:expression} -> ${0:expression}'

    'body': 'type ${1:Type} = ${0:Other}'
  'where …':
    'prefix': 'where'
    'body': 'where\n\t${0:definitions}'
'.source.haskell:not(.comment)':
  'Guard':
    'prefix': '|'

'.source.haskell':
  'Definition':
    'prefix': '='
    'body': '${1:name} ${2:pattern} = ${0:definition}'
  'Function':
    'prefix': 'fun'
    'body': '''
      ${1:name} :: ${2:Type}
      ${1} ${3:pattern} = ${4:definition}
      '''
  '#!/usr/bin/env…':
    'prefix': '#!'
    'body': '#!/usr/bin/env ${1:runhaskell}\n'
