Rename sort_s.f to sort_s.4th