[810] | 1 | %=======================================================================
|
---|
| 2 | % Copyright 2008-2014, LEGI UMR 5519 / CNRS UJF G-INP, Grenoble, France
|
---|
| 3 | % http://www.legi.grenoble-inp.fr
|
---|
| 4 | % Joel.Sommeria - Joel.Sommeria (A) legi.cnrs.fr
|
---|
| 5 | %
|
---|
| 6 | % This file is part of the toolbox UVMAT.
|
---|
| 7 | %
|
---|
| 8 | % UVMAT is free software; you can redistribute it and/or modify
|
---|
| 9 | % it under the terms of the GNU General Public License as published
|
---|
| 10 | % by the Free Software Foundation; either version 2 of the license,
|
---|
| 11 | % or (at your option) any later version.
|
---|
| 12 | %
|
---|
| 13 | % UVMAT is distributed in the hope that it will be useful,
|
---|
| 14 | % but WITHOUT ANY WARRANTY; without even the implied warranty of
|
---|
| 15 | % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
---|
| 16 | % GNU General Public License (see LICENSE.txt) for more details.
|
---|
| 17 | %=======================================================================
|
---|
| 18 |
|
---|
[725] | 19 | if n_ima ~= 0,
|
---|
| 20 |
|
---|
| 21 | if ~exist('active_images'),
|
---|
| 22 | active_images = ones(1,n_ima);
|
---|
| 23 | end;
|
---|
| 24 | n_act = length(active_images);
|
---|
| 25 | if n_act < n_ima,
|
---|
| 26 | active_images = [active_images ones(1,n_ima-n_act)];
|
---|
| 27 | else
|
---|
| 28 | if n_act > n_ima,
|
---|
| 29 | active_images = active_images(1:n_ima);
|
---|
| 30 | end;
|
---|
| 31 | end;
|
---|
| 32 |
|
---|
| 33 | ind_active = find(active_images);
|
---|
| 34 |
|
---|
| 35 | if prod(double(active_images == 0)),
|
---|
| 36 | disp('Error: There is no active image. Run Add/Suppress images to add images');
|
---|
| 37 | break
|
---|
| 38 | end;
|
---|
| 39 |
|
---|
| 40 | if exist('center_optim'),
|
---|
| 41 | center_optim = double(center_optim);
|
---|
| 42 | end;
|
---|
| 43 | if exist('est_alpha'),
|
---|
| 44 | est_alpha = double(est_alpha);
|
---|
| 45 | end;
|
---|
| 46 | if exist('est_dist'),
|
---|
| 47 | est_dist = double(est_dist);
|
---|
| 48 | end;
|
---|
| 49 | if exist('est_fc'),
|
---|
| 50 | est_fc = double(est_fc);
|
---|
| 51 | end;
|
---|
| 52 | if exist('est_aspect_ratio'),
|
---|
| 53 | est_aspect_ratio = double(est_aspect_ratio);
|
---|
| 54 | end;
|
---|
| 55 |
|
---|
| 56 | end;
|
---|