#include <dpce.h> /* header file that must be included in all dpc programs */ shape [10][10]S; /* defines a shape, 2 dimensional, 10 x 10 */ main() { int sum; int:S a; /* defines a parallel variable int of shape S */ /* parallel variable "a" has a rank of 2 and is 10x10 */ a = 1; /* assigns all 100 elements of parallel variable "a" to 1 */ sum += a; /* performs summation reduction of parallel variable "a" into scalar variable "sum" */ printf(" sum %d \n",sum); /* value of sum is 100 */ }
©1995 Pacific-Sierra Research Corporation. All rights reserved.
Send comments or suggestions to dpce2 at crescentbaysoftware.com.