Changeset 28

Timestamp:

12/07/05 04:33:40 (3 years ago)

Author:

Don Clugston

Message:

Using the new -cov option. Test coverage of ProductLog?() is now 100%.

Files:

• trunk/makeall.bat (modified) (1 diff)
• trunk/maketest.bat (modified) (1 diff)
• trunk/mathspecial.d (modified) (1 diff)
• trunk/normaldist.d (modified) (1 diff)
• trunk/testconsistency.d (modified) (1 diff)

trunk/makeall.bat

@@ -1 @@
-
+-cov 

trunk/maketest.bat

@@ -1 @@
-
+-cov 

trunk/mathspecial.d

@@ -145 +145 @@
-
-unittest {
+      // x*exp(x). Used only for testing
+    real productExp(real x)
+    {
+     return x*exp(x);
+    }
+
- assert(productLog(-1/E)==-1);
- assert(isnan(productLog(real.nan)));
- assert(productLog(E)==1);
+ assert(isnan(productLog(-5)));
+ assert(productLog(productExp(0.25))==0.25);
+ assert(productLog(productExp(2))==2);
+ //printf("%a", productLog_1(productExp(-10)));
+// assert(productLog_1(productExp(-2))==-2);
-    
-  assert(productLog_1(-1/E)==-1);

trunk/normaldist.d

@@ -10 +10 @@
- */
-module normaldist;
-
-
-
-
-
+
-
-

trunk/testconsistency.d

@@ -10 +10 @@
-import mathstat;
-import mathspecial;
-
+
+
+
-import etcgamma;
-
-alias etcgamma.tgamma tgamma;
-alias etcgamma.lgamma lgamma;
+
+import complex;
+// do this just so it will compile.
+ real cosh(real x) { return std.math.cosh(x); }
+ real sinh(real x) { return std.math.sinh(x); }
+ real sin(real x) { return std.math.sin(x); }
+ real cos(real x) { return std.math.cos(x); }
+ real exp(real x) { return std.math.exp(x); }
+ real log(real x) { return std.math.log(x); }
+ real atan(real x) { return std.math.atan(x); }
+
+
-// -------------------------------
-// Tests of standard mathematical functions