I'm new to functional programming and Ocaml and I'm trying to write a function that when given a list of lists, check each list whose size length is equal to the rest of the lists and return true else false.

For examples:

```
[[5;2;4];[1;3]] -> false
[[1;2];[1;3]] -> true

```

So my first question, to start solving my problem, is how do you parse a list of lists?

Attempt:

```
let rec check_if_equal list = match list with
    [[h]] -> true
    |[h]::rest -> let find_len list_len = match list_len with
       [[]] -> 0
       |_::t -> 1 + find_len t

```