messing around with haskells