#include "cuda.h"
#include <stdio.h>
//#include "mex.h"
/* Kernel to square elements of the array on the GPU */
__global__ void norm_elements(float* in, float* out, unsigned int N)
{
 
__shared__ float vOut[16];
int idx = blockIdx.x*blockDim.x+threadIdx.x;

if ( idx < N)vOut[idx] = in[idx]*in[idx];

__syncthreads();

if(idx == 0) {
    out[0] = 0;
	int i;
	for ( i = 0; i < N; i++ ) {
	   out[0] += vOut[i];
	}
}

__syncthreads();
if(idx == 0) {
	   out[0] = sqrt(out[0]);
}

}
void square_host(double* pIn, double *pOut, int sizeIn, int sizeOut)
{

int i, j;
double *data1, *data2;
float *data1f, *data2f;
float *data1f_gpu, *data2f_gpu;
int sizeBlock;
sizeBlock = 16;
data1 = pIn;
data2 = pOut;

/* Find the dimensions of the data */

/* Create an mxArray for the output data */

/* Create an input and output data array on the GPU*/
cudaMalloc( (void **) &data1f_gpu,sizeof(float)*sizeIn);
cudaMalloc( (void **) &data2f_gpu,sizeof(float)*sizeOut);
/* Retrieve the input data */

/* Check if the input array is single or double precision */

/* The input array is in double precision, it needs to be converted t
floats before being sent to the card */
data1f = (float *) malloc(sizeof(float)*sizeIn);
for (j = 0; j < sizeIn; j++)
{
data1f[j] = (float) data1[j];
}
    for (i = 0; i < sizeIn; i++)
    {
        printf("data1f[%d] = %f, ", i, data1f[i]);
    }
        printf("\n");

cudaMemcpy( data1f_gpu, data1f, sizeof(float)*sizeIn, cudaMemcpyHostToDevice);

data2f = (float *) malloc(sizeof(float)*sizeOut);
//cudaMemcpy( data2f_gpu, data2f, sizeof(float)*sizeOut, cudaMemcpyHostToDevice);

/* Compute execution configuration using 128 threads per block */
dim3 dimBlock(sizeBlock);
dim3 dimGrid((sizeIn)/dimBlock.x);
if ( (sizeIn) % sizeBlock !=0 ) dimGrid.x+=1;
    
/* Call function on GPU */
norm_elements<<<dimGrid,dimBlock>>>(data1f_gpu, data2f_gpu, sizeIn);
cudaError_t e;
e = cudaGetLastError();
if ( e != cudaSuccess)
{
    fprintf(stderr, "CUDA Error on square_elements: '%s' \n", cudaGetErrorString(e));
    exit(-1);
}

/* Copy result back to host */
cudaMemcpy( data2f, data2f_gpu, sizeof(float)*sizeOut, cudaMemcpyDeviceToHost);
    for (i = 0; i < sizeOut; i++)
    {
        printf("data2f[%d] = %f, ", i, data2f[i]);
    }
        printf("\n");


/* Create a pointer to the output data */

/* Convert from single to double before returning */
for (j = 0; j < sizeOut; j++)
{
data2[j] = (double) data2f[j];
}
/* Clean-up memory on device and host */
free(data1f);
free(data2f);
cudaFree(data1f_gpu);
cudaFree(data2f_gpu);
}

int main()
{

    double *pIn, *pOut;
    int sizeIn, sizeOut;
    int i;
    sizeIn = 2;
    sizeOut = 1;
    pIn = (double*)malloc(sizeof(double)*sizeIn);
    pOut = (double*)malloc(sizeof(double)*sizeOut);
    pIn[0] = 3;
    pIn[1] = 4;
    //pIn[2] = 3;
    square_host(pIn, pOut, sizeIn, sizeOut);
	
	printf("output square result");
    for (i = 0; i < sizeOut; i++)
    {	
        printf(" pOut[%d] = %lf, ", i, pOut[i]);
    }
        printf("\n");
	printf("output norm result");
    for (i = 0; i < sizeOut; i++)
    {
		//pOut[i] = sqrt(pOut[i]);
        printf("squre of pOut[%d] = %lf, ", i, pOut[i]);
    }
        printf("\n");
    
   
    free(pIn);
    free(pOut);
    return 0;
}




/* Gateway function */
/*
void mexFunction(int nlhs, mxArray *plhs[],
int nrhs, const mxArray *prhs[])
{
int i, j, m, n;
double *data1, *data2;
float *data1f, *data2f;
float *data1f_gpu, *data2f_gpu;
mxClassID category;
if (nrhs != nlhs)
mexErrMsgTxt("The number of input and output arguments must be the same.");

//Create an mxArray for the output data by buyu 
//plhs[0] = mxCreateDoubleMatrix(1, 1, mxREAL);
//create a float host output variable for float
//data2f = (float *) mxMalloc(sizeof(float));

for (i = 0; i < nrhs; i++)
{
// Find the dimensions of the data 
m = mxGetM(prhs[i]);
n = mxGetN(prhs[i]);

//Create an mxArray for the output data 
//plhs[i] = mxCreateDoubleMatrix(m, n, mxREAL);
  plhs[i] = mxCreateDoubleMatrix(1, 1, mxREAL);


// Create an input and output data array on the GPU
cudaMalloc( (void **) &data1f_gpu,sizeof(float)*m*n);
//cudaMalloc( (void **) &data2f_gpu,sizeof(float)*m*n);
cudaMalloc( (void **) &data2f_gpu,sizeof(float));

// Retrieve the input data 
data1 = mxGetPr(prhs[i]);
// Check if the input array is single or double precision 
category = mxGetClassID(prhs[i]);
if( category == mxSINGLE_CLASS)
{
// The input array is single precision, it can be sent directly to the card
cudaMemcpy( data1f_gpu, data1, sizeof(float)*m*n,
cudaMemcpyHostToDevice);
}
if( category == mxDOUBLE_CLASS)
{
// The input array is in double precision, it needs to be converted t floats before being sent to the card 
data1f = (float *) mxMalloc(sizeof(float)*m*n);
for (j = 0; j < m*n; j++)
{
data1f[j] = (float) data1[j];
}
printf("before copyHost to device \n");
cudaMemcpy( data1f_gpu, data1f, sizeof(float)*n*m, cudaMemcpyHostToDevice);
}

//orginal output
//data2f = (float *) mxMalloc(sizeof(float)*m*n);
data2f = (float *) mxMalloc(sizeof(float));

// Compute execution configuration using 128 threads per block 
dim3 dimBlock(128);
dim3 dimGrid((m*n)/dimBlock.x);
if ( (n*m) % 128 !=0 ) dimGrid.x+=1;
    
printf("before calling GPU \n");
// Call function on GPU 
square_elements<<<dimGrid,dimBlock>>>(data1f_gpu, data2f_gpu, n*m);

printf("before copy result back \n");
// Copy result back to host 
//cudaMemcpy( data2f, data2f_gpu, sizeof(float)*n*m, cudaMemcpyDeviceToHost);
cudaMemcpy( data2f, data2f_gpu, sizeof(float), cudaMemcpyDeviceToHost);
// Create a pointer to the output data 
data2 = mxGetPr(plhs[i]);
// Convert from single to double before returning 

//for (j = 0; j < m*n; j++)
//{
//data2[j] = (double) data2f[j];
//}

printf("before return result to matlab \n");
data2[0] = 0;
data2[0] = (double) data2f[0];

// Clean-up memory on device and host 
mxFree(data1f);
mxFree(data2f);
cudaFree(data1f_gpu);
cudaFree(data2f_gpu);
}// for i

}
*/

	.file	"tmpxft_0023242c_00000000-6_norm_cuda_gpu.cudafe1.cpp"
	.text
