let
is_empty_list =
function
l
->
l = []