now serial& mpi in sample_fortran/dense/ work