Update generate_domain.f90