sig   type cst = C_str of string | W_str of int64 list   val pretty : Format.formatter -> Wp.Cstring.cst -> unit   val str_len : Wp.Cstring.cst -> Wp.Lang.F.term -> Wp.Lang.F.pred   val str_val : Wp.Cstring.cst -> Wp.Lang.F.term   val str_id : Wp.Cstring.cst -> int   val char_at : Wp.Cstring.cst -> Wp.Lang.F.term -> Wp.Lang.F.term   val cluster : unit -> Wp.Definitions.cluster end