Rev 8568 | Rev 9147 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 8568 | Rev 9146 | ||
|---|---|---|---|
| Line 465... | Line 465... | ||
| 465 | find_matching(numerator[0]->beg+1,')')==(numerator[0]->end)-1) { |
465 | find_matching(numerator[0]->beg+1,')')==(numerator[0]->end)-1) { |
| 466 | *(numerator[0]->end-1)=0; |
466 | *(numerator[0]->end-1)=0; |
| 467 | t_onestring(numerator[0]->beg+1); |
467 | t_onestring(numerator[0]->beg+1); |
| 468 | *(numerator[0]->end-1)=')'; |
468 | *(numerator[0]->end-1)=')'; |
| 469 | } |
469 | } |
| 470 | else for(i=0; i<numcnt; i++) t_onefactor(numerator[i],i); |
470 | else for(i=0; i<numcnt; i++) {t_onefactor(numerator[i],i); |
| - | 471 | if(i<numcnt-1) tprint(" ");} /* add space between factors */ |
|
| 471 | } |
472 | } |
| 472 | tprint(" \\over "); /* Now denominator */ |
473 | tprint(" \\over "); /* Now denominator */ |
| 473 | if(dencnt==1 && *denominator[0]->beg=='(' && |
474 | if(dencnt==1 && *denominator[0]->beg=='(' && |
| 474 | find_matching(denominator[0]->beg+1,')')==(denominator[0]->end)-1) { |
475 | find_matching(denominator[0]->beg+1,')')==(denominator[0]->end)-1) { |
| 475 | *(denominator[0]->end-1)=0; |
476 | *(denominator[0]->end-1)=0; |
| 476 | t_onestring(denominator[0]->beg+1); |
477 | t_onestring(denominator[0]->beg+1); |
| 477 | *(denominator[0]->end-1)=')'; |
478 | *(denominator[0]->end-1)=')'; |
| 478 | } |
479 | } |
| 479 | else for(i=0;i<dencnt;i++) t_onefactor(denominator[i],i); |
480 | else for(i=0;i<dencnt;i++) {t_onefactor(denominator[i],i); |
| - | 481 | if(i<dencnt-1) tprint(" ");} /* add space between factors */ |
|
| 480 | tprint("} "); |
482 | tprint("} "); |
| 481 | } |
483 | } |
| 482 | for(i=0;i<neucnt;i++) t_onefactor(neutral[i],i+dencnt); |
484 | for(i=0;i<neucnt;i++) t_onefactor(neutral[i],i+dencnt); |
| 483 | } |
485 | } |
| 484 | 486 | ||