let
concat : t list
->
t =
fun
l
->
fun
def
->
List
.find_map l ~f:(
fun
kit
->
kit def)