| Index: fusl/src/math/fdiml.c
 | 
| diff --git a/fusl/src/math/fdiml.c b/fusl/src/math/fdiml.c
 | 
| new file mode 100644
 | 
| index 0000000000000000000000000000000000000000..62e29b7df39e1cb25e73b844cbb98e423bf87d26
 | 
| --- /dev/null
 | 
| +++ b/fusl/src/math/fdiml.c
 | 
| @@ -0,0 +1,18 @@
 | 
| +#include <math.h>
 | 
| +#include <float.h>
 | 
| +
 | 
| +#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
 | 
| +long double fdiml(long double x, long double y)
 | 
| +{
 | 
| +	return fdim(x, y);
 | 
| +}
 | 
| +#else
 | 
| +long double fdiml(long double x, long double y)
 | 
| +{
 | 
| +	if (isnan(x))
 | 
| +		return x;
 | 
| +	if (isnan(y))
 | 
| +		return y;
 | 
| +	return x > y ? x - y : 0;
 | 
| +}
 | 
| +#endif
 | 
| 
 |