1 struct {
2 }
mmaxloc0_4_i1()3 mmaxloc0_4_i1 ()
4 {
5   int dstride;
6   int *dest;
7   int rank;
8   int n;
9   for (n = 0; n < rank; n++)
10     dest[n * dstride] = 0;
11 }
12