Create 7GRNNTESOME.f90