Milena (Olena)  User documentation 2.0a Id
 All Classes Namespaces Functions Variables Typedefs Enumerator Groups Pages
fun/math/cos.hh
1 // Copyright (C) 2007, 2008, 2009 EPITA Research and Development Laboratory (LRDE)
2 //
3 // This file is part of Olena.
4 //
5 // Olena is free software: you can redistribute it and/or modify it under
6 // the terms of the GNU General Public License as published by the Free
7 // Software Foundation, version 2 of the License.
8 //
9 // Olena is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 // General Public License for more details.
13 //
14 // You should have received a copy of the GNU General Public License
15 // along with Olena. If not, see <http://www.gnu.org/licenses/>.
16 //
17 // As a special exception, you may use this file as part of a free
18 // software project without restriction. Specifically, if other files
19 // instantiate templates or use macros or inline functions from this
20 // file, or you compile this file and link it with other files to produce
21 // an executable, this file does not by itself cause the resulting
22 // executable to be covered by the GNU General Public License. This
23 // exception does not however invalidate any other reasons why the
24 // executable file might be covered by the GNU General Public License.
25 
26 #ifndef MLN_FUN_MATH_COS_HH
27 # define MLN_FUN_MATH_COS_HH
28 
29 # include <mln/fun/unary.hh>
30 # include <mln/value/builtin/floatings.hh>
31 # include <mln/value/builtin/integers.hh>
32 # include <mln/math/acos.hh>
33 # include <mln/math/cos.hh>
34 
35 namespace mln
36 {
37 
38  // Cosinus, bijective
39  namespace fun
40  {
41  struct cos : unary<cos> {};
42  }
43 
44  namespace trait
45  {
46 
47  namespace next
48  {
49 
50  template <typename T>
51  struct set_unary_<mln::fun::cos, mln::value::Floating, T>
52  {
53  typedef set_unary_ ret;
54  typedef T result;
55  typedef T argument;
56  typedef T& lvalue;
57 
58  static result read(const argument& x)
59  {
60  return math::cos(x);
61  }
62 
63  static void write(lvalue l, const result& x)
64  {
65  l = math::acos(x);
66  }
67  };
68 
69  template <typename T>
70  struct set_unary_<mln::fun::cos, mln::value::Integer, T>
71  {
72  typedef set_unary_ ret;
73  typedef double result;
74  typedef T argument;
75 
76  static result read(const argument& x)
77  {
78  return math::cos((result)x);
79  }
80 
81  };
82 
83  } // end of namespace mln::trait::next
84 
85  } // end of namespace mln
86 
87 } // end of namespace mln
88 
89 #endif /* ! MLN_FUN_MATH_COS_HH */