38 |
|
static int |
39 |
|
loadmatrix(ROPMAT *rop) |
40 |
|
{ |
41 |
< |
if (rop->mtx != NULL) |
41 |
> |
if (rop->mtx != NULL) /* already loaded? */ |
42 |
|
return(0); |
43 |
|
|
44 |
|
rop->mtx = rmx_load(rop->inspec, rop->rmp); |
239 |
|
while (rpos-- > 0) { |
240 |
|
if (mright == NULL) |
241 |
|
break; |
242 |
< |
mright = binaryop(mop[rpos].inspec, |
242 |
> |
mright = binaryop(mop[rpos+1].inspec, |
243 |
|
loadop(mop+rpos), mop[rpos].binop, mright); |
244 |
|
} |
245 |
|
return(mright); |
430 |
|
return(0); |
431 |
|
userr: |
432 |
|
fprintf(stderr, |
433 |
< |
"Usage: %s [-v][-f[adfc][-t][-s sf .. | -c ce ..][-r[fb]] m1 [.+*/] .. > mres\n", |
433 |
> |
"Usage: %s [-v][-f[adfc][-t][-s sf .. | -c ce ..][-rf|-rb] m1 [.+*/] .. > mres\n", |
434 |
|
argv[0]); |
435 |
|
return(1); |
436 |
|
} |