np_calc_image_prior

 NP_CALC_IMAGE_PRIOR calculate image prior

 Intended to be used as calc_R_prior

 Ref= np_calc_image_prior( inv_model )
 Ref        => output regularization term
 inv_model  => inverse model struct

0001 function Reg= np_calc_image_prior( inv_model );
0002 % NP_CALC_IMAGE_PRIOR calculate image prior
0003 %
0004 % Intended to be used as calc_R_prior
0005 %
0006 % Ref= np_calc_image_prior( inv_model )
0007 % Ref        => output regularization term
0008 % inv_model  => inverse model struct
0009 
0010 % (C) 2005 Andy Adler. License: GPL version 2 or version 3
0011 % $Id: np_calc_image_prior.html 2819 2011-09-07 16:43:11Z aadler $
0012 
0013 Reg = eidors_obj('get-cache', inv_model, 'np_2003_image_prior');
0014 
0015 if ~isempty(Reg)
0016    eidors_msg('np_calc_image_prior: using cached value', 3);
0017    return
0018 end
0019 
0020 parameters=  inv_model.np_calc_image_prior.parameters;
0021 smooth_deg= parameters(1);
0022 smooth_w  = parameters(2);
0023 
0024 Reg = iso_f_smooth(inv_model.fwd_model.elems, ...
0025                    inv_model.fwd_model.nodes, ...
0026                    smooth_deg, smooth_w);
0027 
0028 eidors_obj('set-cache', inv_model, 'np_2003_image_prior', Reg);
0029 eidors_msg('np_calc_image_prior: setting cached value', 3);