420 |
|
|
421 |
|
if (readfargs(&fa, fin) != 1) |
422 |
|
return(-1); |
423 |
< |
if (fa.nfargs > 5) |
423 |
> |
if (fa.nfargs > 7) |
424 |
|
return(-1); |
425 |
|
printf("%d", fa.nsargs); |
426 |
|
if (idprefix == NULL) |
446 |
|
if (fa.nfargs > 2) |
447 |
|
printf(" %12.6g %12.6g %12.6g", fa.farg[0]/tot.sca, |
448 |
|
fa.farg[1]/tot.sca, fa.farg[2]/tot.sca); |
449 |
< |
if (fa.nfargs > 3) |
450 |
< |
printf(" %12.6g", fa.farg[3]); |
451 |
< |
if (fa.nfargs > 4) |
452 |
< |
printf(" %12.6g", fa.farg[4]); |
449 |
> |
for (i = 3; i < fa.nfargs; i++) |
450 |
> |
printf(" %12.6g", fa.farg[i]); |
451 |
|
printf("\n"); |
452 |
|
freefargs(&fa); |
453 |
|
return(0); |