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/bdm/stat/exp_family.cpp

    r850 r878  
    2121        dimx = dimx0; 
    2222        nPsi = V0.rows() - dimx; 
    23         dim = dimx * ( dimx + nPsi ); // size(R) + size(Theta) 
    2423 
    2524        V = V0; 
     
    5352        eWishartCh Omega; //inverse Wishart, result is R, 
    5453        Omega.set_parameters ( iChLam, nu - 2*nPsi - dimx ); // 2*nPsi is there to match numercial simulations - check if analytically correct 
     54        Omega.validate();        
    5555 
    5656        mat OmChi; 
     
    8787        eWishartCh Omega; //inverse Wishart, result is R, 
    8888        Omega.set_parameters ( iCh, nu - 2*nPsi - dimx ); // 2*nPsi is there to match numercial simulations - check if analytically correct 
     89        Omega.validate(); 
    8990 
    9091        chmat Omi; 
     
    420421        k = k0; 
    421422        iepdf.set_parameters ( k * ones ( beta0.length() ), beta0 ); 
    422         dimc = iepdf.dimension(); 
    423         dim = iepdf.dimension(); 
    424423} 
    425424 
     
    532531        UI::get ( ref, set, "ref" , UI::compulsory ); 
    533532        set_parameters ( set["k"], ref, set["l"] ); 
     533        validate(); 
    534534} 
    535535 
     
    538538        UI::get ( mu0, set, "mu0", UI::compulsory ); 
    539539        set_parameters ( mu0.length(), set["k"] ); 
     540        validate(); 
    540541        condition ( mu0 ); 
    541542}