let
create prefix = incr x; sprintf
"%s_%d_%d"
prefix !x (
Random
.int 100_000)