has_rmath.cpp 345 B

12345678910111213
  1. // Copyright John Maddock 2015.
  2. // Use, modification and distribution are subject to the
  3. // Boost Software License, Version 1.0. (See accompanying file
  4. // LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
  5. #define MATHLIB_STANDALONE
  6. #include <Rmath.h>
  7. int main()
  8. {
  9. double d = psigamma(2.0, 4);
  10. return d != 0 ? 0 : 1;
  11. }