let print_lazy pp f l = pp f !*l