diff options
| author | Alberto Ruiz <aruiz@um.es> | 2007-06-22 17:33:17 +0000 |
|---|---|---|
| committer | Alberto Ruiz <aruiz@um.es> | 2007-06-22 17:33:17 +0000 |
| commit | 978e6d038239af50d70bae2c303f4e45b1879b7a (patch) | |
| tree | 571b2060f388d0693820f808b40089acb100a5d9 /lib/GSL/Polynomials.hs | |
| parent | 989bdf7e88c13500bd1986dcde36f6cc4f467efb (diff) | |
refactoring
Diffstat (limited to 'lib/GSL/Polynomials.hs')
| -rw-r--r-- | lib/GSL/Polynomials.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/GSL/Polynomials.hs b/lib/GSL/Polynomials.hs index 365c74e..a87fa56 100644 --- a/lib/GSL/Polynomials.hs +++ b/lib/GSL/Polynomials.hs | |||
| @@ -51,4 +51,4 @@ polySolve' v | dim v > 1 = unsafePerformIO $ do | |||
| 51 | return r | 51 | return r |
| 52 | | otherwise = error "polySolve on a polynomial of degree zero" | 52 | | otherwise = error "polySolve on a polynomial of degree zero" |
| 53 | 53 | ||
| 54 | foreign import ccall "gsl-aux.h polySolve" c_polySolve:: TVCV -- Double :> Complex Double :> IO Int | 54 | foreign import ccall "gsl-aux.h polySolve" c_polySolve:: TVCV |