small modification in WHAM.f90