<![CDATA[
#define N 2
#define M 3
int main() {
double a[N][M] = {1,2,3,
4,5,6};
array double b[3][4] = {1,2,3,4,
5,6,7,8,
1,2,3,4};
array double meana1[N], meanb1[3];
double meanval;
/* Note: second argument of mean() must be double data type */
meanval = mean(a, meana1);
printf("meanval = mean(a, meana1) = %f\n", meanval);
printf("mean(a, meana1) = %f\n", meana1);
meanval = mean(b, meanb1);
printf("meanval = mean(b, meanb1) = %f\n", meanval);
printf("mean(b, meanb1) = %f\n", meanb1);
}
]]>
<![CDATA[
meanval = mean(a, meana1) = 3.500000
mean(a, meana1) = 2.000000 5.000000
meanval = mean(b, meanb1) = 3.833333
mean(b, meanb1) = 2.500000 6.500000 2.500000
]]>