Subversion Repositories wimsdev

Rev

Rev 9146 | Rev 11125 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 9146 Rev 9147
Line 479... Line 479...
479
      }
479
      }
480
      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 */
481
                        if(i<dencnt-1) tprint(" ");} /* add space between factors */
482
      tprint("} ");
482
      tprint("} ");
483
    }
483
    }
484
    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);
-
 
485
                if(i<neucnt-1) tprint(" ");} /* add space between factors */
485
}
486
}
486
 
487
 
487
/* put exponential */
488
/* put exponential */
488
void t_exponential(char *pp)
489
void t_exponential(char *pp)
489
{
490
{
Line 678... Line 679...
678
    for(pp=strstr(p,"**"); pp!=NULL; pp=strstr(pp,"**")) {
679
    for(pp=strstr(p,"**"); pp!=NULL; pp=strstr(pp,"**")) {
679
      *pp='^'; ovlstrcpy(pp+1,pp+2);
680
      *pp='^'; ovlstrcpy(pp+1,pp+2);
680
    }
681
    }
681
    if(check_parentheses(p,1)!=0) module_error("unmatched_parentheses");
682
    if(check_parentheses(p,1)!=0) module_error("unmatched_parentheses");
682
    texmathbuf[0]=0; t_onestring(p);
683
    texmathbuf[0]=0; t_onestring(p);
-
 
684
    singlespace(texmathbuf);strip_trailing_spaces(texmathbuf);
683
    mystrncpy(p,texmathbuf,MAX_LINELEN);
685
    mystrncpy(p,texmathbuf,MAX_LINELEN);
684
}
686
}