decision :: ([slides], hope, naivety, GSachsClient) -> greaterFool naivety = foldl hope slides map naivety GSachsClient ah who am I kidding, I could never ge

decision :: ([slides], hope, naivety, GSachsClient) -> greaterFool naivety = foldl hope slides map naivety GSachsClient ah who am I kidding, I could never get the hang of monads anyway.