  // Array to scalar      // s = (ztype) Ax [p], with typecast     #define GB_CAST_ARRAY_TO_SCALAR(s,Ax,p)         \         s = Ax [p]      // s = W [k], no typecast     #define GB_COPY_ARRAY_TO_SCALAR(s,W,k)          \         s = W [k]      // s += (ztype) Ax [p], with typecast     #define GB_ADD_CAST_ARRAY_TO_SCALAR(s,Ax,p)     \         