feat(string): split_on a char (#1145)

* lib: string

* type

Author: khoek

src/data/string/defs.lean

@@ -1,3 +1,4 @@
+import data.list.defs
 
 namespace string
 
@@ -7,4 +8,7 @@ intercalate (singleton c) ∘ f ∘ split (= c)
 def over_list (f : list char → list char) : string → string :=
 list.as_string ∘ f ∘ string.to_list
 
+def split_on (c : char) (s : string) : list string :=
+(s.to_list.split_on c).map list.as_string
+
 end string