let g:haskall_test = 1
setlocal foldmethod<
setlocal foldtext<