Write a function
- let divide nu den =
- let rec aux nu den n =
- if (nu < den) then n else
- aux (nu-den) den (n+1)
- in aux nu den 0;;
2 Matching Annotations
- Last 7 days
-
cs3110.github.io cs3110.github.io
-
-
let divide nu den = let rec aux nu den n = if (nu < den) then n else aux (nu-den) den (n+1) in aux nu den 0;;
-