add a sample to pass a fortran array to disitributed_matrix through function pointer