Skip to content
  1. Nov 26, 2013
    • Raymond Toy's avatar
      Implement a new atan method that is 21 times faster. · b9a21f1f
      Raymond Toy authored
      The new method uses a table and the taylor series for atan to compute
      atan for real args.
      
      qd-const.lisp:
      o Add the two tables used for the atan computation.
      o Include clisp code that generates the tables.
      
      qd-fun.lisp:
      o Implement atan using a set of tables and a Taylor series.
      
      timing.lisp:
      o Add a simple timing program to evaluate how fast each atan method
        is.
      b9a21f1f
  2. Nov 25, 2013
    • Raymond Toy's avatar
      Clean up rem-pi/2. · 3c136f7c
      Raymond Toy authored
      o Remove old version
      o Update new version to skip reduction if the arg <= pi/4.
      3c136f7c
  3. Nov 24, 2013
    • Raymond Toy's avatar
      Fix ticket:5 · 6127a79e
      Raymond Toy authored
      o Implement better pi reduction and also always do pi reduction.
      o Add test for sin(pi) and cos(2^120), to test pi reduction.
      o Accuracy for erfc is only 198 bits.
      6127a79e
  4. Feb 10, 2011
  5. Jul 16, 2008
  6. Nov 28, 2007
    • Raymond Toy's avatar
      Adjust code so that CMUCL can use arrays to store quad-doubles instead · 3e39d143
      Raymond Toy authored
      of using a (complex double-double-float).
      
      With these changes, CMUCL uses arrays and (rt:do-tests) passes
      successfully.
      
      oct.system:
      o Push :oct-array onto *FEATURES* to use arrays.  This is the default
        if not building on CMUCL.
      
      qd-fun.lisp:
      o Fix two erroneous uses of zerop on a quad-double in sinh-qd and
        tanh-qd.
      o Fix two erroneous uses of + on %quad-double; they should have used
        ADD-QD instead.
      
      qd-rep.lisp:
      o Change conditionalization to allow arrays for CMUCL.
      o Update compiler macros appropriately.
      
      qd.lisp:
      o Adjust optional target arg appropriately for oct-array feature.
      o Clean up IGNORE declarations.
      o Add some more declarations for the target to make CMUCL happier.
      3e39d143
  7. Nov 07, 2007
  8. Oct 18, 2007
  9. Oct 17, 2007
  10. Oct 16, 2007
    • Raymond Toy's avatar
      qd-fun.lisp: · d58b6166
      Raymond Toy authored
      o Remove extra rem-pi/2-int.
      
      qd-rep.lisp:
      o Fix typo in float-infinity-p for Allegro.
      o Ignore var in float-infinity-p and friends.
      d58b6166
    • Raymond Toy's avatar
      o Add default implementation of float-infinity-p, float-nan-p, · 4968eb46
      Raymond Toy authored
        float-trapping-nan-p.  These return NIL by default, unless the Lisp
        implementation has a suitable version.
      o Remove CMU conditionalization for float-infinity-p, float-nan-p,
        float-trapping-nan-p.
      4968eb46
    • Raymond Toy's avatar
      qd-package.lisp: · 0aaa8918
      Raymond Toy authored
      o Don't :USE CMUCL's EXTENSIONS package anymore.  Import just the
        symbols we need.
      
      qd-class.lisp:
      o No need to use package qualifiers.
      
      qd-fun.lisp:
      o Need package qualifier for MAYBE-INLINE.
      
      qd.lisp:
      o Need package qualifier for *INLINE-EXPANSION-LIMIT*
      .
      0aaa8918
  11. Oct 15, 2007
  12. Oct 13, 2007
  13. Oct 10, 2007
  14. Sep 12, 2007
    • Raymond Toy's avatar
      qd-fun.lisp: · 70c699b1
      Raymond Toy authored
      o Remove unused var R1 in EXP-QD/REDUCE.
      o TAN-QD was calling ZEROP instead of ZEROP-QD.
      o Comment out extra copy of ASINH-QD.
      
      qd-io.lisp:
      o Ignore unused var in QD-PRINT-EXPONENT and QD-READER.
      
      qd.lisp:
      o Remove extra version of DIV-QD.
      70c699b1
  15. Aug 25, 2007
  16. Jun 14, 2007
  17. Jun 13, 2007
  18. Jun 12, 2007
    • toy's avatar
      Change exit condition from < to <= since very small values of the arg · f4870c1a
      toy authored
      would set the threshold to 0 and we'd never exit the loop.  (Should we
      change the threshold to be something else?  if x is less than about
      1d-33, we don't need any more terms of the taylor series.)
      f4870c1a
    • toy's avatar
      o Fix debugging prints to use qdi::qd-format. · cd998025
      toy authored
      o Oops.  Desired iteration was chosen incorrectly if xx and yy had
        different signs.
      cd998025
    • toy's avatar
      qd-fun.lisp: · 8aadd62b
      toy authored
      o SQRT-QD has round-off problems for very large and very small
        numbers.  Solve this by scaling the number by a power of 4 before
        computing the square root.
      o Moved LOGB-FINITE and the core of QD-CSSQS to this file from
        qd-methods.lisp.  Rename the core routine as HYPOT-QD.
      o Use it in ATAN-QD/NEWTON to get rid of unnecessary overflow.
      
      qd-methods.lisp:
      o Moved LOGB-FINITE and the core of QD-CSSQS from this file to
        qd-fun.lisp.  Use HYPOT-QD in QD-CSSQS.
      
      qd-package.lisp:
      o Export HYPOT-QD.
      8aadd62b
  19. Jun 02, 2007
  20. Jun 01, 2007
  21. May 30, 2007
  22. May 25, 2007
  23. May 24, 2007
  24. May 23, 2007