Skip to content

Commit

Permalink
fix
Browse files Browse the repository at this point in the history
  • Loading branch information
jakzo committed Dec 19, 2023
1 parent 4cb0ea6 commit 94603da
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion count.hs
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,7 @@ import Data.Bits

count :: Int -> Int -> IO ()
count target n
| n == target = print n
| n >= target = print n
| otherwise = count target ((n + 1) .|. 1)

main :: IO ()
Expand Down

0 comments on commit 94603da

Please sign in to comment.