Format utils.ml

This commit is contained in:
jeltz 2022-08-29 22:50:52 +02:00
parent 2a837d831d
commit 9d300de0f3
Signed by: jeltz
GPG key ID: 800882B66C0C3326

View file

@ -1,4 +1,4 @@
let rec deoptionalise = function let rec deoptionalise = function
| (Some x) :: xs -> x :: deoptionalise xs | Some x :: xs -> x :: deoptionalise xs
| None :: xs -> deoptionalise xs | None :: xs -> deoptionalise xs
| [] -> [] | [] -> []