mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-09-05 12:56:44 -04:00
18 lines
383 B
C++
18 lines
383 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)
|
|
|
|
#include <math.h>
|
|
|
|
int main()
|
|
{
|
|
long double d = 1;
|
|
|
|
d = ::erf(d);
|
|
d = ::erfc(d);
|
|
d = ::tgamma(d);
|
|
d = ::lgamma(d);
|
|
return d != 0 ? 0 : 1;
|
|
}
|