copy of output.f90