$extrastylesheet
Olena  User documentation 2.1
An Image Processing Platform
 All Classes Namespaces Functions Variables Typedefs Enumerations Enumerator Friends Groups Pages
lemmings.cc
1 // Copyright (C) 2007, 2008, 2009 EPITA Research and Development Laboratory (LRDE)
2 //
3 // This file is part of Olena.
4 //
5 // Olena is free software: you can redistribute it and/or modify it under
6 // the terms of the GNU General Public License as published by the Free
7 // Software Foundation, version 2 of the License.
8 //
9 // Olena is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 // General Public License for more details.
13 //
14 // You should have received a copy of the GNU General Public License
15 // along with Olena. If not, see <http://www.gnu.org/licenses/>.
16 //
17 // As a special exception, you may use this file as part of a free
18 // software project without restriction. Specifically, if other files
19 // instantiate templates or use macros or inline functions from this
20 // file, or you compile this file and link it with other files to produce
21 // an executable, this file does not by itself cause the resulting
22 // executable to be covered by the GNU General Public License. This
23 // exception does not however invalidate any other reasons why the
24 // executable file might be covered by the GNU General Public License.
25 
26 #include <mln/util/lemmings.hh>
27 #include <mln/core/image/image2d.hh>
28 
29 
30 int main ()
31 {
32  using namespace mln;
33 
34  typedef image2d<int> I;
35 
36  int vals[4][4] = {{2, 2, 6, 6},
37  {2, 2, 6, 6},
38  {3, 3, 4, 4},
39  {3, 3, 4, 4}};
40 
41  I ima = make::image<int>(vals);
42 
43  point2d
44  pt1(1, 0),
45  pt2(0, 2),
46  pt3(2, 3),
47  pt4(3, 1),
48  pt5(1, 1);
49 
50  int
51  vl1 = ima(pt1),
52  vl2 = ima(pt2),
53  vl3 = ima(pt3),
54  vl4 = ima(pt4),
55  vl5 = ima(pt5);
56 
57  point2d
58  ptl1 = util::lemmings(ima, pt1, right, vl1),
59  ptl2 = util::lemmings(ima, pt2, down, vl2),
60  ptl3 = util::lemmings(ima, pt3, left, vl3),
61  ptl4 = util::lemmings(ima, pt4, up, vl4),
62  ptl5 = util::lemmings(ima, pt5, up, vl5);
63 
64  mln_assertion(ptl1 == point2d(1, 2));
65  mln_assertion(ptl2 == point2d(2, 2));
66  mln_assertion(ptl3 == point2d(2, 1));
67  mln_assertion(ptl4 == point2d(1, 1));
68  mln_assertion(ptl5 == point2d(-1, 1));
69 }