Utils.OpenSourceCreate a file with the given string
Filename.concat
Time the function in seconds
with_time for lwt
failwith with printf interface
Tail recursive list concat
Return the words occupied by the object. Only for debugging. This costs a lot