mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-15 00:21:56 -05: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;
|
||
|
}
|