timetest.f added