% Netgen simulation $Id: netgen_sims06.m 4839 2015-03-30 07:44:50Z aadler $
subplot(221)

% Get a basic inverse model - replace the fwd model part
imdl = mk_common_model('a2c2',16); % the parameters aren't important because we replace it
imdl.fwd_model = img.fwd_model;

imgr = inv_solve(imdl, vh, vi);
show_fem(imgr);
axis equal; axis tight; print_convert netgen_sims06a.png '-density 100'

% Change the hyperparameter
imdl.hyperparameter.value = .05;
imgr = inv_solve(imdl, vh, vi);
show_fem(imgr);
axis equal; axis tight; print_convert netgen_sims06b.png '-density 100'
