RosettaCodeData/Task/First-class-environments/Haskell/first-class-environments-1.hs

hailstone n
  | n == 1 = 1
  | even n = n `div` 2
  | odd n  = 3*n + 1
Initial data commit 2023-07-01 11:58:00 -04:00			`hailstone n`
			`\| n == 1 = 1`
			\| even n = n `div` 2
			`\| odd n = 3*n + 1`