# Минимизация операций cons
## Ссылка на видеоразбор
https://youtu.be/BFy0zovZw6Y
## Код из книги
	#let rev =
	let rec reverse acc =
	fun [] -> acc
	| (h::t) -> reverse (h::acc) t in
	reverse [];;