X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=functions%2Fmath%2Ffdim.c;h=9a005796f828ee09a8b57d2abd3d818e7499f0c1;hb=e5456e3c2697c4e17fc9aa3439f2e305517b4d96;hp=99167630663c61ccf3908ee1416e3ec6123e940c;hpb=dcc8a8e99f69e090a03b7b868443addbc0817820;p=pdclib.old

diff --git a/functions/math/fdim.c b/functions/math/fdim.c
index 9916763..9a00579 100644
--- a/functions/math/fdim.c
+++ b/functions/math/fdim.c
@@ -15,5 +15,12 @@ long double fdim( long double x, long double y ) { /* TODO */ };
 // Standard C
 
 double fdim( double x, double y ) { /* TODO */ };
+
+/* Therx code
+{
+    return ( ( x - y ) < 1 ) ? 0 : x - y;
+}
+*/
+
 float fdimf( float x, float y ) { /* TODO */ };
 long double fdiml( long double x, long double y ) { /* TODO */ };