Changeset 878 for library/tests

Show
Ignore:
Timestamp:
03/24/10 14:30:43 (14 years ago)
Author:
sarka
Message:

dim ze set_parameters do validate

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • library/tests/testsuite/epdf_test.cpp

    r802 r878  
    1313 
    1414TEST ( enorm_test ) { 
    15         epdf_harness::test_config ( "enorm.cfg" ); 
     15        epdf_harness::test_config ( "enorm.cfg" );       
    1616} 
    1717 
     
    2222// not using epdf_harness because eprod isn't configurable (yet?) 
    2323TEST ( eprod_test ) { 
    24                  
     24         
    2525        RV a ( "{eprod_a }", "1" ); 
    2626        RV b ( "{eprod_b }", "2" ); 
    27  
     27         
    2828        egamma_ptr g0; 
    2929        g0->set_parameters ( vec ( "2" ), vec ( "2" ) ); 
     30        g0->validate(); 
    3031        g0->set_rv ( a ); 
    31  
     32         
    3233        egamma_ptr g1; 
    3334        g1->set_parameters ( vec ( "100000 10000" ), vec ( "10000 1000" ) ); 
     35        g1->validate(); 
    3436        g1->set_rv ( b ); 
    35  
     37         
    3638        Array<const epdf*> coms ( 2 ); 
    3739        coms ( 0 ) = g0.get(); 
    3840        coms ( 1 ) = g1.get(); 
    39  
     41         
    4042        eprod p; 
    4143        // set_parameters doesn't say so, but it actually requires 
    4244        // pointers in the array to outlast the eprod instance... 
    4345        p.set_parameters ( coms ); 
    44  
     46         
    4547        CHECK_EQUAL ( vec ( "1 10 10" ), p.mean() ); 
    4648        CHECK_EQUAL ( vec ( "0 0 0" ), p.variance() ); 
     
    5153        eWishartCh eW; 
    5254        eW.set_parameters ( wM / 100, 100 ); 
     55        eW.validate(); 
    5356        mat mea = zeros ( 2, 2 ); 
    5457        mat Ch; 
     
    5760                mea += Ch.T() * Ch; 
    5861        } 
    59  
     62         
    6063        mat actual = mea / 100; 
    6164        CHECK_CLOSE ( wM, actual, 0.1 ); 
     
    7780                 
    7881        } 
    79  
     82         
    8083        mat observed ( "0.99464 0.885458; 0.885458 1.01853" ); 
    8184        mat actual = mea / 100;