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 6 #define MATHLIB_STANDALONE 7 #include <Rmath.h> 8 main()9int main() 10 { 11 double d = psigamma(2.0, 4); 12 return d != 0 ? 0 : 1; 13 } 14