00001 // Copyright (C) 2007, 2008, 2009 EPITA Research and Development Laboratory (LRDE) 00002 // 00003 // This file is part of Olena. 00004 // 00005 // Olena is free software: you can redistribute it and/or modify it under 00006 // the terms of the GNU General Public License as published by the Free 00007 // Software Foundation, version 2 of the License. 00008 // 00009 // Olena is distributed in the hope that it will be useful, 00010 // but WITHOUT ANY WARRANTY; without even the implied warranty of 00011 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 00012 // General Public License for more details. 00013 // 00014 // You should have received a copy of the GNU General Public License 00015 // along with Olena. If not, see <http://www.gnu.org/licenses/>. 00016 // 00017 // As a special exception, you may use this file as part of a free 00018 // software project without restriction. Specifically, if other files 00019 // instantiate templates or use macros or inline functions from this 00020 // file, or you compile this file and link it with other files to produce 00021 // an executable, this file does not by itself cause the resulting 00022 // executable to be covered by the GNU General Public License. This 00023 // exception does not however invalidate any other reasons why the 00024 // executable file might be covered by the GNU General Public License. 00025 00026 #include <tests/norm/common.hh> 00027 00028 #include <mln/algebra/vec.hh> 00029 #include <mln/norm/l1.hh> 00030 00031 00032 namespace test 00033 { 00034 template <typename V, typename S> 00035 void 00036 check_l1_norm_and_distance(const V& vec1, const V& vec2, const S& ref_val) 00037 { 00038 // Pointer on mln::norm::l1. 00039 typedef mln_sum_(int) (*l1_t)(const V&); 00040 l1_t l1 = mln::norm::l1; 00041 00042 test::check_norm(l1, vec1, vec2); 00043 00044 // Pointer on mln::norm::l1_distance. 00045 typedef mln_sum_(int) (*l1_distance_t)(const V&, const V&); 00046 l1_distance_t l1_distance = mln::norm::l1_distance; 00047 00048 test::check_distance(l1_distance, vec1, vec2, ref_val); 00049 } 00050 } 00051 00052 int main() 00053 { 00054 typedef mln::algebra::vec<3, int> vec_t; 00055 00056 // Reference value. 00057 int d = (5 - 1) + (1 + 2) + 3; 00058 00059 // Tests using mln::algebra::vec. 00060 vec_t t, u; 00061 t.set(1, -2, 3); 00062 u.set(5, 1, 0); 00063 test::check_l1_norm_and_distance(t, u, d); 00064 00065 // Tests using plain arrays. 00066 int v[] = {1, -2, 3}; 00067 int w[] = {5, 1, 0}; 00068 test::check_l1_norm_and_distance(v, w, d); 00069 }