8 const ssize_t *lboundTB,
9 const ssize_t *uboundTB
14 elements = (uboundTB[0] - lboundTB[0]) + 1;
15 for( i = 1; i < dimensions; i++ )
16 elements *= (uboundTB[i] - lboundTB[i]) + 1;
24 const ssize_t *lboundTB,
25 const ssize_t *uboundTB
34 for( i = 0; i < dimensions-1; i++ )
36 elements = (uboundTB[i+1] - lboundTB[i+1]) + 1;
37 diff = (diff + lboundTB[i]) * elements;
40 diff += lboundTB[dimensions-1];