00001 
00002 
00003 
00004 
00005 
00006 
00007 
00008 
00009 
00010 
00011 
00012 
00013 
00014 
00015 
00016 
00017 
00018 
00019 
00020 
00021 
00022 
00023 
00024 
00025 
00026 #include <mln/core/image/image2d.hh>
00027 #include <mln/debug/iota.hh>
00028 #include <mln/border/duplicate.hh>
00029 #include <mln/opt/element.hh>
00030 
00031 
00032 using namespace mln;
00033 
00034 int
00035 main (void)
00036 {
00037   image2d<int> ima(3, 3, 1);
00038 
00039   debug::iota(ima);
00040   border::duplicate(ima);
00041 
00042   mln_assertion(opt::element(ima, 0) == 1);
00043   mln_assertion(opt::element(ima, 1) == 1);
00044   mln_assertion(opt::element(ima, 2) == 2);
00045   mln_assertion(opt::element(ima, 3) == 3);
00046   mln_assertion(opt::element(ima, 4) == 3);
00047   mln_assertion(opt::element(ima, 5) == 1);
00048   mln_assertion(opt::element(ima, 6) == 1);
00049   mln_assertion(opt::element(ima, 7) == 2);
00050   mln_assertion(opt::element(ima, 8) == 3);
00051   mln_assertion(opt::element(ima, 9) == 3);
00052   mln_assertion(opt::element(ima, 10) == 4);
00053   mln_assertion(opt::element(ima, 11) == 4);
00054   mln_assertion(opt::element(ima, 12) == 5);
00055   mln_assertion(opt::element(ima, 13) == 6);
00056   mln_assertion(opt::element(ima, 14) == 6);
00057   mln_assertion(opt::element(ima, 15) == 7);
00058   mln_assertion(opt::element(ima, 16) == 7);
00059   mln_assertion(opt::element(ima, 17) == 8);
00060   mln_assertion(opt::element(ima, 18) == 9);
00061   mln_assertion(opt::element(ima, 19) == 9);
00062   mln_assertion(opt::element(ima, 20) == 7);
00063   mln_assertion(opt::element(ima, 21) == 7);
00064   mln_assertion(opt::element(ima, 22) == 8);
00065   mln_assertion(opt::element(ima, 23) == 9);
00066   mln_assertion(opt::element(ima, 24) == 9);
00067 }