#APP

#NO_APP
	.type	_ZL26__cudaUnregisterBinaryUtilv, @function
_ZL26__cudaUnregisterBinaryUtilv:
.LFB2031:
	.cfi_startproc
	endbr64
	movq	_ZL20__cudaFatCubinHandle(%rip), %rdi
	jmp	__cudaUnregisterFatBinary@PLT
	.cfi_endproc
.LFE2031:
	.size	_ZL26__cudaUnregisterBinaryUtilv, .-_ZL26__cudaUnregisterBinaryUtilv
	.globl	_Z36__device_stub__Z13norm_elementsPfS_jPfS_j
	.type	_Z36__device_stub__Z13norm_elementsPfS_jPfS_j, @function
_Z36__device_stub__Z13norm_elementsPfS_jPfS_j:
.LFB2053:
	.cfi_startproc
	endbr64
	subq	$136, %rsp
	.cfi_def_cfa_offset 144
	movq	%rdi, 24(%rsp)
	leaq	40(%rsp), %rcx
	leaq	48(%rsp), %rdi
	movq	%rsi, 16(%rsp)
	leaq	60(%rsp), %rsi
	movl	%edx, 12(%rsp)
	leaq	32(%rsp), %rdx
	movq	%fs:40, %rax
	movq	%rax, 120(%rsp)
	xorl	%eax, %eax
	leaq	24(%rsp), %rax
	movl	$1, 56(%rsp)
	movq	%rax, 96(%rsp)
	leaq	16(%rsp), %rax
	movq	%rax, 104(%rsp)
	leaq	12(%rsp), %rax
	movq	%rax, 112(%rsp)
	movabsq	$4294967297, %rax
	movq	%rax, 48(%rsp)
	movq	%rax, 60(%rsp)
	movl	$1, 68(%rsp)
	call	__cudaPopCallConfiguration@PLT
	testl	%eax, %eax
	jne	.L2
	pushq	40(%rsp)
	.cfi_def_cfa_offset 152
	leaq	_Z13norm_elementsPfS_j(%rip), %rdi
	pushq	40(%rsp)
	.cfi_def_cfa_offset 160
	movq	76(%rsp), %rcx
	movl	84(%rsp), %r8d
	movq	64(%rsp), %rsi
	movl	72(%rsp), %edx
	leaq	112(%rsp), %r9
	call	cudaLaunchKernel@PLT
	popq	%rax
	.cfi_def_cfa_offset 152
	popq	%rdx
	.cfi_def_cfa_offset 144
.L2:
	movq	120(%rsp), %rax
	subq	%fs:40, %rax
	je	.L4
	call	__stack_chk_fail@PLT
.L4:
	addq	$136, %rsp
	.cfi_def_cfa_offset 8
	ret
	.cfi_endproc
.LFE2053:
	.size	_Z36__device_stub__Z13norm_elementsPfS_jPfS_j, .-_Z36__device_stub__Z13norm_elementsPfS_jPfS_j
	.globl	_Z13norm_elementsPfS_j
	.type	_Z13norm_elementsPfS_j, @function
_Z13norm_elementsPfS_j:
.LFB2054:
	.cfi_startproc
	endbr64
	jmp	_Z36__device_stub__Z13norm_elementsPfS_jPfS_j
	.cfi_endproc
.LFE2054:
	.size	_Z13norm_elementsPfS_j, .-_Z13norm_elementsPfS_j
	.section	.rodata.str1.1,"aMS",@progbits,1
.LC0:
	.string	"data1f[%d] = %f, "
.LC1:
	.string	"\n"
.LC2:
	.string	"CUDA Error on square_elements: '%s' \n"
.LC3:
	.string	"data2f[%d] = %f, "
	.text
	.globl	_Z11square_hostPdS_ii
	.type	_Z11square_hostPdS_ii, @function
_Z11square_hostPdS_ii:
.LFB2027:
	.cfi_startproc
	endbr64
	pushq	%r15
	.cfi_def_cfa_offset 16
	.cfi_offset 15, -16
	movq	%rdi, %r15
	pushq	%r14
	.cfi_def_cfa_offset 24
	.cfi_offset 14, -24
	movq	%rsi, %r14
	pushq	%r13
	.cfi_def_cfa_offset 32
	.cfi_offset 13, -32
	movl	%ecx, %r13d
	pushq	%r12
	.cfi_def_cfa_offset 40
	.cfi_offset 12, -40
	pushq	%rbp
	.cfi_def_cfa_offset 48
	.cfi_offset 6, -48
	movslq	%edx, %rbp
	pushq	%rbx
	.cfi_def_cfa_offset 56
	.cfi_offset 3, -56
	movq	%rbp, %rbx
	subq	$72, %rsp
	.cfi_def_cfa_offset 128
	movq	%fs:40, %rax
	movq	%rax, 56(%rsp)
	xorl	%eax, %eax
	leaq	0(,%rbp,4), %rax
	leaq	16(%rsp), %rdi
	movq	%rax, %rsi
	movq	%rax, (%rsp)
	call	cudaMalloc@PLT
	movslq	%r13d, %rax
	leaq	24(%rsp), %rdi
	salq	$2, %rax
	movq	%rax, %rsi
	movq	%rax, 8(%rsp)
	call	cudaMalloc@PLT
	movq	(%rsp), %rdi
	call	malloc@PLT
	movq	%rax, %r12
	xorl	%eax, %eax
