let
hd =
List
.hd