Changeset da408f in git for Singular/mpr_complex.cc


Ignore:
Timestamp:
Jul 8, 1999, 12:18:13 PM (24 years ago)
Author:
Moritz Wenk <wenk@…>
Branches:
(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')
Children:
b719a30005f8bcbcca9d638b7908dda038ffee56
Parents:
4deddb979be065737d63e926fc05f264a6b1078a
Message:
*wenk: changed uressolve CMD_3 -> CMD_M (4)
	       laguerre  CMD2_ -> CMD_3
       removed "setFloatDigits" in extra.cc
       fixed output (2.2e33 -> 2.2e+33)
       adapted solve.lib to uressolve, laguerre, extended examples


git-svn-id: file:///usr/local/Singular/svn/trunk@3247 2c84dea3-7e68-4137-9b89-c4e89433aadc
File:
1 edited

Legend:

Unmodified
Added
Removed

  • Singular/mpr_complex.cc

    r4deddb rda408f  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: mpr_complex.cc,v 1.12 1999-07-02 16:43:19 wenk Exp $ */
     4/* $Id: mpr_complex.cc,v 1.13 1999-07-08 10:18:11 wenk Exp $ */
    55
    66/*
    … …  
    6969  size_t bits= 1 + (size_t) (digits / (log(2)/log(10)));
    7070  bits= bits>64?bits:64;
    71   //  gmp_float::setPrecision( bits+EXTRABYTES*8 );
    72   gmp_float::setPrecision( bits+(bits/2) );
     71  //gmp_float::setPrecision( bits+EXTRABYTES*8 );
     72  gmp_float::setPrecision( bits+(bits/5) );
    7373  gmp_float::setEqualBits( bits );
    7474  gmp_output_digits= digits;
    … …  
    338338      out= (char*)AllocL(*size);
    339339      memset(out,0,*size);
    340       sprintf(out,"%s0.%se%d",csign,in+sign,(unsigned int)exponent);
     340      sprintf(out,"%s0.%se%s%d",csign,in+sign,exponent>=0?"+":"",(int)exponent);
    341341//      }
    342342//      else
Note: See TracChangeset for help on using the changeset viewer.