Create cfd_solve.f90