small change to dist_init_dmnu.f90