Create 2GRNNBCV.f90