## Multiple insertion
```
# let split sep = function
	| [] -> []
	| e::t ->
		let aux 
```