Create main3.F90