Функция main
должна иметь тип IO a
. Вы определяете main как testfn [..]
типа Ord a, Num a => [[a]]
.
Что вы хотите, чтобы программа делала? Сравните с известным решением для вашего заказа?
main = print (knownSolution == testfn [[1],[2]])
Или, возможно, распечатать результат?
main = print $ testfn [[1],[2]]