/*multiplica duas matrizes e guarda o resultado em uma matriz resultante*/
void multiplica_matrizes(void)
{
Matriz matriz_A = {NULL,1,1}, matriz_B = {NULL,1,1}, matriz_Mult = {NULL,1,1};
ushort i,j,k;
uchar flag = TRUE;
while(flag)
{
ler_matriz(&matriz_A);/*le valores para linha e coluna e aloca memoria para a matriz*/
ler_matriz(&matriz_B);/*le valores para linha e coluna e aloca memoria para a matriz*/
if(matriz_A.col != matriz_B.row)/*verifica se a multiplicaccao e possivel*/
{
printf("\nErro o numero de linhas de colunas de A tem que ser igual ao numero de linhas de B\n");
libera_matriz(matriz_A.address, &(matriz_A.row));/*libera a memoria alocada anteriormente*/
libera_matriz(matriz_B.address, &(matriz_B.row));/*libera a memoria alocada anteriormente*/
}
else
flag = FALSE;
}
preenche_matriz(&matriz_A);/*preenche as entradas da matriz com valores via teclado*/
preenche_matriz(&matriz_B);/*preenche as entradas da matriz com valores via teclado*/
matriz_Mult.row = matriz_A.row;
matriz_Mult.col = matriz_B.col;
matriz_Mult.address = aloca_matriz(&(matriz_Mult.row),&(matriz_Mult.col));/*aloca memoria para a matriz_Mult*/
inicializa_matriz(&matriz_Mult);
for(i = 0; i < matriz_Mult.row; i++)
for(j = 0; j < matriz_Mult.col; j++)
for(k = 0; k < matriz_A.col; k++)/*k < matriz_B->row tambem esta correto*/
*(*(matriz_Mult.address + i) + j) += (*(*(matriz_A.address + i) + k)) * (*(*(matriz_B.address + k) + j));
imprime_matriz(&matriz_A);
imprime_matriz(&matriz_B);
imprime_matriz(&matriz_Mult);
libera_matriz(matriz_A.address,&(matriz_A.row));
libera_matriz(matriz_B.address,&(matriz_B.row));
libera_matriz(matriz_Mult.address,&(matriz_Mult.row));
}
int main(int argc, char *argv[]) {
// Declara as variáveis
char * inputFileName = argv[1];
char * outputFileName = argv[2];
int ** matrizA, ** matrizB, ** matrizResult;
int numInstancias, numLinhasA, numLinhasB, numLinhasResult, numColunasA, numColunasB, numColunasResult, i, j, k, l, m;
// Abrir arquivo de entrada
FILE * inputFileOpen;
if ((inputFileOpen = fopen(inputFileName, "r")) == NULL) {
printf("Nao foi possivel abrir o arquivo.\n");
} else {
printf("Aberto arquivo de entrada %s \n", inputFileName);
}
// Abrir arquivo de saída
FILE * outputFileOpen;
if ((outputFileOpen = fopen(outputFileName, "w")) == NULL) {
printf("Nao foi possivel abrir o arquivo.\n");
} else {
printf("Aberto arquivo de entrada %s \n", outputFileName);
}
// Lê o número de instâncias
fscanf(inputFileOpen, "%d", &numInstancias);
// Escreve o número de instâncias no arquivo de saída
fprintf(outputFileOpen, "%d\n", numInstancias);
for(m = 0; m < numInstancias; m++) {
// Lê linhas e colunas da matriz A
fscanf(inputFileOpen, "%d", &numLinhasA);
fscanf(inputFileOpen, "%d", &numColunasA);
// Preenche a matriz A
matrizA = preenche_matriz(inputFileOpen, numLinhasA, numColunasA);
// Lê linhas e colunas da matriz B
fscanf(inputFileOpen, "%d", &numLinhasB);
fscanf(inputFileOpen, "%d", &numColunasB);
// Preenche a matriz B
matrizB = preenche_matriz(inputFileOpen, numLinhasB, numColunasB);
// Seta linhas e colunas da matriz resultante
numLinhasResult = numLinhasA * numLinhasB;
numColunasResult = numColunasA * numColunasB;
// Aloca a matriz resultante
matrizResult = aloca_matriz(numLinhasResult, numColunasResult);
// Preenche a matriz resultante (Produto de Kronecker)
for (i = 0; i < numLinhasA; ++i) {
for (j = 0; j < numColunasA; ++j) {
for (k = 0; k < numLinhasB; ++k) {
for (l = 0; l < numColunasB; ++l) {
matrizResult[i * numLinhasB + k][j * numColunasB + l] = matrizA[i][j] * matrizB[k][l];
}
}
}
}
// Libera as matrizes já utilizadas
desaloca_matriz(matrizA, numLinhasA);
desaloca_matriz(matrizB, numLinhasB);
// Escreve o número de linhas e colunas no arquivo de saída
fprintf(outputFileOpen, "%d ", numLinhasResult);
fprintf(outputFileOpen, "%d\n", numColunasResult);
// Escreve a matriz resultante no arquivo de saída
for(i = 0; i < numLinhasResult; i++) {
for(j = 0; j < numColunasResult; j++) {
fprintf(outputFileOpen,"%d ", matrizResult[i][j]);
}
fprintf(outputFileOpen, "\n");
}
// Libera a matriz resultante
desaloca_matriz(matrizResult, numLinhasResult);
}
// Retorna 0 se conseguiu fechar o arquivo com sucesso
if(fclose(inputFileOpen) == 0) {
printf("%s fechado com sucesso\n", inputFileName);
}
if(fclose(outputFileOpen) == 0) {
printf("%s fechado com sucesso\n", outputFileName);
}
return 0;
}
