File "lib/typeerror.ml", line 4, characters 16-28:
4 | let bad : int = "not an int"
                    ^^^^^^^^^^^^
Error: This constant has type string but an expression was expected of type
         int
