Guest User

Untitled

a guest
Dec 16th, 2017
79
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.08 KB | None | 0 0
  1. {- | Return e (Euler's constant) -}
  2. foreign import ccall "Z3_rcf_mk_e" c'Z3_rcf_mk_e
  3. :: C'Z3_context -> IO C'Z3_rcf_num
  4. foreign import ccall "&Z3_rcf_mk_e" p'Z3_rcf_mk_e
  5. :: FunPtr (C'Z3_context -> IO C'Z3_rcf_num)
  6.  
  7. {-# LINE 25 "Z3/Base/C/Rcf.hsc" #-}
  8.  
  9. {- | Return a new infinitesimal that is smaller than all elements in the Z3 field. -}
  10. foreign import ccall "Z3_rcf_mk_infinitesimal" c'Z3_rcf_mk_infinitesimal
  11. :: C'Z3_context -> IO C'Z3_rcf_num
  12. foreign import ccall "&Z3_rcf_mk_infinitesimal" p'Z3_rcf_mk_infinitesimal
  13. :: FunPtr (C'Z3_context -> IO C'Z3_rcf_num)
  14.  
  15. {-# LINE 28 "Z3/Base/C/Rcf.hsc" #-}
  16.  
  17. {- | Store in roots the roots of the polynomial
  18. The output vector \c roots must have size \c n.
  19. It returns the number of roots of the polynomial.
  20.  
  21. \pre The input polynomial is not the zero polynomial. -}
  22. foreign import ccall "Z3_rcf_mk_roots" c'Z3_rcf_mk_roots
  23. :: C'Z3_context -> CUInt -> Ptr C'Z3_rcf_num -> Ptr C'Z3_rcf_num -> IO ()
  24. foreign import ccall "&Z3_rcf_mk_roots" p'Z3_rcf_mk_roots
  25. :: FunPtr (C'Z3_context -> CUInt -> Ptr C'Z3_rcf_num -> Ptr C'Z3_rcf_num -> IO ())
Add Comment
Please, Sign In to add comment