Create program.f90