small changes
moved delay
added util.ml