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.m 4057 2013-05-24 11:37:02Z bgrychtol $
0012 
0013 warning('EIDORS:deprecated','NP_CALC_IMAGE_PRIOR is deprecated as of 07-Jun-2012. Use PRIOR_LAPLACE instead.');
0014 
0015 Reg = eidors_obj('get-cache', inv_model, 'np_2003_image_prior');
0016 
0017 if ~isempty(Reg)
0018    eidors_msg('np_calc_image_prior: using cached value', 3);
0019    return
0020 end
0021 
0022 parameters=  inv_model.np_calc_image_prior.parameters;
0023 smooth_deg= parameters(1);
0024 smooth_w  = parameters(2);
0025 
0026 Reg = iso_f_smooth(inv_model.fwd_model.elems, ...
0027                    inv_model.fwd_model.nodes, ...
0028                    smooth_deg, smooth_w);
0029 
0030 eidors_obj('set-cache', inv_model, 'np_2003_image_prior', Reg);
0031 eidors_msg('np_calc_image_prior: setting cached value', 3);