Create 3PMI_R5.f90