Changeset bfa04e in git
- Timestamp:
- Apr 29, 2011, 7:04:05 PM (12 years ago)
- Branches:
- (u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')
- Children:
- 62604d2f2d4a187dd1464fdb07625f99d535f3b6
- Parents:
- aec5c92fa3e0f853348936026c999351aa972656
- git-author:
- Hans Schoenemann <hannes@mathematik.uni-kl.de>2011-04-29 19:04:05+02:00
- git-committer:
- Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 12:31:31+01:00
- Location:
- libpolys
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
libpolys/coeffs/gnumpc.cc
raec5c9 rbfa04e 327 327 { 328 328 assume( getCoeffType(r) == ID ); 329 assume( r->compex_parameter != NULL ); 329 assume( r->complex_parameter != NULL ); 330 330 331 if ((*s >= '0') && (*s <= '9')) 331 332 { … … 336 337 delete re; 337 338 } 338 else if (strncmp(s, r->comp ex_parameter,strlen(r->compex_parameter))==0)339 { 340 s+=strlen(r->comp ex_parameter);339 else if (strncmp(s, r->complex_parameter,strlen(r->complex_parameter))==0) 340 { 341 s+=strlen(r->complex_parameter); 341 342 gmp_complex *aa=new gmp_complex((long)0,(long)1); 342 343 *a=(number)aa; … … 487 488 /// TODO: Any variables? 488 489 if( p == NULL ) 489 n->comp ex_parameter = "i"; //??490 else 491 n->comp ex_parameter = omStrDup( (char*) p );490 n->complex_parameter = "i"; //?? 491 else 492 n->complex_parameter = omStrDup( (char*) p ); 492 493 493 494 return FALSE; -
libpolys/coeffs/mpr_complex.cc
raec5c9 rbfa04e 708 708 char *complexToStr( gmp_complex & c, const unsigned int oprec, const coeffs src ) 709 709 { 710 assume( src->comp ex_parameter != NULL );710 assume( src->complex_parameter != NULL ); 711 711 712 712 char *out,*in_imag,*in_real; … … 721 721 if (nCoeff_is_long_C(src)) 722 722 { 723 int len=(strlen(in_real)+strlen(in_imag)+7+strlen(src->comp ex_parameter))*sizeof(char);723 int len=(strlen(in_real)+strlen(in_imag)+7+strlen(src->complex_parameter))*sizeof(char); 724 724 out=(char*)omAlloc(len); 725 725 memset(out,0,len); 726 726 if ( !c.real().isZero() ) // (-23-i*5.43) or (15.1+i*5.3) 727 sprintf(out,"(%s%s%s*%s)",in_real,c.imag().sign()>=0?"+":"-",src->comp ex_parameter,in_imag);727 sprintf(out,"(%s%s%s*%s)",in_real,c.imag().sign()>=0?"+":"-",src->complex_parameter,in_imag); 728 728 else // (-i*43) or (i*34) 729 729 { 730 730 if (c.imag().isOne()) 731 sprintf(out,"%s",src->comp ex_parameter);731 sprintf(out,"%s",src->complex_parameter); 732 732 else if (c.imag().isMOne()) 733 sprintf(out,"-%s",src->comp ex_parameter);733 sprintf(out,"-%s",src->complex_parameter); 734 734 else 735 sprintf(out,"(%s%s*%s)",c.imag().sign()>=0?"":"-",src->comp ex_parameter,in_imag);735 sprintf(out,"(%s%s*%s)",c.imag().sign()>=0?"":"-",src->complex_parameter,in_imag); 736 736 } 737 737 } -
libpolys/polys/monomials/ring.cc
raec5c9 rbfa04e 1559 1559 { 1560 1560 if ( rMinpolyIsNULL(r2) ) return FALSE; 1561 if (! n_Equal(r1->cf->algring->minideal->m[0], 1562 r2->cf->algring->minideal->m[0], r1->cf)) return FALSE; 1561 if (! p_EqualPolys(r1->cf->algring->minideal->m[0], 1562 r2->cf->algring->minideal->m[0], 1563 r1->cf->algring)) 1564 return FALSE; 1563 1565 } 1564 1566 else if (!rMinpolyIsNULL(r2)) return FALSE;
Note: See TracChangeset
for help on using the changeset viewer.