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 #ifndef MLN_FUN_MATH_COS_HH 00027 # define MLN_FUN_MATH_COS_HH 00028 00029 # include <mln/fun/unary.hh> 00030 # include <mln/value/builtin/floatings.hh> 00031 # include <mln/value/builtin/integers.hh> 00032 # include <mln/math/acos.hh> 00033 # include <mln/math/cos.hh> 00034 00035 namespace mln 00036 { 00037 00038 // Cosinus, bijective 00039 namespace fun 00040 { 00041 struct cos : unary<cos> {}; 00042 } 00043 00044 namespace trait 00045 { 00046 00047 namespace next 00048 { 00049 00050 template <typename T> 00051 struct set_unary_<mln::fun::cos, mln::value::Floating, T> 00052 { 00053 typedef set_unary_ ret; 00054 typedef T result; 00055 typedef T argument; 00056 typedef T& lvalue; 00057 00058 static result read(const argument& x) 00059 { 00060 return math::cos(x); 00061 } 00062 00063 static void write(lvalue l, const result& x) 00064 { 00065 l = math::acos(x); 00066 } 00067 }; 00068 00069 template <typename T> 00070 struct set_unary_<mln::fun::cos, mln::value::Integer, T> 00071 { 00072 typedef set_unary_ ret; 00073 typedef double result; 00074 typedef T argument; 00075 00076 static result read(const argument& x) 00077 { 00078 return math::cos((result)x); 00079 } 00080 00081 }; 00082 00083 } // end of namespace mln::trait::next 00084 00085 } // end of namespace mln 00086 00087 } // end of namespace mln 00088 00089 #endif /* ! MLN_FUN_MATH_COS_HH */
1.7.1