let
to_string_hum t =
Log
.to_long_string (log t)