module Length:sig..end
returns the number of elements in the list l - non tail recursive
val length : 'a list -> int
val test_length : unit -> unit
val length_tr : 'a list -> intreturns the number of elements in the list l - tail recursive
val test_length_tr : unit -> unit