Changeset 1189 for library/tests/epdf_harness.cpp

Timestamp:

09/16/10 13:22:11 (14 years ago)

Author:

smidl

Message:

new tests of egiw

Files:

• library/tests/epdf_harness.cpp (modified) (2 diffs)

library/tests/epdf_harness.cpp

@@ -28 +28 @@
     UI::get ( variance, set, "variance", UI::compulsory );
 
-    support = UI::build<rectangular_support> ( set, "support", UI::optional );
+    support = UI::build<support_base> ( set, "support", UI::optional );
     UI::get ( nsamples, set, "nsamples", UI::optional );
     UI::get ( R, set, "R", UI::optional );
@@ -45 +45 @@
     if ( support ) { // support is given
         grid_fnc ep_disc;
-        ep_disc.set_support ( *support );
+        ep_disc.set_support ( support );
         ep_disc.set_values ( *hepdf );
         // ep_disc is discretized at support points
 
-        double point_volume = prod ( support->_steps() );
-        CHECK_CLOSE ( 1.0, sum ( ep_disc._values() ) *point_volume, 0.01 );
+        CHECK_CLOSE ( 1.0,  ep_disc.integrate(), 0.01 );
 
         vec pdf = ep_disc._values();