Commit 36200858 authored by Taddeüs Kroes's avatar Taddeüs Kroes

Fixed typo.

parent 8e4d8972
...@@ -42,7 +42,7 @@ let rec reduce f z l = ...@@ -42,7 +42,7 @@ let rec reduce f z l =
(* 6 *) (* 6 *)
let rec isSublist l s = let rec isSublist l s =
(* Check if l starts with s, otherwise chech the tail recursively *) (* Check if l starts with s, otherwise check the tail recursively *)
let rec startsWith l s = let rec startsWith l s =
(length s) <= (length l) && match s with (length s) <= (length l) && match s with
| [] -> true | [] -> true
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment