/**
 * 	Instituto de Ciencias Matematicas e de Computacao - USP Sao Carlos
 * 
 * 	Programacao Concorrente 2013
 *	Grupo 05 Turma A
 *
 *	Andre Luiz Catini Paro, 	7152740 
 * 	Daniel Hideki Yoshimi,		7239173
 * 	Rodrigo Toledo Amancio Silva,	7152308
 * 
 * 	Projeto Final - Metodo Jacobi-Richardson em CUDA
 *
 *	Este programa resolve sistema lineares utilizando o método de 
 * 	Jacobi-Richardson. O método é implementado de forma paralela 
 * 	utilizando a plataforma CUDA.
 * 
 * 	Ele retorna as seguintes informações:
 * 		-Quantidades de iterações;
 * 		-Comparação entre o resultado utilizando o valor obtido
 * 		aplicado em uma linha de testes com o valor real.
 * 
 */

#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <float.h>

#define TPB 256

/* Declarações de parâmetros */
void printMA(int J_ORDER, float *MA); // Função para debug. Imprime a matrix MA.
void printMB(int J_ORDER, float *MB); // Função para debug. Imprime o vetor MB.
void printX(int J_ORDER, float *X); // Função para debug. Imprime o vetor X.
void printResults(int ite, int J_ROW_TEST, float result, float MB); // Apresenta os resultados formatados.

/*	__global__ void diag(float *dev_MA, float *dev_MB, float *dev_X, int J_ORDER);
 * 
 * 	Descricao:
 * 		Esta função realiza o cálculo da matriz MA* e do vetor MB*, além de atribuir
 * 		o valor inicial para o vetor X. O retorno da função se dá em modificar os próprios
 * 		parâmetros de entrada.
 * 		Cada linha da matriz MA é calculada em um bloco e cada coluna dessa linha é calculada
 * 		pelas threads desse bloco.
 * 
 * 	Parametros de entrada:
 * 		-(float) dev_MA: Matriz MA alocada da memória da GPU.
 * 		-(float) dev_MB: Vetor MB alocado na memória da GPU.
 * 		-(float) dev_X: Vetor X alocado na memória da GPU.
 * 		-(int) J_ORDER: Ordem dos vetores.
 * 
 * 	Parametros de saida:
 * 		- 
 * 		
 */
__global__ void diag(float *dev_MA, float *dev_MB, float *dev_X, int J_ORDER){

	int bid = blockIdx.x; 	// Id do bloco.
	int tid = threadIdx.x; 	// Id da thread.
	
	/* Condição para evitar erros. Impede que blocos e threads executem o código fora do nosso controle. */
	if(bid < J_ORDER && tid < J_ORDER){
		
		/* Declaração e atribuição da variável auxiliar que irá armazenar o valor da diagonal na linha "bid" */
		int diagAux; 		
		diagAux = dev_MA[bid*J_ORDER+bid];
		
		/* Para cada linha calculada em um bloco (bId), as threads desse bloco irão calcular o valor de cada coluna */
		while(tid<J_ORDER){
			
			if(bid!=tid){
				dev_MA[tid*J_ORDER+bid] = dev_MA[tid*J_ORDER+bid]/diagAux;
			} else{
				dev_MA[tid*J_ORDER+bid] = 0;
			}		
			
			/* Incremento o tId para que todas as colunas sejam calculadas, já que cada bloco não executa mais que 512 threads */
			tid += TPB;
		}
		
		/* Espero todas as threads do block bId executarem os seus cálculos e atribuo a saída nos parâmetros de entrada */
		__syncthreads();
		dev_MB[bid] = dev_MB[bid] / diagAux;
		dev_X[bid] = dev_MB[bid];			
	}	
}

/*	__global__ void jacobi(float *dev_MA, float *dev_X, int J_ORDER, float *dev_sum);
 * 
 *   	Descricao:
 * 		Esta função realiza o cálculo do somatório presente no algoritmo. Para isso, utilizamos 
 * 		a seguinte abordagem: cada linha a ser multiplicada e somada é controlada por um bloco (bId),
 * 		cada uma das colunas dessa linha é controlada por uma thread (tId). Cada thread irá realizar
 * 		o cálculo das colunas de posição tId e tId+TPB (threads per block). Assim, caso a matriz tenha
 * 		mais que 512 colunas, todas elas serão calculadas. O somatório de cada thread será salvo numa
 * 		posição do cache compartilhado. Por fim, realizamos uma redução desse cache compartilhado, salvando
 * 		o resultado final (o somatório da linha), na sua posição referente em dev_sum.
 * 
 * 	Parametros de entrada:
 * 		-(float) dev_MA: Matriz MA alocada da memória da GPU.
 * 		-(float) dev_MB: Vetor MB alocado na memória da GPU.
 * 		-(float) dev_X: Vetor X alocado na memória da GPU.
 * 		-(int) J_ORDER: Ordem dos vetores.
 * 		-(float) dev_sum: Vetor que armazenará os somatórios
 * 
 * 	Parametros de saida:
 * 		-
 * 
 */
__global__ void jacobi(float *dev_MA, float *dev_X, int J_ORDER, float *dev_sum){
	
	int bId = blockIdx.x; // Id do bloco.
	int tId = threadIdx.x; // Id da thread.
	int cacheIndex = threadIdx.x; // Indice do cache da thread.
	float temp = 0; // Variável auxiliar que irá armazenar o somatório de cada thread.
	
	__shared__ float cache[TPB]; // Cache compartilhado que irá armazenar o somatório de cada thread, utilizado na posterior redução.
	cache[cacheIndex] = 0; // Atribuição inicial.
	
	/* Condição para evitar erros. Impede que blocos e threads executem o código fora do nosso controle. */
	if(bId < J_ORDER && tId < J_ORDER){
		
		/* Para cada linha (bId) da Matriz, as threads desse bloco irão seus respectivos somatórios */
		while(tId < J_ORDER){
			if(bId!=tId){
				temp += (dev_MA[(tId * J_ORDER) + bId] * dev_X[tId]);
			}
			
			tId += TPB;
		}
		
		/* Salvo o somatório de cada thread na sua posição respectiva do cache e aguardo todas as threads terminarem os seus cálculos */
		cache[cacheIndex] = temp;
		__syncthreads();
		
		/* Redução em paralelo */
		int i = TPB/2;
		while(i != 0){
			if(cacheIndex < i )
				cache[cacheIndex] += cache[cacheIndex + i];
			
			__syncthreads();
			i /= 2;
		}
		
		/* A thread 0 irá realizar a atribuição do valor final. */
		if(cacheIndex == 0){
			dev_sum[bId] = cache[0];			
		}
	}
}

/*	int main(int argc, char * argv[]);
 * 
 * 	Descricao:
 * 		Na main é realizada a leitura do arquivo de entrada bem como a declaração, alocação de memória
 * 		das variáveis envolvidas e a comunidação entre host e device.
 * 		Primeiramente o kernel diag é chamado para realizar o cálculo de MA* e MB*, bem como a atribuição inicial de X.
 * 		Então, uma estrutura de repetição irá realizar chamadas ao kernel jacobi para que o somatório seja realizado na gpu.
 * 		O somatório é copiado para o host e a atribuição do novo valor de X é feita, bem como o cálculo do erro. A estrutura 
 * 		de repetição para se ela atingir o número máximo de iterações ou o erro mínimo.
 * 
 * 	Parametros de entrada:
 * 		- argc: Quantidade de parametros de entrada junto a execucao do programa.
 * 		- argv: Array contendo strings com cada parametro de entrada.
 * 
 * 	Parametros de saida:
 * 		- (int): Retorna 0 caso o programa seja executado com sucesso. 
 */
int main(int argc, char * argv[]){
			
	//ENTRADA
	FILE * pFile; // Variavel para a abertura do arquivo de entrada.
	/* Abertura do arquivo de entrada */
	if((argc < 2) || (pFile = fopen(argv[1],"r")) == NULL){
		fputs ("File error",stderr); exit (1);
	}
	
	int i,j; // Variavel de controle para as estrutudas de repeticao.
	
	/* Parâmetros de entrada */
	int J_ORDER, J_ROW_TEST;
	float J_ERROR, J_ITE_MAX;	

	fscanf(pFile, "%d%d%f%f", &J_ORDER, &J_ROW_TEST, &J_ERROR, &J_ITE_MAX);	
	
	/* Declaração e alocamento das variáveis do host */
	float *MA, *MB, *X, *Xold, *MAOriginal, MBOriginal, *sum;		
	MA = 		(float*)malloc(sizeof(float)*J_ORDER*J_ORDER);
	MAOriginal = 	(float*)malloc(sizeof(float)*J_ORDER);	
	MB = 		(float*)malloc(sizeof(float)*J_ORDER);
	X = 		(float*)malloc(sizeof(float)*J_ORDER);
	Xold = 		(float*)malloc(sizeof(float)*J_ORDER);
	sum = 		(float*)malloc(sizeof(float)*J_ORDER);
	
	/* Leitura do arquivo de entrada */
	for(i = 0; i<J_ORDER; i++){		
		for(j = 0; j<J_ORDER; j++){
			fscanf(pFile, "%f", &MA[j*J_ORDER+i]);
			if(i==J_ROW_TEST)
				MAOriginal[j] = MA[j*J_ORDER+i];
		}
	}	
		
	for(i=0; i<J_ORDER; i++){
		fscanf(pFile, "%f", &MB[i]);
		if(i == J_ROW_TEST)
			MBOriginal = MB[i];		
	}
	
	fclose(pFile);

	/* Declaração e alocamento das variáveis do device */
	float *dev_MA, *dev_MB, *dev_X, *dev_sum;	
	cudaMalloc( (void**)&dev_MA, J_ORDER*J_ORDER*sizeof(float));
	cudaMalloc( (void**)&dev_MB, J_ORDER*sizeof(float));
	cudaMalloc( (void**)&dev_X, J_ORDER*sizeof(float));
	cudaMalloc( (void**)&dev_sum, J_ORDER*sizeof(float));
	
	/* Cópia de valores do host para o device */
	cudaMemcpy(dev_MA, MA, J_ORDER*J_ORDER*sizeof(float), cudaMemcpyHostToDevice);
	cudaMemcpy(dev_MB, MB, J_ORDER*sizeof(float), cudaMemcpyHostToDevice);
	cudaMemcpy(dev_X, X, J_ORDER*sizeof(float), cudaMemcpyHostToDevice);

	/* Chamada ao kernel diag
	* Blocos: J_ORDER - cada bloco cuida de uma linha
	* Threads: TPB - cada thread cuida de uma colunas		 * 
	*/
	diag<<<J_ORDER , TPB>>>(dev_MA, dev_MB, dev_X, J_ORDER); // OK
	
	/* Cópia dos valores de MB* e X do device para o host */
	cudaMemcpy(MB, dev_MB, J_ORDER*sizeof(float), cudaMemcpyDeviceToHost);
	cudaMemcpy(X, dev_X, J_ORDER*sizeof(float), cudaMemcpyDeviceToHost);
	
	/* Variáveis auxiliáres para o cálculo de X */
	int ite = 0;
	float maxDif, maxX, Mr;	
	Mr = FLT_MAX;
		
	float cmpAux1, cmpAux2;
	/* Estrutura de repetição que irá realizar chamadas ao quernel jacobi, calcular o novo valor de X e o erro */
	while(ite < J_ITE_MAX && Mr > J_ERROR){
		
		/* Chamada ao kernel jacobi
		 * Blocos: J_ORDER - cada bloco cuida de uma linha
		 * Threads: TPB - cada thread cuida de uma colunas		 * 
		 */
		jacobi<<<J_ORDER , TPB>>>(dev_MA, dev_X, J_ORDER, dev_sum);
		
		/* Cópia dos valores do somatório do device para o host */
		cudaMemcpy(sum, dev_sum, J_ORDER*sizeof(float), cudaMemcpyDeviceToHost);
		
		/* Cálculo do novo X e do erro */
		maxDif = maxX = FLT_MIN;
		for(i = 0 ; i < J_ORDER; i++){
			Xold[i] = X[i];
			X[i] = (MB[i] - sum[i]); // Novo X
			
			cmpAux1 = fabs(X[i] - Xold[i]);
			if(cmpAux1 > maxDif)
				maxDif = cmpAux1;
			
			cmpAux2 = fabs(X[i]);
			if(cmpAux2 > maxX)
				maxX = cmpAux2;
		}
		
		Mr = maxDif / maxX; // Erro
		
		ite++; // Iteração
		
		/* Cópia do novo X para o device */
		cudaMemcpy(dev_X, X, J_ORDER*sizeof(float), cudaMemcpyHostToDevice);
		
	}
	
	/* Cálculo do resultado utilizando a linha de teste */
	float resultAux=0;
	for(j=0; j<J_ORDER; j++){
		resultAux += MAOriginal[j]*X[j];
	}
	
	/* Impressão do resultado formatado */
	printResults(ite, J_ROW_TEST, resultAux, MBOriginal);
	
	/* Liberação de memória */
	free(MA); free(MB); free(X); free(Xold); free(MAOriginal); free(sum);
	cudaFree(dev_MA); cudaFree(dev_MB); cudaFree(dev_X); cudaFree(dev_sum);
	
	return 0;
	
}


/*	void printMA(int J_ORDER, float *MA);
 *
 *   	Descricao:
 * 		Impressão da matriz MA para debug. 
 * 
 * 	Parametros de entrada:
 * 		-(int) J_ORDER: Ordem da matriz.
 * 		-(float) MA: matriz MA.
 * 
 * 	Parametros de saida: 
 * 		- 
 */		
void printMA(int J_ORDER, float *MA){
	int i,j;
	for(i = 0; i<J_ORDER; i++){
		for(j = 0; j<J_ORDER; j++){
			printf("%f ", MA[j*J_ORDER+i]);
		}
		printf("\n");
	}	
}

/*	void printMB(int J_ORDER, float *MB);
 *
 *   	Descricao:
 * 		Impressão do vator MB para debug. 
 * 
 * 	Parametros de entrada:
 * 		-(int) J_ORDER: Ordem dos vetores.
 * 		-(float) MB: Vetor MB.
 * 
 * 	Parametros de saida: 
 * 		- 
 */	
void printMB(int J_ORDER, float *MB){
	int i;
	for(i = 0; i<J_ORDER; i++){		
		printf("%f ", MB[i]);		
		printf("\n");
	}	
}

/*	void printX(int J_ORDER, float *X);
 *
 *   	Descricao:
 * 		Impressão do vator X para debug. 
 * 
 * 	Parametros de entrada:
 * 		-(int) J_ORDER: Ordem dos vetores.
 * 		-(float) X: Vetor X.
 * 
 * 	Parametros de saida: 
 * 		-
 */	
void printX(int J_ORDER, float *X){
	int i;
	for(i = 0; i<J_ORDER; i++){		
		printf("%f ", X[i]);		
		
	}	
	printf("\n");
}

/*	void printResults(int ite, int J_ROW_TEST, float result, float MB)
 * 
 *   	Descricao:
 * 		Impressão formatada dos resultados.
 * 
 * 	Parametros de entrada:
 * 		-(int) ite: Número de iterações obtido.
 * 		-(int) J_ROW_TEST: Linha de teste.
 * 		-(float) result: Resultado obtido.
 * 		-(float) MB: Resultado esperado.
 * 
 * 	Parametros de saida: 
 * 		-
 */
void printResults(int ite, int J_ROW_TEST, float result, float MB){
	printf("\n\n---------------------------------------------------------\n"
	"Iterations: %d\n"
	"RowTest: %d => [%f] =? %f\n"
	"---------------------------------------------------------\n\n", ite, J_ROW_TEST, result, MB);
}
	.file	"tmpxft_0039a4d7_00000000-6_jacobi-cuda.cudafe1.cpp"
	.text
#APP

#NO_APP
	.type	_ZL26__cudaUnregisterBinaryUtilv, @function
_ZL26__cudaUnregisterBinaryUtilv:
.LFB2034:
	.cfi_startproc
	endbr64
	movq	_ZL20__cudaFatCubinHandle(%rip), %rdi
	jmp	__cudaUnregisterFatBinary@PLT
	.cfi_endproc
.LFE2034:
	.size	_ZL26__cudaUnregisterBinaryUtilv, .-_ZL26__cudaUnregisterBinaryUtilv
	.section	.rodata.str1.1,"aMS",@progbits,1
.LC0:
	.string	"%f "
.LC1:
	.string	"\n"
	.text
	.globl	_Z7printMAiPf
	.type	_Z7printMAiPf, @function
_Z7printMAiPf:
.LFB2028:
	.cfi_startproc
	endbr64
	pushq	%r15
	.cfi_def_cfa_offset 16
	.cfi_offset 15, -16
	pushq	%r14
	.cfi_def_cfa_offset 24
	.cfi_offset 14, -24
	pushq	%r13
	.cfi_def_cfa_offset 32
	.cfi_offset 13, -32
	movslq	%edi, %r13
	pushq	%r12
	.cfi_def_cfa_offset 40
	.cfi_offset 12, -40
	leaq	0(,%r13,4), %r14
	movq	%rsi, %r12
	pushq	%rbp
	.cfi_def_cfa_offset 48
	.cfi_offset 6, -48
	movq	%r13, %rbp
	pushq	%rbx
	.cfi_def_cfa_offset 56
	.cfi_offset 3, -56
	xorl	%ebx, %ebx
	subq	$24, %rsp
	.cfi_def_cfa_offset 80
.L3:
	cmpl	%ebx, %ebp
	jle	.L9
	leaq	(%r12,%rbx,4), %rcx
	xorl	%r15d, %r15d
.L4:
	leaq	.LC0(%rip), %rsi
	movl	$2, %edi
	movb	$1, %al
	movq	%rcx, 8(%rsp)
	cvtss2sd	(%rcx), %xmm0
	call	__printf_chk@PLT
	movq	8(%rsp), %rcx
	incq	%r15
	addq	%r14, %rcx
	cmpq	%r15, %r13
	jne	.L4
	leaq	.LC1(%rip), %rsi
	movl	$2, %edi
	xorl	%eax, %eax
	incq	%rbx
	call	__printf_chk@PLT
	jmp	.L3
.L9:
	addq	$24, %rsp
	.cfi_def_cfa_offset 56
	popq	%rbx
	.cfi_def_cfa_offset 48
	popq	%rbp
	.cfi_def_cfa_offset 40
	popq	%r12
	.cfi_def_cfa_offset 32
	popq	%r13
	.cfi_def_cfa_offset 24
	popq	%r14
	.cfi_def_cfa_offset 16
	popq	%r15
	.cfi_def_cfa_offset 8
	ret
	.cfi_endproc
.LFE2028:
	.size	_Z7printMAiPf, .-_Z7printMAiPf
	.globl	_Z7printMBiPf
	.type	_Z7printMBiPf, @function
_Z7printMBiPf:
.LFB2029:
	.cfi_startproc
	endbr64
	pushq	%r13
	.cfi_def_cfa_offset 16
	.cfi_offset 13, -16
	leaq	.LC0(%rip), %r13
	pushq	%r12
	.cfi_def_cfa_offset 24
	.cfi_offset 12, -24
	movq	%rsi, %r12
	pushq	%rbp
	.cfi_def_cfa_offset 32
	.cfi_offset 6, -32
	movl	%edi, %ebp
	pushq	%rbx
	.cfi_def_cfa_offset 40
	.cfi_offset 3, -40
	xorl	%ebx, %ebx
	pushq	%rdx
	.cfi_def_cfa_offset 48
.L11:
	cmpl	%ebx, %ebp
	jle	.L14
	movq	%r13, %rsi
	movl	$2, %edi
	movb	$1, %al
	cvtss2sd	(%r12,%rbx,4), %xmm0
	call	__printf_chk@PLT
	movl	$2, %edi
	xorl	%eax, %eax
	incq	%rbx
	leaq	.LC1(%rip), %rsi
	call	__printf_chk@PLT
	jmp	.L11
.L14:
	popq	%rax
	.cfi_def_cfa_offset 40
	popq	%rbx
	.cfi_def_cfa_offset 32
	popq	%rbp
	.cfi_def_cfa_offset 24
	popq	%r12
	.cfi_def_cfa_offset 16
	popq	%r13
	.cfi_def_cfa_offset 8
	ret
	.cfi_endproc
.LFE2029:
	.size	_Z7printMBiPf, .-_Z7printMBiPf
	.globl	_Z6printXiPf
	.type	_Z6printXiPf, @function
_Z6printXiPf:
.LFB2030:
	.cfi_startproc
	endbr64
	pushq	%r13
	.cfi_def_cfa_offset 16
	.cfi_offset 13, -16
	leaq	.LC0(%rip), %r13
	pushq	%r12
	.cfi_def_cfa_offset 24
	.cfi_offset 12, -24
	movq	%rsi, %r12
	pushq	%rbp
	.cfi_def_cfa_offset 32
	.cfi_offset 6, -32
	movl	%edi, %ebp
	pushq	%rbx
	.cfi_def_cfa_offset 40
	.cfi_offset 3, -40
	xorl	%ebx, %ebx
	pushq	%rcx
	.cfi_def_cfa_offset 48
.L16:
	cmpl	%ebx, %ebp
	jle	.L19
	movq	%r13, %rsi
	movl	$2, %edi
	movb	$1, %al
	cvtss2sd	(%r12,%rbx,4), %xmm0
	call	__printf_chk@PLT
	incq	%rbx
	jmp	.L16
.L19:
	popq	%rdx
	.cfi_def_cfa_offset 40
	leaq	.LC1(%rip), %rsi
	popq	%rbx
	.cfi_def_cfa_offset 32
	movl	$2, %edi
	popq	%rbp
	.cfi_def_cfa_offset 24
	xorl	%eax, %eax
	popq	%r12
	.cfi_def_cfa_offset 16
	popq	%r13
	.cfi_def_cfa_offset 8
	jmp	__printf_chk@PLT
	.cfi_endproc
.LFE2030:
	.size	_Z6printXiPf, .-_Z6printXiPf
	.section	.rodata.str1.1
.LC2:
	.string	"\n\n---------------------------------------------------------\nIterations: %d\nRowTest: %d => [%f] =? %f\n---------------------------------------------------------\n\n"
	.text
	.globl	_Z12printResultsiiff
	.type	_Z12printResultsiiff, @function
_Z12printResultsiiff:
.LFB2031:
	.cfi_startproc
	endbr64
	movl	%edi, %edx
	movl	%esi, %ecx
	movl	$2, %edi
	movb	$2, %al
	leaq	.LC2(%rip), %rsi
	cvtss2sd	%xmm0, %xmm0
	cvtss2sd	%xmm1, %xmm1
	jmp	__printf_chk@PLT
	.cfi_endproc
.LFE2031:
	.size	_Z12printResultsiiff, .-_Z12printResultsiiff
	.globl	_Z28__device_stub__Z4diagPfS_S_iPfS_S_i
	.type	_Z28__device_stub__Z4diagPfS_S_iPfS_S_i, @function
_Z28__device_stub__Z4diagPfS_S_iPfS_S_i:
.LFB2056:
	.cfi_startproc
	endbr64
	subq	$152, %rsp
	.cfi_def_cfa_offset 160
	movq	%rdi, 24(%rsp)
	leaq	56(%rsp), %rdi
	movq	%rsi, 16(%rsp)
	leaq	68(%rsp), %rsi
	movq	%rdx, 8(%rsp)
	leaq	40(%rsp), %rdx
	movl	%ecx, 4(%rsp)
	leaq	48(%rsp), %rcx
	movq	%fs:40, %rax
	movq	%rax, 136(%rsp)
	xorl	%eax, %eax
	leaq	24(%rsp), %rax
	movl	$1, 64(%rsp)
	movq	%rax, 104(%rsp)
	leaq	16(%rsp), %rax
	movq	%rax, 112(%rsp)
	leaq	8(%rsp), %rax
	movq	%rax, 120(%rsp)
	leaq	4(%rsp), %rax
	movq	%rax, 128(%rsp)
	movabsq	$4294967297, %rax
	movq	%rax, 56(%rsp)
	movq	%rax, 68(%rsp)
	movl	$1, 76(%rsp)
	call	__cudaPopCallConfiguration@PLT
	testl	%eax, %eax
	jne	.L21
	pushq	48(%rsp)
	.cfi_def_cfa_offset 168
	leaq	_Z4diagPfS_S_i(%rip), %rdi
	pushq	48(%rsp)
	.cfi_def_cfa_offset 176
	movq	84(%rsp), %rcx
	movl	92(%rsp), %r8d
	movq	72(%rsp), %rsi
	movl	80(%rsp), %edx
	leaq	120(%rsp), %r9
	call	cudaLaunchKernel@PLT
	popq	%rax
	.cfi_def_cfa_offset 168
	popq	%rdx
	.cfi_def_cfa_offset 160
.L21:
	movq	136(%rsp), %rax
	subq	%fs:40, %rax
	je	.L23
	call	__stack_chk_fail@PLT
.L23:
	addq	$152, %rsp
	.cfi_def_cfa_offset 8
	ret
	.cfi_endproc
.LFE2056:
	.size	_Z28__device_stub__Z4diagPfS_S_iPfS_S_i, .-_Z28__device_stub__Z4diagPfS_S_iPfS_S_i
	.globl	_Z4diagPfS_S_i
	.type	_Z4diagPfS_S_i, @function
_Z4diagPfS_S_i:
.LFB2057:
	.cfi_startproc
	endbr64
	jmp	_Z28__device_stub__Z4diagPfS_S_iPfS_S_i
	.cfi_endproc
.LFE2057:
	.size	_Z4diagPfS_S_i, .-_Z4diagPfS_S_i
	.globl	_Z30__device_stub__Z6jacobiPfS_iS_PfS_iS_
	.type	_Z30__device_stub__Z6jacobiPfS_iS_PfS_iS_, @function
_Z30__device_stub__Z6jacobiPfS_iS_PfS_iS_:
.LFB2058:
	.cfi_startproc
	endbr64
	subq	$152, %rsp
	.cfi_def_cfa_offset 160
	movq	%rdi, 24(%rsp)
	leaq	56(%rsp), %rdi
	movq	%rsi, 16(%rsp)
	leaq	68(%rsp), %rsi
	movl	%edx, 12(%rsp)
	leaq	40(%rsp), %rdx
	movq	%rcx, (%rsp)
	leaq	48(%rsp), %rcx
	movq	%fs:40, %rax
	movq	%rax, 136(%rsp)
	xorl	%eax, %eax
	leaq	24(%rsp), %rax
	movl	$1, 64(%rsp)
	movq	%rax, 104(%rsp)
	leaq	16(%rsp), %rax
	movq	%rax, 112(%rsp)
	leaq	12(%rsp), %rax
	movq	%rax, 120(%rsp)
	movq	%rsp, %rax
	movq	%rax, 128(%rsp)
	movabsq	$4294967297, %rax
	movq	%rax, 56(%rsp)
	movq	%rax, 68(%rsp)
	movl	$1, 76(%rsp)
	call	__cudaPopCallConfiguration@PLT
	testl	%eax, %eax
	jne	.L26
	pushq	48(%rsp)
	.cfi_def_cfa_offset 168
	leaq	_Z6jacobiPfS_iS_(%rip), %rdi
	pushq	48(%rsp)
	.cfi_def_cfa_offset 176
	movq	84(%rsp), %rcx
	movl	92(%rsp), %r8d
	movq	72(%rsp), %rsi
	movl	80(%rsp), %edx
	leaq	120(%rsp), %r9
	call	cudaLaunchKernel@PLT
	popq	%rax
	.cfi_def_cfa_offset 168
	popq	%rdx
	.cfi_def_cfa_offset 160
.L26:
	movq	136(%rsp), %rax
	subq	%fs:40, %rax
	je	.L28
	call	__stack_chk_fail@PLT
.L28:
	addq	$152, %rsp
	.cfi_def_cfa_offset 8
	ret
	.cfi_endproc
.LFE2058:
	.size	_Z30__device_stub__Z6jacobiPfS_iS_PfS_iS_, .-_Z30__device_stub__Z6jacobiPfS_iS_PfS_iS_
	.globl	_Z6jacobiPfS_iS_
	.type	_Z6jacobiPfS_iS_, @function
_Z6jacobiPfS_iS_:
.LFB2059:
	.cfi_startproc
	endbr64
	jmp	_Z30__device_stub__Z6jacobiPfS_iS_PfS_iS_
	.cfi_endproc
.LFE2059:
	.size	_Z6jacobiPfS_iS_, .-_Z6jacobiPfS_iS_
	.section	.rodata.str1.1
.LC6:
	.string	"File error"
.LC7:
	.string	"r"
.LC8:
	.string	"%d%d%f%f"
.LC9:
	.string	"%f"
	.section	.text.startup,"ax",@progbits
	.globl	main
	.type	main, @function
main:
.LFB2027:
	.cfi_startproc
	endbr64
	pushq	%r15
	.cfi_def_cfa_offset 16
	.cfi_offset 15, -16
	pushq	%r14
	.cfi_def_cfa_offset 24
	.cfi_offset 14, -24
	pushq	%r13
	.cfi_def_cfa_offset 32
	.cfi_offset 13, -32
	pushq	%r12
	.cfi_def_cfa_offset 40
	.cfi_offset 12, -40
	pushq	%rbp
	.cfi_def_cfa_offset 48
	.cfi_offset 6, -48
	pushq	%rbx
	.cfi_def_cfa_offset 56
	.cfi_offset 3, -56
	subq	$120, %rsp
	.cfi_def_cfa_offset 176
	movq	%fs:40, %rax
	movq	%rax, 104(%rsp)
	xorl	%eax, %eax
	decl	%edi
	jg	.L32
.L33:
	movq	stderr(%rip), %rsi
	leaq	.LC6(%rip), %rdi
	call	fputs@PLT
	movl	$1, %edi
	call	exit@PLT
.L32:
	movq	8(%rsi), %rdi
	leaq	.LC7(%rip), %rsi
	call	fopen@PLT
	movq	%rax, %r12
	testq	%rax, %rax
	je	.L33
	leaq	36(%rsp), %rcx
	leaq	32(%rsp), %rdx
	movq	%rax, %rdi
	xorl	%eax, %eax
	leaq	44(%rsp), %r9
	leaq	40(%rsp), %r8
	leaq	.LC8(%rip), %rsi
	call	__isoc23_fscanf@PLT
	movslq	32(%rsp), %r15
	movq	%r15, %rdi
	imulq	%r15, %rdi
	salq	$2, %r15
	salq	$2, %rdi
	call	malloc@PLT
	movq	%r15, %rdi
	movq	%rax, %r13
	call	malloc@PLT
	movq	%r15, %rdi
	movq	%rax, %r14
	call	malloc@PLT
	movq	%r15, %rdi
	movq	%rax, %rbp
	call	malloc@PLT
	movq	%r15, %rdi
	movq	%rax, %rbx
	call	malloc@PLT
	movq	%r15, %rdi
	xorl	%r15d, %r15d
	movq	%rax, 8(%rsp)
	call	malloc@PLT
	movq	%rax, (%rsp)
.L34:
	cmpl	%r15d, 32(%rsp)
	jle	.L62
	xorl	%r9d, %r9d
.L37:
	movl	32(%rsp), %eax
	movl	%r9d, %ecx
	cmpl	%r9d, %eax
	jle	.L63
	imull	%r9d, %eax
	leaq	.LC9(%rip), %rsi
	movq	%r12, %rdi
	movl	%ecx, 28(%rsp)
	movq	%r9, 16(%rsp)
	addl	%r15d, %eax
	cltq
	leaq	0(%r13,%rax,4), %rdx
	xorl	%eax, %eax
	call	__isoc23_fscanf@PLT
	cmpl	%r15d, 36(%rsp)
	movq	16(%rsp), %r9
	movl	28(%rsp), %ecx
	jne	.L35
	imull	32(%rsp), %ecx
	addl	%r15d, %ecx
	movslq	%ecx, %rcx
	movss	0(%r13,%rcx,4), %xmm0
	movss	%xmm0, (%r14,%r9,4)
.L35:
	incq	%r9
	jmp	.L37
.L63:
	incl	%r15d
	jmp	.L34
.L62:
	movq	%rbp, %rdx
	xorl	%r15d, %r15d
.L38:
	cmpl	%r15d, 32(%rsp)
	jle	.L64
	xorl	%eax, %eax
	leaq	.LC9(%rip), %rsi
	movq	%r12, %rdi
	movq	%rdx, 16(%rsp)
	call	__isoc23_fscanf@PLT
	cmpl	%r15d, 36(%rsp)
	movq	16(%rsp), %rdx
	jne	.L39
	movss	(%rdx), %xmm5
	movss	%xmm5, 24(%rsp)
.L39:
	incl	%r15d
	addq	$4, %rdx
	jmp	.L38
.L64:
	movq	%r12, %rdi
	call	fclose@PLT
	movl	32(%rsp), %esi
	leaq	48(%rsp), %rdi
	imull	%esi, %esi
	movslq	%esi, %rsi
	salq	$2, %rsi
	call	cudaMalloc@PLT
	movslq	32(%rsp), %rsi
	leaq	56(%rsp), %rdi
	salq	$2, %rsi
	call	cudaMalloc@PLT
	movslq	32(%rsp), %rsi
	leaq	64(%rsp), %rdi
	salq	$2, %rsi
	call	cudaMalloc@PLT
	movslq	32(%rsp), %rsi
	leaq	72(%rsp), %rdi
	salq	$2, %rsi
	call	cudaMalloc@PLT
	movl	32(%rsp), %edx
	movq	48(%rsp), %rdi
	movq	%r13, %rsi
	movl	$1, %ecx
	imull	%edx, %edx
	movslq	%edx, %rdx
	salq	$2, %rdx
	call	cudaMemcpy@PLT
	movslq	32(%rsp), %rdx
	movq	56(%rsp), %rdi
	movq	%rbp, %rsi
	movl	$1, %ecx
	salq	$2, %rdx
	call	cudaMemcpy@PLT
	movslq	32(%rsp), %rdx
	movq	64(%rsp), %rdi
	movq	%rbx, %rsi
	movl	$1, %ecx
	salq	$2, %rdx
	call	cudaMemcpy@PLT
	movl	32(%rsp), %eax
	xorl	%r9d, %r9d
	xorl	%r8d, %r8d
	movl	$16777217, %edx
	movl	$1, %ecx
	movl	$1, 100(%rsp)
	movl	%eax, 80(%rsp)
	salq	$8, %rdx
	movabsq	$4294967297, %rax
	movq	%rax, 84(%rsp)
	movq	80(%rsp), %rdi
	movl	88(%rsp), %esi
	movq	%rdx, 92(%rsp)
	call	__cudaPushCallConfiguration@PLT
	testl	%eax, %eax
	jne	.L41
	movl	32(%rsp), %ecx
	movq	64(%rsp), %rdx
	movq	56(%rsp), %rsi
	movq	48(%rsp), %rdi
	call	_Z28__device_stub__Z4diagPfS_S_iPfS_S_i
.L41:
	movslq	32(%rsp), %rdx
	movq	56(%rsp), %rsi
	movq	%rbp, %rdi
	xorl	%r12d, %r12d
	movl	$2, %ecx
	salq	$2, %rdx
	call	cudaMemcpy@PLT
	movslq	32(%rsp), %rdx
	movq	64(%rsp), %rsi
	movq	%rbx, %rdi
	movl	$2, %ecx
	salq	$2, %rdx
	call	cudaMemcpy@PLT
	movss	.LC4(%rip), %xmm1
.L42:
	cvtsi2ssl	%r12d, %xmm0
	movss	44(%rsp), %xmm2
	movl	32(%rsp), %edx
	comiss	%xmm0, %xmm2
	jbe	.L60
	comiss	40(%rsp), %xmm1
	jbe	.L60
	movl	$16777217, %eax
	movl	%edx, 80(%rsp)
	xorl	%r9d, %r9d
	xorl	%r8d, %r8d
	movabsq	$4294967297, %rcx
	salq	$8, %rax
	movl	$1, 100(%rsp)
	movq	%rcx, 84(%rsp)
	movq	80(%rsp), %rdi
	movq	%rax, %rdx
	movl	$1, %ecx
	movl	88(%rsp), %esi
	movq	%rax, 92(%rsp)
	call	__cudaPushCallConfiguration@PLT
	testl	%eax, %eax
	jne	.L43
	movq	72(%rsp), %rcx
	movl	32(%rsp), %edx
	movq	64(%rsp), %rsi
	movq	48(%rsp), %rdi
	call	_Z30__device_stub__Z6jacobiPfS_iS_PfS_iS_
.L43:
	movslq	32(%rsp), %rdx
	movq	72(%rsp), %rsi
	movl	$2, %ecx
	movq	(%rsp), %rdi
	salq	$2, %rdx
	call	cudaMemcpy@PLT
	movss	.LC3(%rip), %xmm2
	movslq	32(%rsp), %rdx
	xorl	%eax, %eax
	movaps	%xmm2, %xmm1
.L44:
	cmpl	%eax, %edx
	jle	.L65
	movss	(%rbx,%rax,4), %xmm4
	movq	8(%rsp), %rcx
	movss	0(%rbp,%rax,4), %xmm0
	movss	%xmm4, (%rcx,%rax,4)
	movq	(%rsp), %rcx
	subss	(%rcx,%rax,4), %xmm0
	movaps	%xmm0, %xmm3
	movss	%xmm0, (%rbx,%rax,4)
	andps	.LC10(%rip), %xmm0
	incq	%rax
	subss	%xmm4, %xmm3
	andps	.LC10(%rip), %xmm3
	maxss	%xmm2, %xmm0
	maxss	%xmm1, %xmm3
	movaps	%xmm0, %xmm2
	movaps	%xmm3, %xmm1
	jmp	.L44
.L65:
	divss	%xmm2, %xmm1
	movq	64(%rsp), %rdi
	salq	$2, %rdx
	movq	%rbx, %rsi
	movl	$1, %ecx
	incl	%r12d
	movss	%xmm1, 16(%rsp)
	call	cudaMemcpy@PLT
	movss	16(%rsp), %xmm1
	jmp	.L42
.L60:
	xorl	%eax, %eax
	xorps	%xmm0, %xmm0
.L51:
	cmpl	%eax, %edx
	jle	.L66
	movss	(%r14,%rax,4), %xmm1
	mulss	(%rbx,%rax,4), %xmm1
	incq	%rax
	addss	%xmm1, %xmm0
	jmp	.L51
.L66:
	movss	24(%rsp), %xmm1
	movl	36(%rsp), %esi
	movl	%r12d, %edi
	call	_Z12printResultsiiff
	movq	%r13, %rdi
	call	free@PLT
	movq	%rbp, %rdi
	call	free@PLT
	movq	%rbx, %rdi
	call	free@PLT
	movq	8(%rsp), %rdi
	call	free@PLT
	movq	%r14, %rdi
	call	free@PLT
	movq	(%rsp), %rdi
	call	free@PLT
	movq	48(%rsp), %rdi
	call	cudaFree@PLT
	movq	56(%rsp), %rdi
	call	cudaFree@PLT
	movq	64(%rsp), %rdi
	call	cudaFree@PLT
	movq	72(%rsp), %rdi
	call	cudaFree@PLT
	movq	104(%rsp), %rax
	subq	%fs:40, %rax
	je	.L53
	call	__stack_chk_fail@PLT
.L53:
	addq	$120, %rsp
	.cfi_def_cfa_offset 56
	xorl	%eax, %eax
	popq	%rbx
	.cfi_def_cfa_offset 48
	popq	%rbp
	.cfi_def_cfa_offset 40
	popq	%r12
	.cfi_def_cfa_offset 32
	popq	%r13
	.cfi_def_cfa_offset 24
	popq	%r14
	.cfi_def_cfa_offset 16
	popq	%r15
	.cfi_def_cfa_offset 8
	ret
	.cfi_endproc
.LFE2027:
	.size	main, .-main
	.section	.rodata.str1.1
.LC11:
	.string	"_Z6jacobiPfS_iS_"
.LC12:
	.string	"_Z4diagPfS_S_i"
	.section	.text.startup
	.type	_ZL24__sti____cudaRegisterAllv, @function
_ZL24__sti____cudaRegisterAllv:
.LFB2061:
	.cfi_startproc
	endbr64
	pushq	%rbx
	.cfi_def_cfa_offset 16
	.cfi_offset 3, -16
	leaq	_ZL15__fatDeviceText(%rip), %rdi
	call	__cudaRegisterFatBinary@PLT
	pushq	$0
	.cfi_def_cfa_offset 24
	xorl	%r9d, %r9d
	orl	$-1, %r8d
	pushq	$0
	.cfi_def_cfa_offset 32
	leaq	.LC11(%rip), %rdx
	movq	%rax, %rdi
	movq	%rax, %rbx
	pushq	$0
	.cfi_def_cfa_offset 40
	movq	%rdx, %rcx
	leaq	_Z6jacobiPfS_iS_(%rip), %rsi
	pushq	$0
	.cfi_def_cfa_offset 48
	movq	%rax, _ZL20__cudaFatCubinHandle(%rip)
	call	__cudaRegisterFunction@PLT
	addq	$32, %rsp
	.cfi_def_cfa_offset 16
	movq	%rbx, %rdi
	xorl	%r9d, %r9d
	pushq	$0
	.cfi_def_cfa_offset 24
	leaq	.LC12(%rip), %rdx
	orl	$-1, %r8d
	leaq	_Z4diagPfS_S_i(%rip), %rsi
	pushq	$0
	.cfi_def_cfa_offset 32
	movq	%rdx, %rcx
	pushq	$0
	.cfi_def_cfa_offset 40
	pushq	$0
	.cfi_def_cfa_offset 48
	call	__cudaRegisterFunction@PLT
	movq	_ZL20__cudaFatCubinHandle(%rip), %rdi
	addq	$32, %rsp
	.cfi_def_cfa_offset 16
	call	__cudaRegisterFatBinaryEnd@PLT
	leaq	_ZL26__cudaUnregisterBinaryUtilv(%rip), %rdi
	popq	%rbx
	.cfi_def_cfa_offset 8
	jmp	atexit@PLT
	.cfi_endproc
.LFE2061:
	.size	_ZL24__sti____cudaRegisterAllv, .-_ZL24__sti____cudaRegisterAllv
	.section	.init_array,"aw"
	.align 8
	.quad	_ZL24__sti____cudaRegisterAllv
	.section	.nvFatBinSegment,"aw"
	.align 8
	.type	_ZL15__fatDeviceText, @object
	.size	_ZL15__fatDeviceText, 24
_ZL15__fatDeviceText:
	.long	1180844977
	.long	1
	.quad	fatbinData
	.quad	0
	.local	_ZL20__cudaFatCubinHandle
	.comm	_ZL20__cudaFatCubinHandle,8,8
	.section	.rodata.cst4,"aM",@progbits,4
	.align 4
.LC3:
	.long	8388608
	.align 4
.LC4:
	.long	2139095039
	.section	.rodata.cst16,"aM",@progbits,16
	.align 16
.LC10:
	.long	2147483647
	.long	0
	.long	0
	.long	0
	.ident	"GCC: (Ubuntu 13.3.0-6ubuntu2~24.04) 13.3.0"
	.section	.note.GNU-stack,"",@progbits
	.section	.note.gnu.property,"a"
	.align 8
	.long	1f - 0f
	.long	4f - 1f
	.long	5
0:
	.string	"GNU"
1:
	.align 8
	.long	0xc0000002
	.long	3f - 2f
2:
	.long	0x3
3:
	.align 8
4:

/**
 * 	Instituto de Ciencias Matematicas e de Computacao - USP Sao Carlos
 * 
 * 	Programacao Concorrente 2013
 *	Grupo 05 Turma A
 *
 *	Andre Luiz Catini Paro, 	7152740 
 * 	Daniel Hideki Yoshimi,		7239173
 * 	Rodrigo Toledo Amancio Silva,	7152308
 * 
 * 	Projeto Final - Metodo Jacobi-Richardson em CUDA
 *
 *	Este programa resolve sistema lineares utilizando o método de 
 * 	Jacobi-Richardson. O método é implementado de forma paralela 
 * 	utilizando a plataforma CUDA.
 * 
 * 	Ele retorna as seguintes informações:
 * 		-Quantidades de iterações;
 * 		-Comparação entre o resultado utilizando o valor obtido
 * 		aplicado em uma linha de testes com o valor real.
 * 
 */


#include <hip/hip_runtime.h>
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <float.h>

#define TPB 256

/* Declarações de parâmetros */
void printMA(int J_ORDER, float *MA); // Função para debug. Imprime a matrix MA.
void printMB(int J_ORDER, float *MB); // Função para debug. Imprime o vetor MB.
void printX(int J_ORDER, float *X); // Função para debug. Imprime o vetor X.
void printResults(int ite, int J_ROW_TEST, float result, float MB); // Apresenta os resultados formatados.

/*	__global__ void diag(float *dev_MA, float *dev_MB, float *dev_X, int J_ORDER);
 * 
 * 	Descricao:
 * 		Esta função realiza o cálculo da matriz MA* e do vetor MB*, além de atribuir
 * 		o valor inicial para o vetor X. O retorno da função se dá em modificar os próprios
 * 		parâmetros de entrada.
 * 		Cada linha da matriz MA é calculada em um bloco e cada coluna dessa linha é calculada
 * 		pelas threads desse bloco.
 * 
 * 	Parametros de entrada:
 * 		-(float) dev_MA: Matriz MA alocada da memória da GPU.
 * 		-(float) dev_MB: Vetor MB alocado na memória da GPU.
 * 		-(float) dev_X: Vetor X alocado na memória da GPU.
 * 		-(int) J_ORDER: Ordem dos vetores.
 * 
 * 	Parametros de saida:
 * 		- 
 * 		
 */
__global__ void diag(float *dev_MA, float *dev_MB, float *dev_X, int J_ORDER){

	int bid = blockIdx.x; 	// Id do bloco.
	int tid = threadIdx.x; 	// Id da thread.
	
	/* Condição para evitar erros. Impede que blocos e threads executem o código fora do nosso controle. */
	if(bid < J_ORDER && tid < J_ORDER){
		
		/* Declaração e atribuição da variável auxiliar que irá armazenar o valor da diagonal na linha "bid" */
		int diagAux; 		
		diagAux = dev_MA[bid*J_ORDER+bid];
		
		/* Para cada linha calculada em um bloco (bId), as threads desse bloco irão calcular o valor de cada coluna */
		while(tid<J_ORDER){
			
			if(bid!=tid){
				dev_MA[tid*J_ORDER+bid] = dev_MA[tid*J_ORDER+bid]/diagAux;
			} else{
				dev_MA[tid*J_ORDER+bid] = 0;
			}		
			
			/* Incremento o tId para que todas as colunas sejam calculadas, já que cada bloco não executa mais que 512 threads */
			tid += TPB;
		}
		
		/* Espero todas as threads do block bId executarem os seus cálculos e atribuo a saída nos parâmetros de entrada */
		__syncthreads();
		dev_MB[bid] = dev_MB[bid] / diagAux;
		dev_X[bid] = dev_MB[bid];			
	}	
}

/*	__global__ void jacobi(float *dev_MA, float *dev_X, int J_ORDER, float *dev_sum);
 * 
 *   	Descricao:
 * 		Esta função realiza o cálculo do somatório presente no algoritmo. Para isso, utilizamos 
 * 		a seguinte abordagem: cada linha a ser multiplicada e somada é controlada por um bloco (bId),
 * 		cada uma das colunas dessa linha é controlada por uma thread (tId). Cada thread irá realizar
 * 		o cálculo das colunas de posição tId e tId+TPB (threads per block). Assim, caso a matriz tenha
 * 		mais que 512 colunas, todas elas serão calculadas. O somatório de cada thread será salvo numa
 * 		posição do cache compartilhado. Por fim, realizamos uma redução desse cache compartilhado, salvando
 * 		o resultado final (o somatório da linha), na sua posição referente em dev_sum.
 * 
 * 	Parametros de entrada:
 * 		-(float) dev_MA: Matriz MA alocada da memória da GPU.
 * 		-(float) dev_MB: Vetor MB alocado na memória da GPU.
 * 		-(float) dev_X: Vetor X alocado na memória da GPU.
 * 		-(int) J_ORDER: Ordem dos vetores.
 * 		-(float) dev_sum: Vetor que armazenará os somatórios
 * 
 * 	Parametros de saida:
 * 		-
 * 
 */
__global__ void jacobi(float *dev_MA, float *dev_X, int J_ORDER, float *dev_sum){
	
	int bId = blockIdx.x; // Id do bloco.
	int tId = threadIdx.x; // Id da thread.
	int cacheIndex = threadIdx.x; // Indice do cache da thread.
	float temp = 0; // Variável auxiliar que irá armazenar o somatório de cada thread.
	
	__shared__ float cache[TPB]; // Cache compartilhado que irá armazenar o somatório de cada thread, utilizado na posterior redução.
	cache[cacheIndex] = 0; // Atribuição inicial.
	
	/* Condição para evitar erros. Impede que blocos e threads executem o código fora do nosso controle. */
	if(bId < J_ORDER && tId < J_ORDER){
		
		/* Para cada linha (bId) da Matriz, as threads desse bloco irão seus respectivos somatórios */
		while(tId < J_ORDER){
			if(bId!=tId){
				temp += (dev_MA[(tId * J_ORDER) + bId] * dev_X[tId]);
			}
			
			tId += TPB;
		}
		
		/* Salvo o somatório de cada thread na sua posição respectiva do cache e aguardo todas as threads terminarem os seus cálculos */
		cache[cacheIndex] = temp;
		__syncthreads();
		
		/* Redução em paralelo */
		int i = TPB/2;
		while(i != 0){
			if(cacheIndex < i )
				cache[cacheIndex] += cache[cacheIndex + i];
			
			__syncthreads();
			i /= 2;
		}
		
		/* A thread 0 irá realizar a atribuição do valor final. */
		if(cacheIndex == 0){
			dev_sum[bId] = cache[0];			
		}
	}
}

/*	int main(int argc, char * argv[]);
 * 
 * 	Descricao:
 * 		Na main é realizada a leitura do arquivo de entrada bem como a declaração, alocação de memória
 * 		das variáveis envolvidas e a comunidação entre host e device.
 * 		Primeiramente o kernel diag é chamado para realizar o cálculo de MA* e MB*, bem como a atribuição inicial de X.
 * 		Então, uma estrutura de repetição irá realizar chamadas ao kernel jacobi para que o somatório seja realizado na gpu.
 * 		O somatório é copiado para o host e a atribuição do novo valor de X é feita, bem como o cálculo do erro. A estrutura 
 * 		de repetição para se ela atingir o número máximo de iterações ou o erro mínimo.
 * 
 * 	Parametros de entrada:
 * 		- argc: Quantidade de parametros de entrada junto a execucao do programa.
 * 		- argv: Array contendo strings com cada parametro de entrada.
 * 
 * 	Parametros de saida:
 * 		- (int): Retorna 0 caso o programa seja executado com sucesso. 
 */
int main(int argc, char * argv[]){
			
	//ENTRADA
	FILE * pFile; // Variavel para a abertura do arquivo de entrada.
	/* Abertura do arquivo de entrada */
	if((argc < 2) || (pFile = fopen(argv[1],"r")) == NULL){
		fputs ("File error",stderr); exit (1);
	}
	
	int i,j; // Variavel de controle para as estrutudas de repeticao.
	
	/* Parâmetros de entrada */
	int J_ORDER, J_ROW_TEST;
	float J_ERROR, J_ITE_MAX;	

	fscanf(pFile, "%d%d%f%f", &J_ORDER, &J_ROW_TEST, &J_ERROR, &J_ITE_MAX);	
	
	/* Declaração e alocamento das variáveis do host */
	float *MA, *MB, *X, *Xold, *MAOriginal, MBOriginal, *sum;		
	MA = 		(float*)malloc(sizeof(float)*J_ORDER*J_ORDER);
	MAOriginal = 	(float*)malloc(sizeof(float)*J_ORDER);	
	MB = 		(float*)malloc(sizeof(float)*J_ORDER);
	X = 		(float*)malloc(sizeof(float)*J_ORDER);
	Xold = 		(float*)malloc(sizeof(float)*J_ORDER);
	sum = 		(float*)malloc(sizeof(float)*J_ORDER);
	
	/* Leitura do arquivo de entrada */
	for(i = 0; i<J_ORDER; i++){		
		for(j = 0; j<J_ORDER; j++){
			fscanf(pFile, "%f", &MA[j*J_ORDER+i]);
			if(i==J_ROW_TEST)
				MAOriginal[j] = MA[j*J_ORDER+i];
		}
	}	
		
	for(i=0; i<J_ORDER; i++){
		fscanf(pFile, "%f", &MB[i]);
		if(i == J_ROW_TEST)
			MBOriginal = MB[i];		
	}
	
	fclose(pFile);

	/* Declaração e alocamento das variáveis do device */
	float *dev_MA, *dev_MB, *dev_X, *dev_sum;	
	hipMalloc( (void**)&dev_MA, J_ORDER*J_ORDER*sizeof(float));
	hipMalloc( (void**)&dev_MB, J_ORDER*sizeof(float));
	hipMalloc( (void**)&dev_X, J_ORDER*sizeof(float));
	hipMalloc( (void**)&dev_sum, J_ORDER*sizeof(float));
	
	/* Cópia de valores do host para o device */
	hipMemcpy(dev_MA, MA, J_ORDER*J_ORDER*sizeof(float), hipMemcpyHostToDevice);
	hipMemcpy(dev_MB, MB, J_ORDER*sizeof(float), hipMemcpyHostToDevice);
	hipMemcpy(dev_X, X, J_ORDER*sizeof(float), hipMemcpyHostToDevice);

	/* Chamada ao kernel diag
	* Blocos: J_ORDER - cada bloco cuida de uma linha
	* Threads: TPB - cada thread cuida de uma colunas		 * 
	*/
	diag<<<J_ORDER , TPB>>>(dev_MA, dev_MB, dev_X, J_ORDER); // OK
	
	/* Cópia dos valores de MB* e X do device para o host */
	hipMemcpy(MB, dev_MB, J_ORDER*sizeof(float), hipMemcpyDeviceToHost);
	hipMemcpy(X, dev_X, J_ORDER*sizeof(float), hipMemcpyDeviceToHost);
	
	/* Variáveis auxiliáres para o cálculo de X */
	int ite = 0;
	float maxDif, maxX, Mr;	
	Mr = FLT_MAX;
		
	float cmpAux1, cmpAux2;
	/* Estrutura de repetição que irá realizar chamadas ao quernel jacobi, calcular o novo valor de X e o erro */
	while(ite < J_ITE_MAX && Mr > J_ERROR){
		
		/* Chamada ao kernel jacobi
		 * Blocos: J_ORDER - cada bloco cuida de uma linha
		 * Threads: TPB - cada thread cuida de uma colunas		 * 
		 */
		jacobi<<<J_ORDER , TPB>>>(dev_MA, dev_X, J_ORDER, dev_sum);
		
		/* Cópia dos valores do somatório do device para o host */
		hipMemcpy(sum, dev_sum, J_ORDER*sizeof(float), hipMemcpyDeviceToHost);
		
		/* Cálculo do novo X e do erro */
		maxDif = maxX = FLT_MIN;
		for(i = 0 ; i < J_ORDER; i++){
			Xold[i] = X[i];
			X[i] = (MB[i] - sum[i]); // Novo X
			
			cmpAux1 = fabs(X[i] - Xold[i]);
			if(cmpAux1 > maxDif)
				maxDif = cmpAux1;
			
			cmpAux2 = fabs(X[i]);
			if(cmpAux2 > maxX)
				maxX = cmpAux2;
		}
		
		Mr = maxDif / maxX; // Erro
		
		ite++; // Iteração
		
		/* Cópia do novo X para o device */
		hipMemcpy(dev_X, X, J_ORDER*sizeof(float), hipMemcpyHostToDevice);
		
	}
	
	/* Cálculo do resultado utilizando a linha de teste */
	float resultAux=0;
	for(j=0; j<J_ORDER; j++){
		resultAux += MAOriginal[j]*X[j];
	}
	
	/* Impressão do resultado formatado */
	printResults(ite, J_ROW_TEST, resultAux, MBOriginal);
	
	/* Liberação de memória */
	free(MA); free(MB); free(X); free(Xold); free(MAOriginal); free(sum);
	hipFree(dev_MA); hipFree(dev_MB); hipFree(dev_X); hipFree(dev_sum);
	
	return 0;
	
}


/*	void printMA(int J_ORDER, float *MA);
 *
 *   	Descricao:
 * 		Impressão da matriz MA para debug. 
 * 
 * 	Parametros de entrada:
 * 		-(int) J_ORDER: Ordem da matriz.
 * 		-(float) MA: matriz MA.
 * 
 * 	Parametros de saida: 
 * 		- 
 */		
void printMA(int J_ORDER, float *MA){
	int i,j;
	for(i = 0; i<J_ORDER; i++){
		for(j = 0; j<J_ORDER; j++){
			printf("%f ", MA[j*J_ORDER+i]);
		}
		printf("\n");
	}	
}

/*	void printMB(int J_ORDER, float *MB);
 *
 *   	Descricao:
 * 		Impressão do vator MB para debug. 
 * 
 * 	Parametros de entrada:
 * 		-(int) J_ORDER: Ordem dos vetores.
 * 		-(float) MB: Vetor MB.
 * 
 * 	Parametros de saida: 
 * 		- 
 */	
void printMB(int J_ORDER, float *MB){
	int i;
	for(i = 0; i<J_ORDER; i++){		
		printf("%f ", MB[i]);		
		printf("\n");
	}	
}

/*	void printX(int J_ORDER, float *X);
 *
 *   	Descricao:
 * 		Impressão do vator X para debug. 
 * 
 * 	Parametros de entrada:
 * 		-(int) J_ORDER: Ordem dos vetores.
 * 		-(float) X: Vetor X.
 * 
 * 	Parametros de saida: 
 * 		-
 */	
void printX(int J_ORDER, float *X){
	int i;
	for(i = 0; i<J_ORDER; i++){		
		printf("%f ", X[i]);		
		
	}	
	printf("\n");
}

/*	void printResults(int ite, int J_ROW_TEST, float result, float MB)
 * 
 *   	Descricao:
 * 		Impressão formatada dos resultados.
 * 
 * 	Parametros de entrada:
 * 		-(int) ite: Número de iterações obtido.
 * 		-(int) J_ROW_TEST: Linha de teste.
 * 		-(float) result: Resultado obtido.
 * 		-(float) MB: Resultado esperado.
 * 
 * 	Parametros de saida: 
 * 		-
 */
void printResults(int ite, int J_ROW_TEST, float result, float MB){
	printf("\n\n---------------------------------------------------------\n"
	"Iterations: %d\n"
	"RowTest: %d => [%f] =? %f\n"
	"---------------------------------------------------------\n\n", ite, J_ROW_TEST, result, MB);
}
	.text
	.file	"jacobi-cuda.hip"
	.globl	_Z19__device_stub__diagPfS_S_i  # -- Begin function _Z19__device_stub__diagPfS_S_i
	.type	_Z19__device_stub__diagPfS_S_i,@function
_Z19__device_stub__diagPfS_S_i:         # @_Z19__device_stub__diagPfS_S_i
	.cfi_startproc
# %bb.0:
	pushq	%r15
	.cfi_def_cfa_offset 16
	pushq	%r14
	.cfi_def_cfa_offset 24
	pushq	%r13
	.cfi_def_cfa_offset 32
	pushq	%r12
	.cfi_def_cfa_offset 40
	pushq	%rbx
	.cfi_def_cfa_offset 48
	subq	$112, %rsp
	.cfi_def_cfa_offset 160
	.cfi_offset %rbx, -48
	.cfi_offset %r12, -40
	.cfi_offset %r13, -32
	.cfi_offset %r14, -24
	.cfi_offset %r15, -16
	leaq	40(%rsp), %rax
	movq	%rdi, (%rax)
	leaq	32(%rsp), %rdi
	movq	%rsi, (%rdi)
	leaq	24(%rsp), %rsi
	movq	%rdx, (%rsi)
	leaq	4(%rsp), %rdx
	movl	%ecx, (%rdx)
	leaq	80(%rsp), %rbx
	movq	%rax, (%rbx)
	movq	%rdi, 8(%rbx)
	movq	%rsi, 16(%rbx)
	movq	%rdx, 24(%rbx)
	leaq	64(%rsp), %r14
	leaq	48(%rsp), %r15
	leaq	16(%rsp), %r12
	leaq	8(%rsp), %r13
	movq	%r14, %rdi
	movq	%r15, %rsi
	movq	%r12, %rdx
	movq	%r13, %rcx
	callq	__hipPopCallConfiguration
	movq	(%r14), %rsi
	movl	8(%r14), %edx
	movq	(%r15), %rcx
	movl	8(%r15), %r8d
	movl	$_Z4diagPfS_S_i, %edi
	movq	%rbx, %r9
	pushq	(%r13)
	.cfi_adjust_cfa_offset 8
	pushq	(%r12)
	.cfi_adjust_cfa_offset 8
	callq	hipLaunchKernel
	addq	$128, %rsp
	.cfi_adjust_cfa_offset -128
	popq	%rbx
	.cfi_def_cfa_offset 40
	popq	%r12
	.cfi_def_cfa_offset 32
	popq	%r13
	.cfi_def_cfa_offset 24
	popq	%r14
	.cfi_def_cfa_offset 16
	popq	%r15
	.cfi_def_cfa_offset 8
	retq
.Lfunc_end0:
	.size	_Z19__device_stub__diagPfS_S_i, .Lfunc_end0-_Z19__device_stub__diagPfS_S_i
	.cfi_endproc
                                        # -- End function
	.globl	_Z21__device_stub__jacobiPfS_iS_ # -- Begin function _Z21__device_stub__jacobiPfS_iS_
	.type	_Z21__device_stub__jacobiPfS_iS_,@function
_Z21__device_stub__jacobiPfS_iS_:       # @_Z21__device_stub__jacobiPfS_iS_
	.cfi_startproc
# %bb.0:
	pushq	%r15
	.cfi_def_cfa_offset 16
	pushq	%r14
	.cfi_def_cfa_offset 24
	pushq	%r13
	.cfi_def_cfa_offset 32
	pushq	%r12
	.cfi_def_cfa_offset 40
	pushq	%rbx
	.cfi_def_cfa_offset 48
	subq	$112, %rsp
	.cfi_def_cfa_offset 160
	.cfi_offset %rbx, -48
	.cfi_offset %r12, -40
	.cfi_offset %r13, -32
	.cfi_offset %r14, -24
	.cfi_offset %r15, -16
	leaq	40(%rsp), %rax
	movq	%rdi, (%rax)
	leaq	32(%rsp), %rdi
	movq	%rsi, (%rdi)
	leaq	4(%rsp), %rsi
	movl	%edx, (%rsi)
	leaq	24(%rsp), %rdx
	movq	%rcx, (%rdx)
	leaq	80(%rsp), %rbx
	movq	%rax, (%rbx)
	movq	%rdi, 8(%rbx)
	movq	%rsi, 16(%rbx)
	movq	%rdx, 24(%rbx)
	leaq	64(%rsp), %r14
	leaq	48(%rsp), %r15
	leaq	16(%rsp), %r12
	leaq	8(%rsp), %r13
	movq	%r14, %rdi
	movq	%r15, %rsi
	movq	%r12, %rdx
	movq	%r13, %rcx
	callq	__hipPopCallConfiguration
	movq	(%r14), %rsi
	movl	8(%r14), %edx
	movq	(%r15), %rcx
	movl	8(%r15), %r8d
	movl	$_Z6jacobiPfS_iS_, %edi
	movq	%rbx, %r9
	pushq	(%r13)
	.cfi_adjust_cfa_offset 8
	pushq	(%r12)
	.cfi_adjust_cfa_offset 8
	callq	hipLaunchKernel
	addq	$128, %rsp
	.cfi_adjust_cfa_offset -128
	popq	%rbx
	.cfi_def_cfa_offset 40
	popq	%r12
	.cfi_def_cfa_offset 32
	popq	%r13
	.cfi_def_cfa_offset 24
	popq	%r14
	.cfi_def_cfa_offset 16
	popq	%r15
	.cfi_def_cfa_offset 8
	retq
.Lfunc_end1:
	.size	_Z21__device_stub__jacobiPfS_iS_, .Lfunc_end1-_Z21__device_stub__jacobiPfS_iS_
	.cfi_endproc
                                        # -- End function
	.section	.rodata.cst4,"aM",@progbits,4
	.p2align	2, 0x0                          # -- Begin function main
.LCPI2_0:
	.long	0x7f7fffff                      # float 3.40282347E+38
.LCPI2_1:
	.long	0x3f800000                      # float 1
.LCPI2_2:
	.long	0x00800000                      # float 1.17549435E-38
	.section	.rodata.cst16,"aM",@progbits,16
	.p2align	4, 0x0
.LCPI2_3:
	.long	0x7fffffff                      # float NaN
	.long	0x7fffffff                      # float NaN
	.long	0x7fffffff                      # float NaN
	.long	0x7fffffff                      # float NaN
	.text
	.globl	main
	.type	main,@function
main:                                   # @main
	.cfi_startproc
# %bb.0:
	pushq	%rbp
	.cfi_def_cfa_offset 16
	pushq	%r15
	.cfi_def_cfa_offset 24
	pushq	%r14
	.cfi_def_cfa_offset 32
	pushq	%r13
	.cfi_def_cfa_offset 40
	pushq	%r12
	.cfi_def_cfa_offset 48
	pushq	%rbx
	.cfi_def_cfa_offset 56
	subq	$104, %rsp
	.cfi_def_cfa_offset 160
	.cfi_offset %rbx, -56
	.cfi_offset %r12, -48
	.cfi_offset %r13, -40
	.cfi_offset %r14, -32
	.cfi_offset %r15, -24
	.cfi_offset %rbp, -16
	cmpl	$2, %edi
	jl	.LBB2_37
# %bb.1:
	movq	8(%rsi), %rdi
	movl	$.L.str, %esi
	callq	fopen
	testq	%rax, %rax
	je	.LBB2_37
# %bb.2:
	movq	%rax, %rbp
	movq	%rsp, %rbx
	leaq	4(%rsp), %rcx
	leaq	20(%rsp), %r8
	leaq	16(%rsp), %r9
	movl	$.L.str.2, %esi
	movq	%rax, %rdi
	movq	%rbx, %rdx
	xorl	%eax, %eax
	callq	__isoc23_fscanf
	movslq	(%rbx), %rbx
	leaq	(,%rbx,4), %r15
	movq	%r15, %rdi
	imulq	%rbx, %rdi
	callq	malloc
	movq	%rax, 32(%rsp)                  # 8-byte Spill
	movq	%r15, %rdi
	callq	malloc
	movq	%rax, %r12
	movq	%r15, %rdi
	callq	malloc
	movq	%rax, 40(%rsp)                  # 8-byte Spill
	movq	%r15, %rdi
	callq	malloc
	movq	%rax, %r13
	movq	%r15, %rdi
	callq	malloc
	movq	%rax, %r14
	testq	%rbx, %rbx
	jle	.LBB2_3
# %bb.4:                                # %.preheader110.preheader
	movq	%r14, 24(%rsp)                  # 8-byte Spill
	movq	%r12, %r14
	xorl	%r15d, %r15d
.LBB2_5:                                # %.preheader110
                                        # =>This Loop Header: Depth=1
                                        #     Child Loop BB2_7 Depth 2
	testl	%ebx, %ebx
	jle	.LBB2_10
# %bb.6:                                # %.lr.ph.preheader
                                        #   in Loop: Header=BB2_5 Depth=1
	xorl	%r12d, %r12d
.LBB2_7:                                # %.lr.ph
                                        #   Parent Loop BB2_5 Depth=1
                                        # =>  This Inner Loop Header: Depth=2
	movl	%r12d, %eax
	imull	%ebx, %eax
	addl	%r15d, %eax
	cltq
	movq	32(%rsp), %rcx                  # 8-byte Reload
	leaq	(%rcx,%rax,4), %rdx
	movl	$.L.str.3, %esi
	movq	%rbp, %rdi
	xorl	%eax, %eax
	callq	__isoc23_fscanf
	movl	(%rsp), %ebx
	cmpl	4(%rsp), %r15d
	jne	.LBB2_9
# %bb.8:                                #   in Loop: Header=BB2_7 Depth=2
	movl	%ebx, %eax
	imull	%r12d, %eax
	addl	%r15d, %eax
	cltq
	movq	32(%rsp), %rcx                  # 8-byte Reload
	movss	(%rcx,%rax,4), %xmm0            # xmm0 = mem[0],zero,zero,zero
	movss	%xmm0, (%r14,%r12,4)
.LBB2_9:                                #   in Loop: Header=BB2_7 Depth=2
	movslq	%ebx, %rax
	incq	%r12
	cmpq	%rax, %r12
	jl	.LBB2_7
.LBB2_10:                               # %._crit_edge
                                        #   in Loop: Header=BB2_5 Depth=1
	incl	%r15d
	cmpl	%ebx, %r15d
	jl	.LBB2_5
# %bb.11:                               # %.preheader109
	testl	%ebx, %ebx
	jle	.LBB2_12
# %bb.13:                               # %.lr.ph115.preheader
	xorl	%ebx, %ebx
	xorl	%r15d, %r15d
                                        # implicit-def: $xmm0
                                        # kill: killed $xmm0
	movq	%r14, %r12
	movq	24(%rsp), %r14                  # 8-byte Reload
.LBB2_14:                               # %.lr.ph115
                                        # =>This Inner Loop Header: Depth=1
	movq	40(%rsp), %rax                  # 8-byte Reload
	leaq	(%rax,%rbx), %rdx
	movl	$.L.str.3, %esi
	movq	%rbp, %rdi
	xorl	%eax, %eax
	callq	__isoc23_fscanf
	movl	4(%rsp), %eax
	cmpq	%rax, %r15
	jne	.LBB2_16
# %bb.15:                               #   in Loop: Header=BB2_14 Depth=1
	movq	40(%rsp), %rax                  # 8-byte Reload
	movss	(%rax,%r15,4), %xmm0            # xmm0 = mem[0],zero,zero,zero
	movss	%xmm0, 80(%rsp)                 # 4-byte Spill
.LBB2_16:                               #   in Loop: Header=BB2_14 Depth=1
	incq	%r15
	movslq	(%rsp), %rax
	addq	$4, %rbx
	cmpq	%rax, %r15
	jl	.LBB2_14
# %bb.17:                               # %._crit_edge116.loopexit
	xorps	%xmm0, %xmm0
	cvtss2sd	80(%rsp), %xmm0                 # 4-byte Folded Reload
	movsd	%xmm0, 72(%rsp)                 # 8-byte Spill
	jmp	.LBB2_18
.LBB2_3:
                                        # implicit-def: $xmm0
                                        # kill: killed $xmm0
	jmp	.LBB2_18
.LBB2_12:
                                        # implicit-def: $xmm0
                                        # kill: killed $xmm0
	movq	%r14, %r12
	movq	24(%rsp), %r14                  # 8-byte Reload
.LBB2_18:                               # %._crit_edge116
	movabsq	$4294967296, %r15               # imm = 0x100000000
	movq	%rbp, %rdi
	callq	fclose
	movl	(%rsp), %esi
	imull	%esi, %esi
	shlq	$2, %rsi
	leaq	64(%rsp), %rbp
	movq	%rbp, %rdi
	callq	hipMalloc
	movslq	(%rsp), %rsi
	shlq	$2, %rsi
	leaq	56(%rsp), %rbx
	movq	%rbx, %rdi
	callq	hipMalloc
	movslq	(%rsp), %rsi
	shlq	$2, %rsi
	leaq	8(%rsp), %rdi
	callq	hipMalloc
	movslq	(%rsp), %rsi
	shlq	$2, %rsi
	leaq	48(%rsp), %rdi
	callq	hipMalloc
	movq	(%rbp), %rdi
	movl	(%rsp), %edx
	imull	%edx, %edx
	shlq	$2, %rdx
	movq	32(%rsp), %rsi                  # 8-byte Reload
	movl	$1, %ecx
	callq	hipMemcpy
	movq	(%rbx), %rdi
	movslq	(%rsp), %rdx
	shlq	$2, %rdx
	movq	40(%rsp), %rbx                  # 8-byte Reload
	movq	%rbx, %rsi
	movl	$1, %ecx
	callq	hipMemcpy
	leaq	8(%rsp), %rax
	movq	(%rax), %rdi
	movslq	(%rsp), %rdx
	shlq	$2, %rdx
	movq	%r13, %rsi
	movl	$1, %ecx
	callq	hipMemcpy
	movl	(%rsp), %edi
	btsq	$32, %rdi
	leaq	256(%r15), %rdx
	xorl	%ebp, %ebp
	movl	$1, %esi
	movl	$1, %ecx
	xorl	%r8d, %r8d
	xorl	%r9d, %r9d
	callq	__hipPushCallConfiguration
	testl	%eax, %eax
	jne	.LBB2_20
# %bb.19:
	movq	64(%rsp), %rdi
	movq	56(%rsp), %rsi
	movq	8(%rsp), %rdx
	movl	(%rsp), %ecx
	callq	_Z19__device_stub__diagPfS_S_i
.LBB2_20:
	movq	56(%rsp), %rsi
	movslq	(%rsp), %rdx
	shlq	$2, %rdx
	movq	%rbx, %rdi
	movl	$2, %ecx
	callq	hipMemcpy
	movq	8(%rsp), %rsi
	movslq	(%rsp), %rdx
	shlq	$2, %rdx
	movq	%r13, %rdi
	movl	$2, %ecx
	callq	hipMemcpy
	movss	16(%rsp), %xmm0                 # xmm0 = mem[0],zero,zero,zero
	xorps	%xmm1, %xmm1
	ucomiss	%xmm1, %xmm0
	jbe	.LBB2_30
# %bb.21:
	movss	.LCPI2_0(%rip), %xmm0           # xmm0 = mem[0],zero,zero,zero
	ucomiss	20(%rsp), %xmm0
	jbe	.LBB2_30
# %bb.22:                               # %.lr.ph128.preheader
	xorl	%ebp, %ebp
	leaq	256(%r15), %rax
	movq	%rax, 24(%rsp)                  # 8-byte Spill
.LBB2_23:                               # %.lr.ph128
                                        # =>This Loop Header: Depth=1
                                        #     Child Loop BB2_27 Depth 2
	movl	(%rsp), %edi
	orq	%r15, %rdi
	movl	$1, %esi
	movq	24(%rsp), %rdx                  # 8-byte Reload
	movl	$1, %ecx
	xorl	%r8d, %r8d
	xorl	%r9d, %r9d
	callq	__hipPushCallConfiguration
	testl	%eax, %eax
	jne	.LBB2_25
# %bb.24:                               #   in Loop: Header=BB2_23 Depth=1
	movq	64(%rsp), %rdi
	movq	8(%rsp), %rsi
	movl	(%rsp), %edx
	movq	48(%rsp), %rcx
	callq	_Z21__device_stub__jacobiPfS_iS_
.LBB2_25:                               #   in Loop: Header=BB2_23 Depth=1
	movq	48(%rsp), %rsi
	movslq	(%rsp), %rdx
	shlq	$2, %rdx
	movq	%r14, %rdi
	movl	$2, %ecx
	callq	hipMemcpy
	movl	(%rsp), %eax
	movss	.LCPI2_1(%rip), %xmm4           # xmm4 = mem[0],zero,zero,zero
	testl	%eax, %eax
	jle	.LBB2_29
# %bb.26:                               # %.lr.ph121.preheader
                                        #   in Loop: Header=BB2_23 Depth=1
	xorl	%ecx, %ecx
	movss	.LCPI2_2(%rip), %xmm0           # xmm0 = mem[0],zero,zero,zero
	movaps	%xmm0, %xmm4
	movaps	.LCPI2_3(%rip), %xmm3           # xmm3 = [NaN,NaN,NaN,NaN]
.LBB2_27:                               # %.lr.ph121
                                        #   Parent Loop BB2_23 Depth=1
                                        # =>  This Inner Loop Header: Depth=2
	movaps	%xmm0, %xmm1
	movss	(%rbx,%rcx,4), %xmm0            # xmm0 = mem[0],zero,zero,zero
	subss	(%r14,%rcx,4), %xmm0
	movaps	%xmm4, %xmm2
	movaps	%xmm0, %xmm4
	subss	(%r13,%rcx,4), %xmm4
	movss	%xmm0, (%r13,%rcx,4)
	andps	%xmm3, %xmm4
	maxss	%xmm2, %xmm4
	andps	%xmm3, %xmm0
	maxss	%xmm1, %xmm0
	incq	%rcx
	cmpq	%rcx, %rax
	jne	.LBB2_27
# %bb.28:                               # %._crit_edge122.loopexit
                                        #   in Loop: Header=BB2_23 Depth=1
	divss	%xmm0, %xmm4
.LBB2_29:                               # %._crit_edge122
                                        #   in Loop: Header=BB2_23 Depth=1
	movaps	%xmm4, 80(%rsp)                 # 16-byte Spill
	incl	%ebp
	movq	8(%rsp), %rdi
	movslq	%eax, %rdx
	shlq	$2, %rdx
	movq	%r13, %rsi
	movl	$1, %ecx
	callq	hipMemcpy
	xorps	%xmm0, %xmm0
	cvtsi2ss	%ebp, %xmm0
	movss	16(%rsp), %xmm1                 # xmm1 = mem[0],zero,zero,zero
	ucomiss	%xmm0, %xmm1
	jbe	.LBB2_30
# %bb.32:                               # %._crit_edge122
                                        #   in Loop: Header=BB2_23 Depth=1
	movaps	80(%rsp), %xmm0                 # 16-byte Reload
	ucomiss	20(%rsp), %xmm0
	ja	.LBB2_23
.LBB2_30:                               # %.preheader
	movl	(%rsp), %eax
	testl	%eax, %eax
	jle	.LBB2_31
# %bb.33:                               # %.lr.ph132.preheader
	xorps	%xmm0, %xmm0
	xorl	%ecx, %ecx
	movsd	72(%rsp), %xmm1                 # 8-byte Reload
                                        # xmm1 = mem[0],zero
.LBB2_34:                               # %.lr.ph132
                                        # =>This Inner Loop Header: Depth=1
	movss	(%r12,%rcx,4), %xmm2            # xmm2 = mem[0],zero,zero,zero
	mulss	(%r13,%rcx,4), %xmm2
	addss	%xmm2, %xmm0
	incq	%rcx
	cmpq	%rcx, %rax
	jne	.LBB2_34
# %bb.35:                               # %._crit_edge133.loopexit
	cvtss2sd	%xmm0, %xmm0
	jmp	.LBB2_36
.LBB2_31:
	xorps	%xmm0, %xmm0
	movsd	72(%rsp), %xmm1                 # 8-byte Reload
                                        # xmm1 = mem[0],zero
.LBB2_36:                               # %._crit_edge133
	movl	4(%rsp), %edx
	movl	$.L.str.6, %edi
	movl	%ebp, %esi
	movb	$2, %al
	callq	printf
	movq	32(%rsp), %rdi                  # 8-byte Reload
	callq	free
	movq	%rbx, %rdi
	callq	free
	movq	%r13, %rdi
	callq	free
	movq	%r12, %rdi
	callq	free
	movq	%r14, %rdi
	callq	free
	movq	64(%rsp), %rdi
	callq	hipFree
	movq	56(%rsp), %rdi
	callq	hipFree
	movq	8(%rsp), %rdi
	callq	hipFree
	movq	48(%rsp), %rdi
	callq	hipFree
	xorl	%eax, %eax
	addq	$104, %rsp
	.cfi_def_cfa_offset 56
	popq	%rbx
	.cfi_def_cfa_offset 48
	popq	%r12
	.cfi_def_cfa_offset 40
	popq	%r13
	.cfi_def_cfa_offset 32
	popq	%r14
	.cfi_def_cfa_offset 24
	popq	%r15
	.cfi_def_cfa_offset 16
	popq	%rbp
	.cfi_def_cfa_offset 8
	retq
.LBB2_37:
	.cfi_def_cfa_offset 160
	movq	stderr(%rip), %rsi
	movl	$.L.str.1, %edi
	callq	fputs
	movl	$1, %edi
	callq	exit
.Lfunc_end2:
	.size	main, .Lfunc_end2-main
	.cfi_endproc
                                        # -- End function
	.globl	_Z12printResultsiiff            # -- Begin function _Z12printResultsiiff
	.type	_Z12printResultsiiff,@function
_Z12printResultsiiff:                   # @_Z12printResultsiiff
	.cfi_startproc
# %bb.0:
	movl	%esi, %edx
	movl	%edi, %esi
	cvtss2sd	%xmm0, %xmm0
	cvtss2sd	%xmm1, %xmm1
	movl	$.L.str.6, %edi
	movb	$2, %al
	jmp	printf                          # TAILCALL
.Lfunc_end3:
	.size	_Z12printResultsiiff, .Lfunc_end3-_Z12printResultsiiff
	.cfi_endproc
                                        # -- End function
	.globl	_Z7printMAiPf                   # -- Begin function _Z7printMAiPf
	.type	_Z7printMAiPf,@function
_Z7printMAiPf:                          # @_Z7printMAiPf
	.cfi_startproc
# %bb.0:
	testl	%edi, %edi
	jle	.LBB4_6
# %bb.1:                                # %.preheader.lr.ph
	pushq	%rbp
	.cfi_def_cfa_offset 16
	pushq	%r15
	.cfi_def_cfa_offset 24
	pushq	%r14
	.cfi_def_cfa_offset 32
	pushq	%r13
	.cfi_def_cfa_offset 40
	pushq	%r12
	.cfi_def_cfa_offset 48
	pushq	%rbx
	.cfi_def_cfa_offset 56
	pushq	%rax
	.cfi_def_cfa_offset 64
	.cfi_offset %rbx, -56
	.cfi_offset %r12, -48
	.cfi_offset %r13, -40
	.cfi_offset %r14, -32
	.cfi_offset %r15, -24
	.cfi_offset %rbp, -16
	movq	%rsi, %rbx
	movl	%edi, %r14d
	leaq	(,%r14,4), %r15
	xorl	%r12d, %r12d
.LBB4_2:                                # %.lr.ph.preheader
                                        # =>This Loop Header: Depth=1
                                        #     Child Loop BB4_3 Depth 2
	movq	%r14, %r13
	movq	%rbx, %rbp
.LBB4_3:                                # %.lr.ph
                                        #   Parent Loop BB4_2 Depth=1
                                        # =>  This Inner Loop Header: Depth=2
	xorps	%xmm0, %xmm0
	cvtss2sd	(%rbp), %xmm0
	movl	$.L.str.4, %edi
	movb	$1, %al
	callq	printf
	addq	%r15, %rbp
	decq	%r13
	jne	.LBB4_3
# %bb.4:                                # %._crit_edge
                                        #   in Loop: Header=BB4_2 Depth=1
	movl	$10, %edi
	callq	putchar@PLT
	incq	%r12
	addq	$4, %rbx
	cmpq	%r14, %r12
	jne	.LBB4_2
# %bb.5:
	addq	$8, %rsp
	.cfi_def_cfa_offset 56
	popq	%rbx
	.cfi_def_cfa_offset 48
	popq	%r12
	.cfi_def_cfa_offset 40
	popq	%r13
	.cfi_def_cfa_offset 32
	popq	%r14
	.cfi_def_cfa_offset 24
	popq	%r15
	.cfi_def_cfa_offset 16
	popq	%rbp
	.cfi_def_cfa_offset 8
	.cfi_restore %rbx
	.cfi_restore %r12
	.cfi_restore %r13
	.cfi_restore %r14
	.cfi_restore %r15
	.cfi_restore %rbp
.LBB4_6:                                # %._crit_edge13
	retq
.Lfunc_end4:
	.size	_Z7printMAiPf, .Lfunc_end4-_Z7printMAiPf
	.cfi_endproc
                                        # -- End function
	.globl	_Z7printMBiPf                   # -- Begin function _Z7printMBiPf
	.type	_Z7printMBiPf,@function
_Z7printMBiPf:                          # @_Z7printMBiPf
	.cfi_startproc
# %bb.0:
	testl	%edi, %edi
	jle	.LBB5_4
# %bb.1:                                # %.lr.ph.preheader
	pushq	%r15
	.cfi_def_cfa_offset 16
	pushq	%r14
	.cfi_def_cfa_offset 24
	pushq	%rbx
	.cfi_def_cfa_offset 32
	.cfi_offset %rbx, -32
	.cfi_offset %r14, -24
	.cfi_offset %r15, -16
	movq	%rsi, %rbx
	movl	%edi, %r14d
	xorl	%r15d, %r15d
.LBB5_2:                                # %.lr.ph
                                        # =>This Inner Loop Header: Depth=1
	xorps	%xmm0, %xmm0
	cvtss2sd	(%rbx,%r15,4), %xmm0
	movl	$.L.str.4, %edi
	movb	$1, %al
	callq	printf
	movl	$10, %edi
	callq	putchar@PLT
	incq	%r15
	cmpq	%r15, %r14
	jne	.LBB5_2
# %bb.3:
	popq	%rbx
	.cfi_def_cfa_offset 24
	popq	%r14
	.cfi_def_cfa_offset 16
	popq	%r15
	.cfi_def_cfa_offset 8
	.cfi_restore %rbx
	.cfi_restore %r14
	.cfi_restore %r15
.LBB5_4:                                # %._crit_edge
	retq
.Lfunc_end5:
	.size	_Z7printMBiPf, .Lfunc_end5-_Z7printMBiPf
	.cfi_endproc
                                        # -- End function
	.globl	_Z6printXiPf                    # -- Begin function _Z6printXiPf
	.type	_Z6printXiPf,@function
_Z6printXiPf:                           # @_Z6printXiPf
	.cfi_startproc
# %bb.0:
	testl	%edi, %edi
	jle	.LBB6_4
# %bb.1:                                # %.lr.ph.preheader
	pushq	%r15
	.cfi_def_cfa_offset 16
	pushq	%r14
	.cfi_def_cfa_offset 24
	pushq	%rbx
	.cfi_def_cfa_offset 32
	.cfi_offset %rbx, -32
	.cfi_offset %r14, -24
	.cfi_offset %r15, -16
	movq	%rsi, %rbx
	movl	%edi, %r14d
	xorl	%r15d, %r15d
.LBB6_2:                                # %.lr.ph
                                        # =>This Inner Loop Header: Depth=1
	xorps	%xmm0, %xmm0
	cvtss2sd	(%rbx,%r15,4), %xmm0
	movl	$.L.str.4, %edi
	movb	$1, %al
	callq	printf
	incq	%r15
	cmpq	%r15, %r14
	jne	.LBB6_2
# %bb.3:
	popq	%rbx
	.cfi_def_cfa_offset 24
	popq	%r14
	.cfi_def_cfa_offset 16
	popq	%r15
	.cfi_def_cfa_offset 8
	.cfi_restore %rbx
	.cfi_restore %r14
	.cfi_restore %r15
.LBB6_4:                                # %._crit_edge
	movl	$10, %edi
	jmp	putchar@PLT                     # TAILCALL
.Lfunc_end6:
	.size	_Z6printXiPf, .Lfunc_end6-_Z6printXiPf
	.cfi_endproc
                                        # -- End function
	.p2align	4, 0x90                         # -- Begin function __hip_module_ctor
	.type	__hip_module_ctor,@function
__hip_module_ctor:                      # @__hip_module_ctor
	.cfi_startproc
# %bb.0:
	pushq	%rbx
	.cfi_def_cfa_offset 16
	subq	$32, %rsp
	.cfi_def_cfa_offset 48
	.cfi_offset %rbx, -16
	movq	__hip_gpubin_handle(%rip), %rbx
	testq	%rbx, %rbx
	jne	.LBB7_2
# %bb.1:
	movl	$__hip_fatbin_wrapper, %edi
	callq	__hipRegisterFatBinary
	movq	%rax, %rbx
	movq	%rax, __hip_gpubin_handle(%rip)
.LBB7_2:
	xorps	%xmm0, %xmm0
	movups	%xmm0, 16(%rsp)
	movups	%xmm0, (%rsp)
	movl	$_Z4diagPfS_S_i, %esi
	movl	$.L__unnamed_1, %edx
	movl	$.L__unnamed_1, %ecx
	movq	%rbx, %rdi
	movl	$-1, %r8d
	xorl	%r9d, %r9d
	callq	__hipRegisterFunction
	xorps	%xmm0, %xmm0
	movups	%xmm0, 16(%rsp)
	movups	%xmm0, (%rsp)
	movl	$_Z6jacobiPfS_iS_, %esi
	movl	$.L__unnamed_2, %edx
	movl	$.L__unnamed_2, %ecx
	movq	%rbx, %rdi
	movl	$-1, %r8d
	xorl	%r9d, %r9d
	callq	__hipRegisterFunction
	movl	$__hip_module_dtor, %edi
	addq	$32, %rsp
	.cfi_def_cfa_offset 16
	popq	%rbx
	.cfi_def_cfa_offset 8
	jmp	atexit                          # TAILCALL
.Lfunc_end7:
	.size	__hip_module_ctor, .Lfunc_end7-__hip_module_ctor
	.cfi_endproc
                                        # -- End function
	.p2align	4, 0x90                         # -- Begin function __hip_module_dtor
	.type	__hip_module_dtor,@function
__hip_module_dtor:                      # @__hip_module_dtor
	.cfi_startproc
# %bb.0:
	movq	__hip_gpubin_handle(%rip), %rdi
	testq	%rdi, %rdi
	je	.LBB8_2
# %bb.1:
	pushq	%rax
	.cfi_def_cfa_offset 16
	callq	__hipUnregisterFatBinary
	movq	$0, __hip_gpubin_handle(%rip)
	addq	$8, %rsp
	.cfi_def_cfa_offset 8
.LBB8_2:
	retq
.Lfunc_end8:
	.size	__hip_module_dtor, .Lfunc_end8-__hip_module_dtor
	.cfi_endproc
                                        # -- End function
	.type	_Z4diagPfS_S_i,@object          # @_Z4diagPfS_S_i
	.section	.rodata,"a",@progbits
	.globl	_Z4diagPfS_S_i
	.p2align	3, 0x0
_Z4diagPfS_S_i:
	.quad	_Z19__device_stub__diagPfS_S_i
	.size	_Z4diagPfS_S_i, 8

	.type	_Z6jacobiPfS_iS_,@object        # @_Z6jacobiPfS_iS_
	.globl	_Z6jacobiPfS_iS_
	.p2align	3, 0x0
_Z6jacobiPfS_iS_:
	.quad	_Z21__device_stub__jacobiPfS_iS_
	.size	_Z6jacobiPfS_iS_, 8

	.type	.L.str,@object                  # @.str
	.section	.rodata.str1.1,"aMS",@progbits,1
.L.str:
	.asciz	"r"
	.size	.L.str, 2

	.type	.L.str.1,@object                # @.str.1
.L.str.1:
	.asciz	"File error"
	.size	.L.str.1, 11

	.type	.L.str.2,@object                # @.str.2
.L.str.2:
	.asciz	"%d%d%f%f"
	.size	.L.str.2, 9

	.type	.L.str.3,@object                # @.str.3
.L.str.3:
	.asciz	"%f"
	.size	.L.str.3, 3

	.type	.L.str.4,@object                # @.str.4
.L.str.4:
	.asciz	"%f "
	.size	.L.str.4, 4

	.type	.L.str.6,@object                # @.str.6
.L.str.6:
	.asciz	"\n\n---------------------------------------------------------\nIterations: %d\nRowTest: %d => [%f] =? %f\n---------------------------------------------------------\n\n"
	.size	.L.str.6, 161

	.type	.L__unnamed_1,@object           # @0
.L__unnamed_1:
	.asciz	"_Z4diagPfS_S_i"
	.size	.L__unnamed_1, 15

	.type	.L__unnamed_2,@object           # @1
.L__unnamed_2:
	.asciz	"_Z6jacobiPfS_iS_"
	.size	.L__unnamed_2, 17

	.type	__hip_fatbin_wrapper,@object    # @__hip_fatbin_wrapper
	.section	.hipFatBinSegment,"a",@progbits
	.p2align	3, 0x0
__hip_fatbin_wrapper:
	.long	1212764230                      # 0x48495046
	.long	1                               # 0x1
	.quad	__hip_fatbin
	.quad	0
	.size	__hip_fatbin_wrapper, 24

	.type	__hip_gpubin_handle,@object     # @__hip_gpubin_handle
	.local	__hip_gpubin_handle
	.comm	__hip_gpubin_handle,8,8
	.section	.init_array,"aw",@init_array
	.p2align	3, 0x0
	.quad	__hip_module_ctor
	.type	__hip_cuid_,@object             # @__hip_cuid_
	.bss
	.globl	__hip_cuid_
__hip_cuid_:
	.byte	0                               # 0x0
	.size	__hip_cuid_, 1

	.ident	"AMD clang version 18.0.0git (https://github.com/RadeonOpenCompute/llvm-project roc-6.3.2 25012 e5bf7e55c91490b07c49d8960fa7983d864936c4)"
	.section	".note.GNU-stack","",@progbits
	.addrsig
	.addrsig_sym _Z19__device_stub__diagPfS_S_i
	.addrsig_sym _Z21__device_stub__jacobiPfS_iS_
	.addrsig_sym __hip_module_ctor
	.addrsig_sym __hip_module_dtor
	.addrsig_sym _Z4diagPfS_S_i
	.addrsig_sym _Z6jacobiPfS_iS_
	.addrsig_sym __hip_fatbin
	.addrsig_sym __hip_fatbin_wrapper
	.addrsig_sym __hip_cuid_

	.text
	.amdgcn_target "amdgcn-amd-amdhsa--gfx1100"
	.protected	_Z4diagPfS_S_i          ; -- Begin function _Z4diagPfS_S_i
	.globl	_Z4diagPfS_S_i
	.p2align	8
	.type	_Z4diagPfS_S_i,@function
_Z4diagPfS_S_i:                         ; @_Z4diagPfS_S_i
; %bb.0:
	s_load_b32 s3, s[0:1], 0x18
	s_mov_b32 s2, s15
	s_mov_b32 s4, exec_lo
	v_max_i32_e32 v1, s2, v0
	s_waitcnt lgkmcnt(0)
	s_delay_alu instid0(VALU_DEP_1)
	v_cmpx_gt_i32_e64 s3, v1
	s_cbranch_execz .LBB0_8
; %bb.1:
	s_load_b128 s[4:7], s[0:1], 0x0
	s_add_i32 s8, s3, 1
	s_load_b64 s[0:1], s[0:1], 0x10
	s_mul_i32 s8, s8, s2
	v_mul_lo_u32 v2, v0, s3
	s_ashr_i32 s9, s8, 31
	v_mov_b32_e32 v3, 0
	s_lshl_b64 s[8:9], s[8:9], 2
	s_waitcnt lgkmcnt(0)
	s_add_u32 s8, s4, s8
	s_addc_u32 s9, s5, s9
	s_lshl_b32 s11, s3, 8
	s_load_b32 s10, s[8:9], 0x0
	s_waitcnt lgkmcnt(0)
	v_cvt_i32_f32_e32 v1, s10
	s_mov_b32 s10, 0
	s_delay_alu instid0(VALU_DEP_1)
	v_cvt_f32_i32_e32 v1, v1
.LBB0_2:                                ; =>This Inner Loop Header: Depth=1
	s_mov_b32 s12, exec_lo
	v_cmpx_ne_u32_e64 s2, v0
	s_xor_b32 s12, exec_lo, s12
	s_cbranch_execz .LBB0_4
; %bb.3:                                ;   in Loop: Header=BB0_2 Depth=1
	v_add_nc_u32_e32 v4, s2, v2
	s_delay_alu instid0(VALU_DEP_1) | instskip(NEXT) | instid1(VALU_DEP_1)
	v_ashrrev_i32_e32 v5, 31, v4
	v_lshlrev_b64 v[4:5], 2, v[4:5]
	s_delay_alu instid0(VALU_DEP_1) | instskip(NEXT) | instid1(VALU_DEP_2)
	v_add_co_u32 v4, vcc_lo, s4, v4
	v_add_co_ci_u32_e32 v5, vcc_lo, s5, v5, vcc_lo
	global_load_b32 v6, v[4:5], off
	s_waitcnt vmcnt(0)
	v_div_scale_f32 v7, null, v1, v1, v6
	s_delay_alu instid0(VALU_DEP_1) | instskip(SKIP_2) | instid1(VALU_DEP_1)
	v_rcp_f32_e32 v8, v7
	s_waitcnt_depctr 0xfff
	v_fma_f32 v9, -v7, v8, 1.0
	v_fmac_f32_e32 v8, v9, v8
	v_div_scale_f32 v9, vcc_lo, v6, v1, v6
	s_delay_alu instid0(VALU_DEP_1) | instskip(NEXT) | instid1(VALU_DEP_1)
	v_mul_f32_e32 v10, v9, v8
	v_fma_f32 v11, -v7, v10, v9
	s_delay_alu instid0(VALU_DEP_1) | instskip(NEXT) | instid1(VALU_DEP_1)
	v_fmac_f32_e32 v10, v11, v8
	v_fma_f32 v7, -v7, v10, v9
	s_delay_alu instid0(VALU_DEP_1) | instskip(NEXT) | instid1(VALU_DEP_1)
	v_div_fmas_f32 v7, v7, v8, v10
	v_div_fixup_f32 v6, v7, v1, v6
	global_store_b32 v[4:5], v6, off
.LBB0_4:                                ; %Flow
                                        ;   in Loop: Header=BB0_2 Depth=1
	s_and_not1_saveexec_b32 s12, s12
	s_cbranch_execz .LBB0_6
; %bb.5:                                ;   in Loop: Header=BB0_2 Depth=1
	global_store_b32 v3, v3, s[8:9]
.LBB0_6:                                ;   in Loop: Header=BB0_2 Depth=1
	s_or_b32 exec_lo, exec_lo, s12
	v_add_nc_u32_e32 v0, 0x100, v0
	v_add_nc_u32_e32 v2, s11, v2
	s_delay_alu instid0(VALU_DEP_2) | instskip(SKIP_1) | instid1(SALU_CYCLE_1)
	v_cmp_le_i32_e32 vcc_lo, s3, v0
	s_or_b32 s10, vcc_lo, s10
	s_and_not1_b32 exec_lo, exec_lo, s10
	s_cbranch_execnz .LBB0_2
; %bb.7:
	s_or_b32 exec_lo, exec_lo, s10
	s_ashr_i32 s3, s2, 31
	v_mov_b32_e32 v0, 0
	s_lshl_b64 s[2:3], s[2:3], 2
	s_waitcnt_vscnt null, 0x0
	s_add_u32 s4, s6, s2
	s_addc_u32 s5, s7, s3
	s_barrier
	buffer_gl0_inv
	global_load_b32 v2, v0, s[4:5]
	s_add_u32 s0, s0, s2
	s_addc_u32 s1, s1, s3
	s_waitcnt vmcnt(0)
	v_div_scale_f32 v3, null, v1, v1, v2
	v_div_scale_f32 v6, vcc_lo, v2, v1, v2
	s_delay_alu instid0(VALU_DEP_2) | instskip(SKIP_2) | instid1(VALU_DEP_1)
	v_rcp_f32_e32 v4, v3
	s_waitcnt_depctr 0xfff
	v_fma_f32 v5, -v3, v4, 1.0
	v_fmac_f32_e32 v4, v5, v4
	s_delay_alu instid0(VALU_DEP_1) | instskip(NEXT) | instid1(VALU_DEP_1)
	v_mul_f32_e32 v5, v6, v4
	v_fma_f32 v7, -v3, v5, v6
	s_delay_alu instid0(VALU_DEP_1) | instskip(NEXT) | instid1(VALU_DEP_1)
	v_fmac_f32_e32 v5, v7, v4
	v_fma_f32 v3, -v3, v5, v6
	s_delay_alu instid0(VALU_DEP_1) | instskip(NEXT) | instid1(VALU_DEP_1)
	v_div_fmas_f32 v3, v3, v4, v5
	v_div_fixup_f32 v1, v3, v1, v2
	s_clause 0x1
	global_store_b32 v0, v1, s[4:5]
	global_store_b32 v0, v1, s[0:1]
.LBB0_8:
	s_nop 0
	s_sendmsg sendmsg(MSG_DEALLOC_VGPRS)
	s_endpgm
	.section	.rodata,"a",@progbits
	.p2align	6, 0x0
	.amdhsa_kernel _Z4diagPfS_S_i
		.amdhsa_group_segment_fixed_size 0
		.amdhsa_private_segment_fixed_size 0
		.amdhsa_kernarg_size 28
		.amdhsa_user_sgpr_count 15
		.amdhsa_user_sgpr_dispatch_ptr 0
		.amdhsa_user_sgpr_queue_ptr 0
		.amdhsa_user_sgpr_kernarg_segment_ptr 1
		.amdhsa_user_sgpr_dispatch_id 0
		.amdhsa_user_sgpr_private_segment_size 0
		.amdhsa_wavefront_size32 1
		.amdhsa_uses_dynamic_stack 0
		.amdhsa_enable_private_segment 0
		.amdhsa_system_sgpr_workgroup_id_x 1
		.amdhsa_system_sgpr_workgroup_id_y 0
		.amdhsa_system_sgpr_workgroup_id_z 0
		.amdhsa_system_sgpr_workgroup_info 0
		.amdhsa_system_vgpr_workitem_id 0
		.amdhsa_next_free_vgpr 12
		.amdhsa_next_free_sgpr 16
		.amdhsa_float_round_mode_32 0
		.amdhsa_float_round_mode_16_64 0
		.amdhsa_float_denorm_mode_32 3
		.amdhsa_float_denorm_mode_16_64 3
		.amdhsa_dx10_clamp 1
		.amdhsa_ieee_mode 1
		.amdhsa_fp16_overflow 0
		.amdhsa_workgroup_processor_mode 1
		.amdhsa_memory_ordered 1
		.amdhsa_forward_progress 0
		.amdhsa_shared_vgpr_count 0
		.amdhsa_exception_fp_ieee_invalid_op 0
		.amdhsa_exception_fp_denorm_src 0
		.amdhsa_exception_fp_ieee_div_zero 0
		.amdhsa_exception_fp_ieee_overflow 0
		.amdhsa_exception_fp_ieee_underflow 0
		.amdhsa_exception_fp_ieee_inexact 0
		.amdhsa_exception_int_div_zero 0
	.end_amdhsa_kernel
	.text
.Lfunc_end0:
	.size	_Z4diagPfS_S_i, .Lfunc_end0-_Z4diagPfS_S_i
                                        ; -- End function
	.section	.AMDGPU.csdata,"",@progbits
; Kernel info:
; codeLenInByte = 532
; NumSgprs: 18
; NumVgprs: 12
; ScratchSize: 0
; MemoryBound: 0
; FloatMode: 240
; IeeeMode: 1
; LDSByteSize: 0 bytes/workgroup (compile time only)
; SGPRBlocks: 2
; VGPRBlocks: 1
; NumSGPRsForWavesPerEU: 18
; NumVGPRsForWavesPerEU: 12
; Occupancy: 16
; WaveLimiterHint : 0
; COMPUTE_PGM_RSRC2:SCRATCH_EN: 0
; COMPUTE_PGM_RSRC2:USER_SGPR: 15
; COMPUTE_PGM_RSRC2:TRAP_HANDLER: 0
; COMPUTE_PGM_RSRC2:TGID_X_EN: 1
; COMPUTE_PGM_RSRC2:TGID_Y_EN: 0
; COMPUTE_PGM_RSRC2:TGID_Z_EN: 0
; COMPUTE_PGM_RSRC2:TIDIG_COMP_CNT: 0
	.text
	.protected	_Z6jacobiPfS_iS_        ; -- Begin function _Z6jacobiPfS_iS_
	.globl	_Z6jacobiPfS_iS_
	.p2align	8
	.type	_Z6jacobiPfS_iS_,@function
_Z6jacobiPfS_iS_:                       ; @_Z6jacobiPfS_iS_
; %bb.0:
	s_load_b32 s3, s[0:1], 0x10
	s_mov_b32 s8, s15
	v_dual_mov_b32 v4, 0 :: v_dual_lshlrev_b32 v3, 2, v0
	v_max_i32_e32 v1, s8, v0
	s_mov_b32 s2, exec_lo
	ds_store_b32 v3, v4
	s_waitcnt lgkmcnt(0)
	v_cmpx_gt_i32_e64 s3, v1
	s_cbranch_execz .LBB1_11
; %bb.1:                                ; %.preheader.preheader
	s_load_b128 s[4:7], s[0:1], 0x0
	v_mul_lo_u32 v5, v0, s3
	v_mov_b32_e32 v6, v0
	s_waitcnt lgkmcnt(0)
	v_add_co_u32 v1, s2, s6, v3
	s_delay_alu instid0(VALU_DEP_1)
	v_add_co_ci_u32_e64 v2, null, s7, 0, s2
	s_lshl_b32 s7, s3, 8
	s_mov_b32 s6, 0
.LBB1_2:                                ; %.preheader
                                        ; =>This Inner Loop Header: Depth=1
	s_mov_b32 s2, exec_lo
	v_cmpx_ne_u32_e64 s8, v6
	s_cbranch_execz .LBB1_4
; %bb.3:                                ;   in Loop: Header=BB1_2 Depth=1
	v_add_nc_u32_e32 v7, s8, v5
	s_delay_alu instid0(VALU_DEP_1) | instskip(NEXT) | instid1(VALU_DEP_1)
	v_ashrrev_i32_e32 v8, 31, v7
	v_lshlrev_b64 v[7:8], 2, v[7:8]
	s_delay_alu instid0(VALU_DEP_1) | instskip(NEXT) | instid1(VALU_DEP_2)
	v_add_co_u32 v7, vcc_lo, s4, v7
	v_add_co_ci_u32_e32 v8, vcc_lo, s5, v8, vcc_lo
	global_load_b32 v7, v[7:8], off
	global_load_b32 v8, v[1:2], off
	s_waitcnt vmcnt(0)
	v_fmac_f32_e32 v4, v7, v8
.LBB1_4:                                ;   in Loop: Header=BB1_2 Depth=1
	s_or_b32 exec_lo, exec_lo, s2
	v_add_nc_u32_e32 v6, 0x100, v6
	v_add_co_u32 v1, s2, 0x400, v1
	v_add_nc_u32_e32 v5, s7, v5
	v_add_co_ci_u32_e64 v2, s2, 0, v2, s2
	s_delay_alu instid0(VALU_DEP_4) | instskip(SKIP_1) | instid1(SALU_CYCLE_1)
	v_cmp_le_i32_e32 vcc_lo, s3, v6
	s_or_b32 s6, vcc_lo, s6
	s_and_not1_b32 exec_lo, exec_lo, s6
	s_cbranch_execnz .LBB1_2
; %bb.5:
	s_or_b32 exec_lo, exec_lo, s6
	s_movk_i32 s2, 0x80
	ds_store_b32 v3, v4
	s_waitcnt lgkmcnt(0)
	s_barrier
	buffer_gl0_inv
.LBB1_6:                                ; =>This Inner Loop Header: Depth=1
	s_mov_b32 s3, exec_lo
	v_cmpx_gt_i32_e64 s2, v0
	s_cbranch_execz .LBB1_8
; %bb.7:                                ;   in Loop: Header=BB1_6 Depth=1
	v_lshl_add_u32 v1, s2, 2, v3
	ds_load_b32 v1, v1
	ds_load_b32 v2, v3
	s_waitcnt lgkmcnt(0)
	v_add_f32_e32 v1, v1, v2
	ds_store_b32 v3, v1
.LBB1_8:                                ;   in Loop: Header=BB1_6 Depth=1
	s_or_b32 exec_lo, exec_lo, s3
	s_lshr_b32 s3, s2, 31
	s_waitcnt lgkmcnt(0)
	s_add_i32 s3, s2, s3
	s_add_i32 s2, s2, 1
	s_ashr_i32 s3, s3, 1
	s_cmp_gt_u32 s2, 2
	s_mov_b32 s2, s3
	s_barrier
	buffer_gl0_inv
	s_cbranch_scc1 .LBB1_6
; %bb.9:
	v_cmp_eq_u32_e32 vcc_lo, 0, v0
	s_and_b32 exec_lo, exec_lo, vcc_lo
	s_cbranch_execz .LBB1_11
; %bb.10:
	v_mov_b32_e32 v0, 0
	s_load_b64 s[0:1], s[0:1], 0x18
	s_ashr_i32 s9, s8, 31
	s_delay_alu instid0(SALU_CYCLE_1)
	s_lshl_b64 s[2:3], s[8:9], 2
	ds_load_b32 v1, v0
	s_waitcnt lgkmcnt(0)
	s_add_u32 s0, s0, s2
	s_addc_u32 s1, s1, s3
	global_store_b32 v0, v1, s[0:1]
.LBB1_11:
	s_nop 0
	s_sendmsg sendmsg(MSG_DEALLOC_VGPRS)
	s_endpgm
	.section	.rodata,"a",@progbits
	.p2align	6, 0x0
	.amdhsa_kernel _Z6jacobiPfS_iS_
		.amdhsa_group_segment_fixed_size 1024
		.amdhsa_private_segment_fixed_size 0
		.amdhsa_kernarg_size 32
		.amdhsa_user_sgpr_count 15
		.amdhsa_user_sgpr_dispatch_ptr 0
		.amdhsa_user_sgpr_queue_ptr 0
		.amdhsa_user_sgpr_kernarg_segment_ptr 1
		.amdhsa_user_sgpr_dispatch_id 0
		.amdhsa_user_sgpr_private_segment_size 0
		.amdhsa_wavefront_size32 1
		.amdhsa_uses_dynamic_stack 0
		.amdhsa_enable_private_segment 0
		.amdhsa_system_sgpr_workgroup_id_x 1
		.amdhsa_system_sgpr_workgroup_id_y 0
		.amdhsa_system_sgpr_workgroup_id_z 0
		.amdhsa_system_sgpr_workgroup_info 0
		.amdhsa_system_vgpr_workitem_id 0
		.amdhsa_next_free_vgpr 9
		.amdhsa_next_free_sgpr 16
		.amdhsa_float_round_mode_32 0
		.amdhsa_float_round_mode_16_64 0
		.amdhsa_float_denorm_mode_32 3
		.amdhsa_float_denorm_mode_16_64 3
		.amdhsa_dx10_clamp 1
		.amdhsa_ieee_mode 1
		.amdhsa_fp16_overflow 0
		.amdhsa_workgroup_processor_mode 1
		.amdhsa_memory_ordered 1
		.amdhsa_forward_progress 0
		.amdhsa_shared_vgpr_count 0
		.amdhsa_exception_fp_ieee_invalid_op 0
		.amdhsa_exception_fp_denorm_src 0
		.amdhsa_exception_fp_ieee_div_zero 0
		.amdhsa_exception_fp_ieee_overflow 0
		.amdhsa_exception_fp_ieee_underflow 0
		.amdhsa_exception_fp_ieee_inexact 0
		.amdhsa_exception_int_div_zero 0
	.end_amdhsa_kernel
	.text
.Lfunc_end1:
	.size	_Z6jacobiPfS_iS_, .Lfunc_end1-_Z6jacobiPfS_iS_
                                        ; -- End function
	.section	.AMDGPU.csdata,"",@progbits
; Kernel info:
; codeLenInByte = 448
; NumSgprs: 18
; NumVgprs: 9
; ScratchSize: 0
; MemoryBound: 0
; FloatMode: 240
; IeeeMode: 1
; LDSByteSize: 1024 bytes/workgroup (compile time only)
; SGPRBlocks: 2
; VGPRBlocks: 1
; NumSGPRsForWavesPerEU: 18
; NumVGPRsForWavesPerEU: 9
; Occupancy: 16
; WaveLimiterHint : 0
; COMPUTE_PGM_RSRC2:SCRATCH_EN: 0
; COMPUTE_PGM_RSRC2:USER_SGPR: 15
; COMPUTE_PGM_RSRC2:TRAP_HANDLER: 0
; COMPUTE_PGM_RSRC2:TGID_X_EN: 1
; COMPUTE_PGM_RSRC2:TGID_Y_EN: 0
; COMPUTE_PGM_RSRC2:TGID_Z_EN: 0
; COMPUTE_PGM_RSRC2:TIDIG_COMP_CNT: 0
	.text
	.p2alignl 7, 3214868480
	.fill 96, 4, 3214868480
	.type	__hip_cuid_,@object             ; @__hip_cuid_
	.section	.bss,"aw",@nobits
	.globl	__hip_cuid_
__hip_cuid_:
	.byte	0                               ; 0x0
	.size	__hip_cuid_, 1

	.ident	"AMD clang version 18.0.0git (https://github.com/RadeonOpenCompute/llvm-project roc-6.3.2 25012 e5bf7e55c91490b07c49d8960fa7983d864936c4)"
	.section	".note.GNU-stack","",@progbits
	.addrsig
	.addrsig_sym __hip_cuid_
	.amdgpu_metadata
---
amdhsa.kernels:
  - .args:
      - .address_space:  global
        .offset:         0
        .size:           8
        .value_kind:     global_buffer
      - .address_space:  global
        .offset:         8
        .size:           8
        .value_kind:     global_buffer
      - .address_space:  global
        .offset:         16
        .size:           8
        .value_kind:     global_buffer
      - .offset:         24
        .size:           4
        .value_kind:     by_value
    .group_segment_fixed_size: 0
    .kernarg_segment_align: 8
    .kernarg_segment_size: 28
    .language:       OpenCL C
    .language_version:
      - 2
      - 0
    .max_flat_workgroup_size: 1024
    .name:           _Z4diagPfS_S_i
    .private_segment_fixed_size: 0
    .sgpr_count:     18
    .sgpr_spill_count: 0
    .symbol:         _Z4diagPfS_S_i.kd
    .uniform_work_group_size: 1
    .uses_dynamic_stack: false
    .vgpr_count:     12
    .vgpr_spill_count: 0
    .wavefront_size: 32
    .workgroup_processor_mode: 1
  - .args:
      - .address_space:  global
        .offset:         0
        .size:           8
        .value_kind:     global_buffer
      - .address_space:  global
        .offset:         8
        .size:           8
        .value_kind:     global_buffer
      - .offset:         16
        .size:           4
        .value_kind:     by_value
      - .address_space:  global
        .offset:         24
        .size:           8
        .value_kind:     global_buffer
    .group_segment_fixed_size: 1024
    .kernarg_segment_align: 8
    .kernarg_segment_size: 32
    .language:       OpenCL C
    .language_version:
      - 2
      - 0
    .max_flat_workgroup_size: 1024
    .name:           _Z6jacobiPfS_iS_
    .private_segment_fixed_size: 0
    .sgpr_count:     18
    .sgpr_spill_count: 0
    .symbol:         _Z6jacobiPfS_iS_.kd
    .uniform_work_group_size: 1
    .uses_dynamic_stack: false
    .vgpr_count:     9
    .vgpr_spill_count: 0
    .wavefront_size: 32
    .workgroup_processor_mode: 1
amdhsa.target:   amdgcn-amd-amdhsa--gfx1100
amdhsa.version:
  - 1
  - 2
...

	.end_amdgpu_metadata