.L9:
	cmpl	%eax, %ebx
	jle	.L24
	cvtsd2ss	(%r15,%rax,8), %xmm0
	movss	%xmm0, (%r12,%rax,4)
	incq	%rax
	jmp	.L9
.L24:
	xorl	%ebp, %ebp
	leaq	.LC0(%rip), %r15
.L11:
	movl	%ebp, %edx
	cmpl	%ebp, %ebx
	jle	.L25
	movq	%r15, %rsi
	movl	$2, %edi
	movb	$1, %al
	cvtss2sd	(%r12,%rbp,4), %xmm0
	call	__printf_chk@PLT
	incq	%rbp
	jmp	.L11
.L25:
	leaq	.LC1(%rip), %r15
	movl	$2, %edi
	xorl	%eax, %eax
	movq	%r15, %rsi
	call	__printf_chk@PLT
	movq	(%rsp), %rdx
	movq	16(%rsp), %rdi
	movq	%r12, %rsi
	movl	$1, %ecx
	call	cudaMemcpy@PLT
	movq	8(%rsp), %rdi
	call	malloc@PLT
	movl	%ebx, %edx
	movl	$1, 36(%rsp)
	movl	$1, %ecx
	andl	$15, %edx
	movq	%rax, %rbp
	movl	%ebx, %eax
	movl	$1, 48(%rsp)
	shrl	$4, %eax
	cmpl	$1, %edx
	movl	$16, 32(%rsp)
	movq	32(%rsp), %rdx
	sbbl	$-1, %eax
	movl	$1, %esi
	xorl	%r9d, %r9d
	xorl	%r8d, %r8d
	movl	%eax, 44(%rsp)
	movq	44(%rsp), %rdi
	call	__cudaPushCallConfiguration@PLT
	testl	%eax, %eax
	jne	.L14
	movq	24(%rsp), %rsi
	movq	16(%rsp), %rdi
	movl	%ebx, %edx
	call	_Z36__device_stub__Z13norm_elementsPfS_jPfS_j
.L14:
	call	cudaGetLastError@PLT
	movl	%eax, %edi
	testl	%eax, %eax
	je	.L15
	call	cudaGetErrorString@PLT
	movq	stderr(%rip), %rdi
	movl	$2, %esi
	leaq	.LC2(%rip), %rdx
	movq	%rax, %rcx
	xorl	%eax, %eax
	call	__fprintf_chk@PLT
	orl	$-1, %edi
	call	exit@PLT
.L15:
	movq	8(%rsp), %rdx
	movq	24(%rsp), %rsi
	movq	%rbp, %rdi
	xorl	%ebx, %ebx
	movl	$2, %ecx
	call	cudaMemcpy@PLT
.L16:
	movl	%ebx, %edx
	cmpl	%ebx, %r13d
	jle	.L26
	leaq	.LC3(%rip), %rsi
	movl	$2, %edi
	movb	$1, %al
	cvtss2sd	0(%rbp,%rbx,4), %xmm0
	call	__printf_chk@PLT
	incq	%rbx
	jmp	.L16
.L26:
	movq	%r15, %rsi
	movl	$2, %edi
	xorl	%eax, %eax
	call	__printf_chk@PLT
	xorl	%eax, %eax
.L18:
	cmpl	%eax, %r13d
	jle	.L27
	cvtss2sd	0(%rbp,%rax,4), %xmm0
	movsd	%xmm0, (%r14,%rax,8)
	incq	%rax
	jmp	.L18
.L27:
	movq	%r12, %rdi
	call	free@PLT
	movq	%rbp, %rdi
	call	free@PLT
	movq	16(%rsp), %rdi
	call	cudaFree@PLT
	movq	24(%rsp), %rdi
	call	cudaFree@PLT
	movq	56(%rsp), %rax
	subq	%fs:40, %rax
	je	.L20
	call	__stack_chk_fail@PLT
.L20:
	addq	$72, %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
.LFE2027:
	.size	_Z11square_hostPdS_ii, .-_Z11square_hostPdS_ii
	.section	.rodata.str1.1
.LC6:
	.string	"output square result"
.LC7:
	.string	" pOut[%d] = %lf, "
.LC8:
	.string	"output norm result"
.LC9:
	.string	"squre of pOut[%d] = %lf, "
	.section	.text.startup,"ax",@progbits
	.globl	main
	.type	main, @function
main:
.LFB2028:
	.cfi_startproc
	endbr64
	pushq	%r12
	.cfi_def_cfa_offset 16
	.cfi_offset 12, -16
	movl	$16, %edi
	leaq	.LC1(%rip), %r12
	pushq	%rbp
	.cfi_def_cfa_offset 24
	.cfi_offset 6, -24
	pushq	%rbx
	.cfi_def_cfa_offset 32
	.cfi_offset 3, -32
	subq	$16, %rsp
	.cfi_def_cfa_offset 48
	call	malloc@PLT
	movl	$8, %edi
	movq	%rax, %rbx
	call	malloc@PLT
	movl	$1, %ecx
	movl	$2, %edx
	movq	%rbx, %rdi
	movq	%rax, %rbp
	movq	.LC4(%rip), %rax
	movq	%rbp, %rsi
	movq	%rax, (%rbx)
	movq	.LC5(%rip), %rax
	movq	%rax, 8(%rbx)
	call	_Z11square_hostPdS_ii
	leaq	.LC6(%rip), %rsi
	movl	$2, %edi
	xorl	%eax, %eax
	call	__printf_chk@PLT
	movsd	0(%rbp), %xmm0
	xorl	%edx, %edx
	movb	$1, %al
	leaq	.LC7(%rip), %rsi
	movl	$2, %edi
	movsd	%xmm0, 8(%rsp)
	call	__printf_chk@PLT
	movq	%r12, %rsi
	movl	$2, %edi
	xorl	%eax, %eax
	call	__printf_chk@PLT
	leaq	.LC8(%rip), %rsi
	movl	$2, %edi
	xorl	%eax, %eax
	call	__printf_chk@PLT
	movsd	8(%rsp), %xmm0
	xorl	%edx, %edx
	movb	$1, %al
	leaq	.LC9(%rip), %rsi
	movl	$2, %edi
	call	__printf_chk@PLT
	movq	%r12, %rsi
	movl	$2, %edi
	xorl	%eax, %eax
	call	__printf_chk@PLT
	movq	%rbx, %rdi
	call	free@PLT
	movq	%rbp, %rdi
	call	free@PLT
	addq	$16, %rsp
	.cfi_def_cfa_offset 32
	xorl	%eax, %eax
	popq	%rbx
	.cfi_def_cfa_offset 24
	popq	%rbp
	.cfi_def_cfa_offset 16
	popq	%r12
	.cfi_def_cfa_offset 8
	ret
	.cfi_endproc
