Create 1main.f90