Error: This expression has type string but an expression was expected of type
         ('a, unit, string, unit) format4 =
           ('a, unit, string, string, string, unit) format6