.LFE2028:
	.size	main, .-main
	.section	.rodata.str1.1
.LC10:
	.string	"_Z13norm_elementsPfS_j"
	.section	.text.startup
	.type	_ZL24__sti____cudaRegisterAllv, @function
_ZL24__sti____cudaRegisterAllv:
.LFB2056:
	.cfi_startproc
	endbr64
	pushq	%rax
	.cfi_def_cfa_offset 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	.LC10(%rip), %rdx
	movq	%rax, %rdi
	leaq	_Z13norm_elementsPfS_j(%rip), %rsi
	pushq	$0
	.cfi_def_cfa_offset 40
	movq	%rdx, %rcx
	pushq	$0
	.cfi_def_cfa_offset 48
	movq	%rax, _ZL20__cudaFatCubinHandle(%rip)
	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	%rdx
	.cfi_def_cfa_offset 8
	jmp	atexit@PLT
	.cfi_endproc
.LFE2056:
	.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.cst8,"aM",@progbits,8
	.align 8
.LC4:
	.long	0
	.long	1074266112
	.align 8
.LC5:
	.long	0
	.long	1074790400
	.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:

#include "hip/hip_runtime.h"
#include <stdio.h>
//#include "mex.h"
/* Kernel to square elements of the array on the GPU */
__global__ void norm_elements(float* in, float* out, unsigned int N)
{
 
__shared__ float vOut[16];
int idx = blockIdx.x*blockDim.x+threadIdx.x;

if ( idx < N)vOut[idx] = in[idx]*in[idx];

__syncthreads();

if(idx == 0) {
    out[0] = 0;
	int i;
	for ( i = 0; i < N; i++ ) {
	   out[0] += vOut[i];
	}
}

__syncthreads();
if(idx == 0) {
	   out[0] = sqrt(out[0]);
}

}
void square_host(double* pIn, double *pOut, int sizeIn, int sizeOut)
{

int i, j;
double *data1, *data2;
float *data1f, *data2f;
float *data1f_gpu, *data2f_gpu;
int sizeBlock;
sizeBlock = 16;
data1 = pIn;
data2 = pOut;

/* Find the dimensions of the data */

/* Create an mxArray for the output data */

/* Create an input and output data array on the GPU*/
hipMalloc( (void **) &data1f_gpu,sizeof(float)*sizeIn);
hipMalloc( (void **) &data2f_gpu,sizeof(float)*sizeOut);
/* Retrieve the input data */

/* Check if the input array is single or double precision */

/* The input array is in double precision, it needs to be converted t
floats before being sent to the card */
data1f = (float *) malloc(sizeof(float)*sizeIn);
for (j = 0; j < sizeIn; j++)
{
data1f[j] = (float) data1[j];
}
    for (i = 0; i < sizeIn; i++)
    {
        printf("data1f[%d] = %f, ", i, data1f[i]);
    }
        printf("\n");

hipMemcpy( data1f_gpu, data1f, sizeof(float)*sizeIn, hipMemcpyHostToDevice);

data2f = (float *) malloc(sizeof(float)*sizeOut);
//cudaMemcpy( data2f_gpu, data2f, sizeof(float)*sizeOut, cudaMemcpyHostToDevice);

/* Compute execution configuration using 128 threads per block */
dim3 dimBlock(sizeBlock);
dim3 dimGrid((sizeIn)/dimBlock.x);
if ( (sizeIn) % sizeBlock !=0 ) dimGrid.x+=1;
    
/* Call function on GPU */
norm_elements<<<dimGrid,dimBlock>>>(data1f_gpu, data2f_gpu, sizeIn);
hipError_t e;
e = hipGetLastError();
if ( e != hipSuccess)
{
    fprintf(stderr, "CUDA Error on square_elements: '%s' \n", hipGetErrorString(e));
    exit(-1);
}

/* Copy result back to host */
hipMemcpy( data2f, data2f_gpu, sizeof(float)*sizeOut, hipMemcpyDeviceToHost);
    for (i = 0; i < sizeOut; i++)
    {
        printf("data2f[%d] = %f, ", i, data2f[i]);
    }
        printf("\n");


/* Create a pointer to the output data */

/* Convert from single to double before returning */
for (j = 0; j < sizeOut; j++)
{
data2[j] = (double) data2f[j];
}
/* Clean-up memory on device and host */
free(data1f);
free(data2f);
hipFree(data1f_gpu);
hipFree(data2f_gpu);
}

int main()
{

    double *pIn, *pOut;
    int sizeIn, sizeOut;
    int i;
    sizeIn = 2;
    sizeOut = 1;
    pIn = (double*)malloc(sizeof(double)*sizeIn);
    pOut = (double*)malloc(sizeof(double)*sizeOut);
    pIn[0] = 3;
    pIn[1] = 4;
    //pIn[2] = 3;
    square_host(pIn, pOut, sizeIn, sizeOut);
	
	printf("output square result");
    for (i = 0; i < sizeOut; i++)
    {	
        printf(" pOut[%d] = %lf, ", i, pOut[i]);
    }
        printf("\n");
	printf("output norm result");
    for (i = 0; i < sizeOut; i++)
    {
		//pOut[i] = sqrt(pOut[i]);
        printf("squre of pOut[%d] = %lf, ", i, pOut[i]);
    }
        printf("\n");
    
   
    free(pIn);
    free(pOut);
    return 0;
}




