let mydprintf fmt = dprintf 10 fmt