Create 15PMI_C3.f90