para correr el código usar ghci -x lhs 2013....