All pastes #63656 Raw Edit

Something

public text v1 · immutable
#63656 ·published 2006-06-10 12:52 UTC
rendered paste body
guessWrong target attempts guess =
  if target > guess
     then putStrLn "Too Low"
     else putStrLn "Too high"
  guessFor target $ attempts + 1