let rec remove_left_space (s : string) (l : int) (i : int) : string = ( if (i<l) then (if ((String.get s i)=' ') then (remove_left_space s l (i+1)) else (String.sub s i (l-i));) else ""; )