modify Fortran_C_CUDA/array_add_cuda/