<![CDATA[
int main() {
double a[3] = {1,2,3};
double b[2][3] = {1,2,3,-10,5,6};
double c[2][3][5];
c[0][0][3] = 10;
c[1][0][3] = -10;
int loc;
loc = minloc(a);
printf("minloc(a) = %d\n", loc);
loc = minloc(b);
printf("minloc(b) = %d\n", loc);
loc = minloc(c);
printf("minloc(c) = %d\n", loc);
}
]]>
<![CDATA[
minloc(a) = 0
minloc(b) = 3
minloc(c) = 18
]]>