let log t = 
    let str = to_string t in
    Log.(indent (s str))