<![CDATA[
int main() {
array double a[3] = {1, 2, 3};
array double b[ ] = {1, 2, 3};
array double c[3] = {2, 3, 4};
array double crossprod[3];
crossprod = cross(a, b);
printf("cross(a,b) = %f\n", crossprod);
crossprod = cross(a, c);
printf("cross(a,c) = %f\n", crossprod);
}
]]>
<![CDATA[
cross(a,b) = 0.000000 0.000000 0.000000
cross(a,c) = -1.000000 2.000000 -1.000000
]]>