Sign in | Join

Blogs I read

let rec computeLength list =
    match list with 
        | [] -> 0
        | head::tail -> 1 + computeLength tail

> computeLength [1..10];;
val it : int = 10
> 

Terms of Use