Create 8PMI_R1.f90