added ninetestingfile.f