00001 // Copyright (C) 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 <mln/make/h_mat.hh> 00027 00028 00029 static const int result[4][4] = { { 2, 3, 4, 0 }, 00030 { 5, 6, 7, 0 }, 00031 { 8, 9, 10, 0 }, 00032 { 0, 0, 0, 1 } }; 00033 00034 int main() 00035 { 00036 using namespace mln; 00037 00038 int vals[9] = { 2, 3, 4, 00039 5, 6, 7, 00040 8, 9, 10 }; 00041 algebra::h_mat<3,int> m = make::h_mat(vals); 00042 00043 for (unsigned i = 0; i < 4; ++i) 00044 for (unsigned j = 0; j < 4; ++j) 00045 mln_assertion(m(i,j) == result[i][j]); 00046 }