Create 14PMI_C2.f90