mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-17 17:42:02 -05:00
14 lines
345 B
C++
14 lines
345 B
C++
|
// Copyright John Maddock 2015.
|
||
|
// Use, modification and distribution are subject to the
|
||
|
// Boost Software License, Version 1.0. (See accompanying file
|
||
|
// LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
|
||
|
|
||
|
#define MATHLIB_STANDALONE
|
||
|
#include <Rmath.h>
|
||
|
|
||
|
int main()
|
||
|
{
|
||
|
double d = psigamma(2.0, 4);
|
||
|
return d != 0 ? 0 : 1;
|
||
|
}
|