/* Algoritmo en MPI, qe calcula 2 matrices cuadradas leidas desde archivo el imprime el resultado en otro archivo*/

#include
#include
#include



int main()
{
FILE *archivoA;
FILE *archivoB;
FILE *archivoC;
archivoA=fopen("A.dat","rb");
archivoB=fopen("B.dat","rb");
archivoC=fopen("C.dat","wb");
n=100;
int matrizA[n][n];
int matrizB[n][n];
int i,j,k;
int resultado[3][3]={
{0,0,0},
{0,0,0},
{0,0,0}
};
        if (archivoA==NULL){
                printf("\nError de apertura del archivo\n\n");
        }
        else{
        //ciclo que llena las matrices desde el archivo
           for (i=0;i<3;i++)
             for (j=0;j<3;j++)
                {
                matrizA[i][j])=
                vector[i][1])=
                }
            for (k=0;k<3;k++)
             for (i=0;i<3;i++){
                for (j=0;j<3;j++){
                   resultado[k][i]+= matrizA[k][j]* matrizB[j][i];
                }
                //resultado[k][j]=0;
              }
        }
        for (i=0;i<3;i++){
             for (j=0;j<3;j++){
                fprintf(archivoC,"%d", resultado[i][j]);
                fprintf(archivoC,"%s", " ");
                }

fclose(archivoA);
fclose(archivoB);
fclose(archivoC);
}