/* Gateway function */
/*
void mexFunction(int nlhs, mxArray *plhs[],
int nrhs, const mxArray *prhs[])
{
int i, j, m, n;
double *data1, *data2;
float *data1f, *data2f;
float *data1f_gpu, *data2f_gpu;
mxClassID category;
if (nrhs != nlhs)
mexErrMsgTxt("The number of input and output arguments must be the same.");

//Create an mxArray for the output data by buyu 
//plhs[0] = mxCreateDoubleMatrix(1, 1, mxREAL);
//create a float host output variable for float
//data2f = (float *) mxMalloc(sizeof(float));

for (i = 0; i < nrhs; i++)
{
// Find the dimensions of the data 
m = mxGetM(prhs[i]);
n = mxGetN(prhs[i]);

//Create an mxArray for the output data 
//plhs[i] = mxCreateDoubleMatrix(m, n, mxREAL);
  plhs[i] = mxCreateDoubleMatrix(1, 1, mxREAL);


// Create an input and output data array on the GPU
cudaMalloc( (void **) &data1f_gpu,sizeof(float)*m*n);
//cudaMalloc( (void **) &data2f_gpu,sizeof(float)*m*n);
cudaMalloc( (void **) &data2f_gpu,sizeof(float));

// Retrieve the input data 
data1 = mxGetPr(prhs[i]);
// Check if the input array is single or double precision 
category = mxGetClassID(prhs[i]);
if( category == mxSINGLE_CLASS)
{
// The input array is single precision, it can be sent directly to the card
cudaMemcpy( data1f_gpu, data1, sizeof(float)*m*n,
cudaMemcpyHostToDevice);
}
if( category == mxDOUBLE_CLASS)
{
// The input array is in double precision, it needs to be converted t floats before being sent to the card 
data1f = (float *) mxMalloc(sizeof(float)*m*n);
for (j = 0; j < m*n; j++)
{
data1f[j] = (float) data1[j];
}
printf("before copyHost to device \n");
cudaMemcpy( data1f_gpu, data1f, sizeof(float)*n*m, cudaMemcpyHostToDevice);
}

//orginal output
//data2f = (float *) mxMalloc(sizeof(float)*m*n);
data2f = (float *) mxMalloc(sizeof(float));

// Compute execution configuration using 128 threads per block 
dim3 dimBlock(128);
dim3 dimGrid((m*n)/dimBlock.x);
if ( (n*m) % 128 !=0 ) dimGrid.x+=1;
    
printf("before calling GPU \n");
// Call function on GPU 
square_elements<<<dimGrid,dimBlock>>>(data1f_gpu, data2f_gpu, n*m);

printf("before copy result back \n");
// Copy result back to host 
//cudaMemcpy( data2f, data2f_gpu, sizeof(float)*n*m, cudaMemcpyDeviceToHost);
cudaMemcpy( data2f, data2f_gpu, sizeof(float), cudaMemcpyDeviceToHost);
// Create a pointer to the output data 
data2 = mxGetPr(plhs[i]);
// Convert from single to double before returning 

//for (j = 0; j < m*n; j++)
//{
//data2[j] = (double) data2f[j];
//}

printf("before return result to matlab \n");
data2[0] = 0;
data2[0] = (double) data2f[0];

// Clean-up memory on device and host 
mxFree(data1f);
mxFree(data2f);
cudaFree(data1f_gpu);
cudaFree(data2f_gpu);
}// for i

}
*/

	.text
	.file	"norm_cuda_gpu.hip"
	.globl	_Z28__device_stub__norm_elementsPfS_j # -- Begin function _Z28__device_stub__norm_elementsPfS_j
	.type	_Z28__device_stub__norm_elementsPfS_j,@function
