00001 // Copyright (C) 2009, 2011 EPITA Research and Development Laboratory 00002 // (LRDE) 00003 // 00004 // This file is part of Olena. 00005 // 00006 // Olena is free software: you can redistribute it and/or modify it under 00007 // the terms of the GNU General Public License as published by the Free 00008 // Software Foundation, version 2 of the License. 00009 // 00010 // Olena is distributed in the hope that it will be useful, 00011 // but WITHOUT ANY WARRANTY; without even the implied warranty of 00012 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 00013 // General Public License for more details. 00014 // 00015 // You should have received a copy of the GNU General Public License 00016 // along with Olena. If not, see <http://www.gnu.org/licenses/>. 00017 // 00018 // As a special exception, you may use this file as part of a free 00019 // software project without restriction. Specifically, if other files 00020 // instantiate templates or use macros or inline functions from this 00021 // file, or you compile this file and link it with other files to produce 00022 // an executable, this file does not by itself cause the resulting 00023 // executable to be covered by the GNU General Public License. This 00024 // exception does not however invalidate any other reasons why the 00025 // executable file might be covered by the GNU General Public License. 00026 00027 #include <mln/make/image2d.hh> 00028 #include <mln/topo/skeleton/is_simple_point.hh> 00029 #include <mln/make/image.hh> 00030 #include <mln/make/dual_neighb.hh> 00031 00032 static const unsigned ref[] = { 1, 0, 1, 1, 1, 0, 0, 0, 0, 1, 1, 0 }; 00033 00034 int main() 00035 { 00036 using namespace mln; 00037 00038 bool vals[][6] = { { 0, 1, 0, 0, 1, 1 }, 00039 { 0, 0, 0, 0, 1, 1 } }; 00040 00041 typedef image2d<bool> I; 00042 I ima = make::image(vals); 00043 00044 typedef 00045 neighb<win::multiple_size<2u, window<dpoint<grid::square, short int> >, 00046 pw::value_<image2d<bool> > > > 00047 nbh_t; 00048 nbh_t nbh = make::dual_neighb(ima, c8(), c4()); 00049 00050 unsigned i = 0; 00051 topo::skeleton::is_simple_point<nbh_t> is_simple(nbh); 00052 00053 // Test generic version. 00054 { 00055 mln_piter_(I) p(ima.domain()); 00056 for_all(p) 00057 mln_assertion(ref[i++] == is_simple.check(ima, p)); 00058 } 00059 00060 }