Opencl 并行求和

　　 int err = 0;
    unsigned long int nNumCount = 102400000;
    int nLocalSize = 256;
    int nGroupSize = 102400;
    int nGroup = nGroupSize / nLocalSize;

    int* pArray = new int[nNumCount];
    unsigned long int nReal = 0;
    int nStart = GetTickCount();
    for (int i=0;i<nNumCount;++i)
    {
        pArray[i] = i*2;
        nReal += pArray[i];
    }
    cout<<GetTickCount() - nStart<<endl;

    cl_mem clmemArray = clCreateBuffer(context,CL_MEM_READ_WRITE,sizeof(int) * nNumCount,NULL,NULL);
    err = clEnqueueWriteBuffer(queue,clmemArray,CL_TRUE,0,sizeof(int)*nNumCount,pArray,0,0,0);
    cl_mem clmemRes  = clCreateBuffer(context,CL_MEM_READ_WRITE,sizeof(int) * nGroup,NULL,NULL);
    
    nStart = GetTickCount();

    err = clSetKernelArg(m_KerCalcRay,0,sizeof(cl_mem),&clmemArray);
    err = clSetKernelArg(m_KerCalcRay,1,sizeof(cl_mem),&clmemRes);
    err = clSetKernelArg(m_KerCalcRay,2,sizeof(int)*nLocalSize,0);
    err = clSetKernelArg(m_KerCalcRay,3,sizeof(int),&nNumCount);

    
    size_t localws[1] = {nLocalSize};
    size_t globalws[1] = {nGroupSize};

    err = clEnqueueNDRangeKernel(queue,m_KerCalcRay,1,NULL,globalws,localws,0,NULL,NULL);
    clFinish(queue);

    int* pRes = new int[nGroup];
    err = clEnqueueReadBuffer(queue,clmemRes,CL_TRUE,0,sizeof(int)*nGroup,pRes,0,0,0);
    clFinish(queue);

    unsigned long int nRes = 0;
    for(int i=0;i<nGroup;++i)
    {
        nRes += pRes[i];
    }
　　assert（nRes == nReal）;

__kernel void ReduceSum(__global int* num,__global int* res,__local int* pData,int nCount)
{
    unsigned int tid = get_local_id(0); 
    unsigned int bid = get_group_id(0); 
    unsigned int gid = get_global_id(0);
    unsigned int localSize = get_local_size(0); 
    unsigned int globalSize = get_global_size(0);
    
    
    int nRes = 0;
    while(gid < nCount)
    {
        nRes += num[gid];
        gid += globalSize;
    }
    pData[tid] = nRes;    
    barrier(CLK_LOCAL_MEM_FENCE);
    
     // do reduction in shared mem
    for(unsigned int s = localSize >> 1; s > 0; s >>= 1) 
    {
         if(tid < s) 
         {
             pData[tid] += pData[tid + s];
         }
         barrier(CLK_LOCAL_MEM_FENCE);
     }
    
    if(tid == 0)
        res[bid] =     pData[0];

}