At the end result must be printed to a text file by process $0$ print each entry of the vector to a seperate line $$N CI couldnt print to a text fileint main$($int argc, char $**$argv$)\{$

int my$\_$rank, comm$\_$sz;

double $**A,**x,**y,*$local$\_$A$,*$local$\_$y;

int $m,n,$ local$\_$m;

MPI$\_$Init$($&argc, &argv$)$ ;

MPI$\_$Comm$\_$rank $($MPI$\_$COMM$\_$WORLD, &my$\_$rank$)$ ;

MPI$\_$Comm$\_$size $($MPI$\_$COMM$\_$WORLD, &comm$\_$sz$)$ ;

if $($my$\_$rank $==0)\{$

$//$ Master process reads A and $x$

FILE $**fp=$ fopen $("$matrix$.$mtx$","r")$;

read$\_$matrix$\_$market $(fp,A,$&$m,$&$n$;

$x=A[0]$; $//$ First row of $A$ is $x$

fclose $(fp)$;

$\}$

$//$ Broadcast dimensions to all processes

MPI$\_$Bcast $(,$ MPI$\_$INT, $,$ MPI$\_$COMM$\_$WORLD$)$ ;

MPI$\_$Bcast $($ &$n,1,$ MPI$\_$INT, $,$ MPI$\_$COMM$\_$WORLD $)$ ;

$//$ Divide rows of A among processes

local$\_$m $=\frac{m}{?}$ comm$\_$sz;

local$\_$A double $**$ malloc local$\_$m $**n**$ sizeof double