$extrastylesheet
Olena  User documentation 2.1
An Image Processing Platform
 All Classes Namespaces Functions Variables Typedefs Enumerations Enumerator Friends Groups Pages
cst.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_PW_CST_HH
27 # define MLN_PW_CST_HH
28 
32 
33 # include <mln/fun/internal/selector.hh>
34 # include <mln/value/equiv.hh>
35 # include <mln/value/concept/scalar.hh>
36 
37 
38 namespace mln
39 {
40 
41  // Forward declarations
42  namespace pw
43  {
44 
45  template <typename T>
46  struct cst_;
47 
48  template <typename T>
49  cst_<T> cst(const T& t);
50 
51  } // end of namespace mln::pw
52 
53 
54  namespace trait
55  {
56 
57  template <typename F, typename S>
58  struct set_binary_< op::eq, mln::Function_v2v, F, mln::value::Scalar, S >
59  {
60  typedef mln_trait_op_eq(F, pw::cst_<mln_value_equiv(S)>) ret;
61  };
62 
63  } // end of namespace mln::trait
64 
65 
66  template <typename F, typename S>
67  mln_trait_op_eq(F,S)
68  operator == (const Function_v2v<F>& fun, const value::Scalar<S>& s)
69  {
70  return exact(fun) == pw::cst( value::equiv(s) );
71  }
72 
73 
74 
75  namespace pw
76  {
77 
78  // FIXME: Doc!
79 
80  template <typename T>
81  struct cst_
82  : fun::internal::selector_from_result_<T, cst_<T> >::ret
83  {
84  typedef T result;
85 
86  cst_();
87 
88  cst_(const T& t);
89 
90  template <typename P>
91  T operator()(const P&) const;
92 
93  private:
94  T t_;
95  };
96 
97 
98  // FIXME: Doc!
99 
100  template <typename T>
101  cst_<T> cst(const T& t);
102 
103 
104 # ifndef MLN_INCLUDE_ONLY
105 
106  // pw::cst_<T>
107 
108  template <typename T>
109  inline
110  cst_<T>::cst_()
111  {
112  }
113 
114  template <typename T>
115  inline
116  cst_<T>::cst_(const T& t)
117  : t_(t)
118  {
119  }
120 
121  template <typename T>
122  template <typename P>
123  inline
124  T
125  cst_<T>::operator()(const P&) const
126  {
127  return t_;
128  }
129 
130  // pw::cst(t)
131 
132  template <typename T>
133  inline
134  cst_<T> cst(const T& t)
135  {
136  cst_<T> tmp(t);
137  return tmp;
138  }
139 
140 # endif // ! MLN_INCLUDE_ONLY
141 
142  } // end of namespace mln::pw
143 
144 } // end of namespace mln
145 
146 
147 #endif // ! MLN_PW_CST_HH