_Z28__device_stub__norm_elementsPfS_j:  # @_Z28__device_stub__norm_elementsPfS_j
	.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), %rcx
	movq	%rsi, (%rcx)
	leaq	12(%rsp), %rsi
	movl	%edx, (%rsi)
	leaq	80(%rsp), %rbx
	movq	%rax, (%rbx)
	movq	%rcx, 8(%rbx)
	movq	%rsi, 16(%rbx)
	leaq	64(%rsp), %r14
	leaq	48(%rsp), %r15
	leaq	24(%rsp), %r12
	leaq	16(%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	$_Z13norm_elementsPfS_j, %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	_Z28__device_stub__norm_elementsPfS_j, .Lfunc_end0-_Z28__device_stub__norm_elementsPfS_j
	.cfi_endproc
                                        # -- End function
	.globl	_Z11square_hostPdS_ii           # -- Begin function _Z11square_hostPdS_ii
	.type	_Z11square_hostPdS_ii,@function
_Z11square_hostPdS_ii:                  # @_Z11square_hostPdS_ii
	.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	$40, %rsp
	.cfi_def_cfa_offset 96
	.cfi_offset %rbx, -56
	.cfi_offset %r12, -48
	.cfi_offset %r13, -40
	.cfi_offset %r14, -32
	.cfi_offset %r15, -24
	.cfi_offset %rbp, -16
	movl	%ecx, %r14d
	movq	%rsi, %rbx
	movq	%rdi, %rbp
	movl	%edx, 12(%rsp)                  # 4-byte Spill
	movslq	%edx, %r12
	leaq	(,%r12,4), %r13
	leaq	24(%rsp), %rdi
	movq	%r13, %rsi
	callq	hipMalloc
	movl	%r14d, 36(%rsp)                 # 4-byte Spill
	movslq	%r14d, %r15
	shlq	$2, %r15
	leaq	16(%rsp), %rdi
	movq	%r15, %rsi
	callq	hipMalloc
	movq	%r13, %rdi
	callq	malloc
	movq	%rax, %r14
	testl	%r12d, %r12d
	jle	.LBB1_6
# %bb.1:                                # %.lr.ph.preheader
	movl	12(%rsp), %r12d                 # 4-byte Reload
	xorl	%eax, %eax
.LBB1_2:                                # %.lr.ph
                                        # =>This Inner Loop Header: Depth=1
	xorps	%xmm0, %xmm0
	cvtsd2ss	(%rbp,%rax,8), %xmm0
	movss	%xmm0, (%r14,%rax,4)
	incq	%rax
	cmpq	%rax, %r12
	jne	.LBB1_2
# %bb.3:                                # %.preheader
	cmpl	$0, 12(%rsp)                    # 4-byte Folded Reload
	jle	.LBB1_6
# %bb.4:                                # %.lr.ph67.preheader
	xorl	%ebp, %ebp
.LBB1_5:                                # %.lr.ph67
                                        # =>This Inner Loop Header: Depth=1
	xorps	%xmm0, %xmm0
	cvtss2sd	(%r14,%rbp,4), %xmm0
	movl	$.L.str, %edi
	movl	%ebp, %esi
	movb	$1, %al
	callq	printf
	incq	%rbp
	cmpq	%rbp, %r12
	jne	.LBB1_5
.LBB1_6:                                # %._crit_edge
	movl	$10, %edi
	callq	putchar@PLT
	movq	24(%rsp), %rdi
	movq	%r14, %rsi
	movq	%r13, %rdx
	movl	$1, %ecx
	callq	hipMemcpy
	movq	%r15, %rdi
	callq	malloc
	movl	12(%rsp), %ebp                  # 4-byte Reload
	movl	%ebp, %edi
	shrl	$4, %edi
	movl	%ebp, %ecx
	andl	$15, %ecx
	cmpl	$1, %ecx
	sbbl	$-1, %edi
	movq	%rax, %r13
	btsq	$32, %rdi
	movabsq	$4294967296, %rdx               # imm = 0x100000000
	orq	$16, %rdx
	movl	$1, %esi
	movl	$1, %ecx
	xorl	%r8d, %r8d
	xorl	%r9d, %r9d
	callq	__hipPushCallConfiguration
	testl	%eax, %eax
	jne	.LBB1_8
# %bb.7:
	movq	24(%rsp), %rdi
	movq	16(%rsp), %rsi
	movl	%ebp, %edx
	callq	_Z28__device_stub__norm_elementsPfS_j
.LBB1_8:
	callq	hipGetLastError
	testl	%eax, %eax
	movl	36(%rsp), %ebp                  # 4-byte Reload
	jne	.LBB1_17
# %bb.9:
	movq	16(%rsp), %rsi
	movq	%r13, %rdi
	movq	%r15, %rdx
	movl	$2, %ecx
	callq	hipMemcpy
	testl	%ebp, %ebp
	jle	.LBB1_10
# %bb.11:                               # %.lr.ph70.preheader
	movl	%ebp, %r12d
	xorl	%r15d, %r15d
.LBB1_12:                               # %.lr.ph70
                                        # =>This Inner Loop Header: Depth=1
	xorps	%xmm0, %xmm0
	cvtss2sd	(%r13,%r15,4), %xmm0
	movl	$.L.str.3, %edi
	movl	%r15d, %esi
	movb	$1, %al
	callq	printf
	incq	%r15
	cmpq	%r15, %r12
	jne	.LBB1_12
# %bb.13:                               # %._crit_edge71
	movl	$10, %edi
	callq	putchar@PLT
	testl	%ebp, %ebp
	jle	.LBB1_16
# %bb.14:                               # %.lr.ph74.preheader
	xorl	%eax, %eax
.LBB1_15:                               # %.lr.ph74
                                        # =>This Inner Loop Header: Depth=1
	xorps	%xmm0, %xmm0
	cvtss2sd	(%r13,%rax,4), %xmm0
	movsd	%xmm0, (%rbx,%rax,8)
	incq	%rax
	cmpq	%rax, %r12
	jne	.LBB1_15
	jmp	.LBB1_16
.LBB1_10:                               # %._crit_edge71.thread
	movl	$10, %edi
	callq	putchar@PLT
.LBB1_16:                               # %._crit_edge75
	movq	%r14, %rdi
	callq	free
	movq	%r13, %rdi
	callq	free
	movq	24(%rsp), %rdi
	callq	hipFree
	movq	16(%rsp), %rdi
	callq	hipFree
	addq	$40, %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
.LBB1_17:
	.cfi_def_cfa_offset 96
	movq	stderr(%rip), %rbx
	movl	%eax, %edi
	callq	hipGetErrorString
	movl	$.L.str.2, %esi
	movq	%rbx, %rdi
	movq	%rax, %rdx
	xorl	%eax, %eax
	callq	fprintf
	movl	$-1, %edi
	callq	exit
.Lfunc_end1:
	.size	_Z11square_hostPdS_ii, .Lfunc_end1-_Z11square_hostPdS_ii
	.cfi_endproc
                                        # -- End function
	.globl	main                            # -- Begin function main
	.type	main,@function
main:                                   # @main
	.cfi_startproc
# %bb.0:                                # %.critedge
	pushq	%r14
	.cfi_def_cfa_offset 16
	pushq	%rbx
	.cfi_def_cfa_offset 24
	pushq	%rax
	.cfi_def_cfa_offset 32
	.cfi_offset %rbx, -24
	.cfi_offset %r14, -16
	movl	$16, %edi
	callq	malloc
	movq	%rax, %rbx
	movl	$8, %edi
	callq	malloc
	movq	%rax, %r14
	movabsq	$4613937818241073152, %rax      # imm = 0x4008000000000000
	movq	%rax, (%rbx)
	movabsq	$4616189618054758400, %rax      # imm = 0x4010000000000000
	movq	%rax, 8(%rbx)
	movq	%rbx, %rdi
	movq	%r14, %rsi
	movl	$2, %edx
	movl	$1, %ecx
	callq	_Z11square_hostPdS_ii
	movl	$.L.str.4, %edi
	xorl	%eax, %eax
	callq	printf
	movsd	(%r14), %xmm0                   # xmm0 = mem[0],zero
	movsd	%xmm0, (%rsp)                   # 8-byte Spill
	movl	$.L.str.5, %edi
	xorl	%esi, %esi
	movb	$1, %al
	callq	printf
	movl	$10, %edi
	callq	putchar@PLT
	movl	$.L.str.6, %edi
	xorl	%eax, %eax
	callq	printf
	movl	$.L.str.7, %edi
	xorl	%esi, %esi
	movsd	(%rsp), %xmm0                   # 8-byte Reload
                                        # xmm0 = mem[0],zero
	movb	$1, %al
	callq	printf
	movl	$10, %edi
	callq	putchar@PLT
	movq	%rbx, %rdi
	callq	free
	movq	%r14, %rdi
	callq	free
	xorl	%eax, %eax
	addq	$8, %rsp
	.cfi_def_cfa_offset 24
	popq	%rbx
	.cfi_def_cfa_offset 16
	popq	%r14
	.cfi_def_cfa_offset 8
	retq
.Lfunc_end2:
	.size	main, .Lfunc_end2-main
	.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:
	subq	$40, %rsp
	.cfi_def_cfa_offset 48
	movq	__hip_gpubin_handle(%rip), %rdi
	testq	%rdi, %rdi
	jne	.LBB3_2
# %bb.1:
	movl	$__hip_fatbin_wrapper, %edi
	callq	__hipRegisterFatBinary
	movq	%rax, %rdi
	movq	%rax, __hip_gpubin_handle(%rip)
.LBB3_2:
	xorps	%xmm0, %xmm0
	movups	%xmm0, 16(%rsp)
	movups	%xmm0, (%rsp)
	movl	$_Z13norm_elementsPfS_j, %esi
	movl	$.L__unnamed_1, %edx
	movl	$.L__unnamed_1, %ecx
	movl	$-1, %r8d
	xorl	%r9d, %r9d
	callq	__hipRegisterFunction
	movl	$__hip_module_dtor, %edi
	addq	$40, %rsp
	.cfi_def_cfa_offset 8
	jmp	atexit                          # TAILCALL
.Lfunc_end3:
	.size	__hip_module_ctor, .Lfunc_end3-__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	.LBB4_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
.LBB4_2:
	retq
.Lfunc_end4:
	.size	__hip_module_dtor, .Lfunc_end4-__hip_module_dtor
	.cfi_endproc
                                        # -- End function
	.type	_Z13norm_elementsPfS_j,@object  # @_Z13norm_elementsPfS_j
	.section	.rodata,"a",@progbits
	.globl	_Z13norm_elementsPfS_j
	.p2align	3, 0x0
_Z13norm_elementsPfS_j:
	.quad	_Z28__device_stub__norm_elementsPfS_j
	.size	_Z13norm_elementsPfS_j, 8

	.type	.L.str,@object                  # @.str
	.section	.rodata.str1.1,"aMS",@progbits,1
.L.str:
	.asciz	"data1f[%d] = %f, "
	.size	.L.str, 18

	.type	.L.str.2,@object                # @.str.2
.L.str.2:
	.asciz	"CUDA Error on square_elements: '%s' \n"
	.size	.L.str.2, 38

	.type	.L.str.3,@object                # @.str.3
.L.str.3:
	.asciz	"data2f[%d] = %f, "
	.size	.L.str.3, 18

	.type	.L.str.4,@object                # @.str.4
.L.str.4:
	.asciz	"output square result"
	.size	.L.str.4, 21

	.type	.L.str.5,@object                # @.str.5
.L.str.5:
	.asciz	" pOut[%d] = %lf, "
	.size	.L.str.5, 18

	.type	.L.str.6,@object                # @.str.6
.L.str.6:
	.asciz	"output norm result"
	.size	.L.str.6, 19

	.type	.L.str.7,@object                # @.str.7
.L.str.7:
	.asciz	"squre of pOut[%d] = %lf, "
	.size	.L.str.7, 26

	.type	.L__unnamed_1,@object           # @0
.L__unnamed_1:
	.asciz	"_Z13norm_elementsPfS_j"
	.size	.L__unnamed_1, 23

	.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 _Z28__device_stub__norm_elementsPfS_j
	.addrsig_sym __hip_module_ctor
	.addrsig_sym __hip_module_dtor
	.addrsig_sym _Z13norm_elementsPfS_j
	.addrsig_sym __hip_fatbin
	.addrsig_sym __hip_fatbin_wrapper
	.addrsig_sym __hip_cuid_

	.text
	.amdgcn_target "amdgcn-amd-amdhsa--gfx1100"
	.protected	_Z13norm_elementsPfS_j  ; -- Begin function _Z13norm_elementsPfS_j
	.globl	_Z13norm_elementsPfS_j
	.p2align	8
	.type	_Z13norm_elementsPfS_j,@function
_Z13norm_elementsPfS_j:                 ; @_Z13norm_elementsPfS_j
; %bb.0:
	s_clause 0x2
	s_load_b32 s5, s[0:1], 0x24
	s_load_b32 s4, s[0:1], 0x10
	s_load_b128 s[0:3], s[0:1], 0x0
	s_waitcnt lgkmcnt(0)
	s_and_b32 s5, s5, 0xffff
	s_delay_alu instid0(SALU_CYCLE_1) | instskip(SKIP_1) | instid1(VALU_DEP_1)
	v_mad_u64_u32 v[1:2], null, s15, s5, v[0:1]
	s_mov_b32 s5, exec_lo
	v_cmpx_gt_u32_e64 s4, v1
	s_cbranch_execz .LBB0_2
; %bb.1:
	v_ashrrev_i32_e32 v2, 31, v1
	s_delay_alu instid0(VALU_DEP_1) | instskip(NEXT) | instid1(VALU_DEP_1)
	v_lshlrev_b64 v[2:3], 2, v[1:2]
	v_add_co_u32 v2, vcc_lo, s0, v2
	s_delay_alu instid0(VALU_DEP_2)
	v_add_co_ci_u32_e32 v3, vcc_lo, s1, v3, vcc_lo
	global_load_b32 v0, v[2:3], off
	v_lshlrev_b32_e32 v2, 2, v1
	s_waitcnt vmcnt(0)
	v_mul_f32_e32 v0, v0, v0
	ds_store_b32 v2, v0
.LBB0_2:
	s_or_b32 exec_lo, exec_lo, s5
	v_cmp_eq_u32_e32 vcc_lo, 0, v1
	s_waitcnt lgkmcnt(0)
	s_barrier
	buffer_gl0_inv
	s_and_saveexec_b32 s0, vcc_lo
	s_cbranch_execz .LBB0_7
; %bb.3:
	v_mov_b32_e32 v0, 0
	s_cmp_eq_u32 s4, 0
	global_store_b32 v0, v0, s[2:3]
	s_cbranch_scc1 .LBB0_7
; %bb.4:                                ; %.lr.ph.preheader
	s_mov_b32 s1, 0
.LBB0_5:                                ; %.lr.ph
                                        ; =>This Inner Loop Header: Depth=1
	s_delay_alu instid0(SALU_CYCLE_1)
	v_mov_b32_e32 v1, s1
	s_add_i32 s4, s4, -1
	s_add_i32 s1, s1, 4
	s_cmp_lg_u32 s4, 0
	ds_load_b32 v1, v1
	s_waitcnt lgkmcnt(0)
	v_add_f32_e32 v0, v1, v0
	s_cbranch_scc1 .LBB0_5
; %bb.6:                                ; %..loopexit_crit_edge
	v_mov_b32_e32 v1, 0
	global_store_b32 v1, v0, s[2:3]
.LBB0_7:                                ; %.loopexit
	s_or_b32 exec_lo, exec_lo, s0
	s_waitcnt_vscnt null, 0x0
	s_barrier
	buffer_gl0_inv
	s_and_saveexec_b32 s0, vcc_lo
	s_cbranch_execz .LBB0_9
; %bb.8:
	v_mov_b32_e32 v0, 0
	global_load_b32 v1, v0, s[2:3]
	s_waitcnt vmcnt(0)
	v_mul_f32_e32 v2, 0x4f800000, v1
	v_cmp_gt_f32_e32 vcc_lo, 0xf800000, v1
	s_delay_alu instid0(VALU_DEP_2) | instskip(NEXT) | instid1(VALU_DEP_1)
	v_cndmask_b32_e32 v1, v1, v2, vcc_lo
	v_sqrt_f32_e32 v2, v1
	s_waitcnt_depctr 0xfff
	v_add_nc_u32_e32 v3, -1, v2
	v_add_nc_u32_e32 v4, 1, v2
	s_delay_alu instid0(VALU_DEP_2) | instskip(NEXT) | instid1(VALU_DEP_2)
	v_fma_f32 v5, -v3, v2, v1
	v_fma_f32 v6, -v4, v2, v1
	s_delay_alu instid0(VALU_DEP_2) | instskip(NEXT) | instid1(VALU_DEP_1)
	v_cmp_ge_f32_e64 s0, 0, v5
	v_cndmask_b32_e64 v2, v2, v3, s0
	s_delay_alu instid0(VALU_DEP_3) | instskip(NEXT) | instid1(VALU_DEP_1)
	v_cmp_lt_f32_e64 s0, 0, v6
	v_cndmask_b32_e64 v2, v2, v4, s0
	s_delay_alu instid0(VALU_DEP_1) | instskip(NEXT) | instid1(VALU_DEP_1)
	v_mul_f32_e32 v3, 0x37800000, v2
	v_cndmask_b32_e32 v2, v2, v3, vcc_lo
	v_cmp_class_f32_e64 vcc_lo, v1, 0x260
	s_delay_alu instid0(VALU_DEP_2)
	v_cndmask_b32_e32 v1, v2, v1, vcc_lo
	global_store_b32 v0, v1, s[2:3]
.LBB0_9:
	s_nop 0
	s_sendmsg sendmsg(MSG_DEALLOC_VGPRS)
	s_endpgm
	.section	.rodata,"a",@progbits
	.p2align	6, 0x0
	.amdhsa_kernel _Z13norm_elementsPfS_j
		.amdhsa_group_segment_fixed_size 64
		.amdhsa_private_segment_fixed_size 0
		.amdhsa_kernarg_size 280
		.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 7
		.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	_Z13norm_elementsPfS_j, .Lfunc_end0-_Z13norm_elementsPfS_j
                                        ; -- End function
	.section	.AMDGPU.csdata,"",@progbits
; Kernel info:
; codeLenInByte = 436
; NumSgprs: 18
; NumVgprs: 7
; ScratchSize: 0
; MemoryBound: 0
; FloatMode: 240
; IeeeMode: 1
; LDSByteSize: 64 bytes/workgroup (compile time only)
; SGPRBlocks: 2
; VGPRBlocks: 0
; NumSGPRsForWavesPerEU: 18
; NumVGPRsForWavesPerEU: 7
; 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
      - .offset:         16
        .size:           4
        .value_kind:     by_value
      - .offset:         24
        .size:           4
        .value_kind:     hidden_block_count_x
      - .offset:         28
        .size:           4
        .value_kind:     hidden_block_count_y
      - .offset:         32
        .size:           4
        .value_kind:     hidden_block_count_z
      - .offset:         36
        .size:           2
        .value_kind:     hidden_group_size_x
      - .offset:         38
        .size:           2
        .value_kind:     hidden_group_size_y
      - .offset:         40
        .size:           2
        .value_kind:     hidden_group_size_z
      - .offset:         42
        .size:           2
        .value_kind:     hidden_remainder_x
      - .offset:         44
        .size:           2
        .value_kind:     hidden_remainder_y
      - .offset:         46
        .size:           2
        .value_kind:     hidden_remainder_z
      - .offset:         64
        .size:           8
        .value_kind:     hidden_global_offset_x
      - .offset:         72
        .size:           8
        .value_kind:     hidden_global_offset_y
      - .offset:         80
        .size:           8
        .value_kind:     hidden_global_offset_z
      - .offset:         88
        .size:           2
        .value_kind:     hidden_grid_dims
    .group_segment_fixed_size: 64
    .kernarg_segment_align: 8
    .kernarg_segment_size: 280
    .language:       OpenCL C
    .language_version:
      - 2
      - 0
    .max_flat_workgroup_size: 1024
    .name:           _Z13norm_elementsPfS_j
    .private_segment_fixed_size: 0
    .sgpr_count:     18
    .sgpr_spill_count: 0
    .symbol:         _Z13norm_elementsPfS_j.kd
    .uniform_work_group_size: 1
    .uses_dynamic_stack: false
    .vgpr_count:     7
    .vgpr_spill_count: 0
    .wavefront_size: 32
    .workgroup_processor_mode: 1
amdhsa.target:   amdgcn-amd-amdhsa--gfx1100
amdhsa.version:
  - 1
  - 2
...

	.end_amdgpu_metadata
