Create 8GRNNTEMOSE.f90