Line | |
---|
1 | function [aff_err, shum_err, shum_aff_err, shum_stab] = process_sol(err, res, Merr, pts, INC, r) |
---|
2 | % Take an initial solution and determine affine error, and errors after |
---|
3 | % iterative refinement. |
---|
4 | if err ~= -2 |
---|
5 | aff_err = affine_error(res, pts, r); |
---|
6 | [shum_err, shum_res, shum_stab] = shum(Merr,INC,r,res,100); |
---|
7 | if shum_err ~= -2 |
---|
8 | shum_aff_err = affine_error(shum_res, pts, r); |
---|
9 | else |
---|
10 | shum_aff_err = -2; |
---|
11 | end |
---|
12 | else |
---|
13 | aff_err = -2; |
---|
14 | shum_err = -2; |
---|
15 | shum_aff_err = -2; |
---|
16 | shum_stab = 0; |
---|
17 | end |
---|
Note: See
TracBrowser
for help on using the repository browser.