Gfortran ignore type mismatch. 1 + mpich MPI 3.