tensor-0.1.0
 All Data Structures Namespaces Functions Variables Typedefs Enumerations Enumerator Groups Pages
tensor_to_complex.cc
1 // -*- mode: c++; fill-column: 80; c-basic-offset: 2; indent-tabs-mode: nil -*-
2 /*
3  Copyright (c) 2010 Juan Jose Garcia Ripoll
4 
5  Tensor is free software; you can redistribute it and/or modify it
6  under the terms of the GNU Library General Public License as published
7  by the Free Software Foundation; either version 2 of the License, or
8  (at your option) any later version.
9 
10  This program is distributed in the hope that it will be useful,
11  but WITHOUT ANY WARRANTY; without even the implied warranty of
12  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13  GNU Library General Public License for more details.
14 
15  You should have received a copy of the GNU General Public License along
16  with this program; if not, write to the Free Software Foundation, Inc.,
17  51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18 */
19 
20 #define TENSOR_LOAD_IMPL
21 #include <tensor/tensor.h>
22 
23 namespace tensor {
24 
25  const CTensor to_complex(const RTensor &r)
26  {
27  CTensor output(r.dimensions());
28  RTensor::const_iterator ir = r.begin();
29  for (CTensor::iterator io = output.begin(); io != output.end(); ++io, ++ir) {
30  *io = to_complex(*ir);
31  }
32  return output;
33  }
34 
35  const CTensor to_complex(const RTensor &r, const RTensor &i)
36  {
37  CTensor output(r.dimensions());
38  RTensor::const_iterator ir = r.begin();
39  RTensor::const_iterator ii = i.begin();
40  for (CTensor::iterator io = output.begin(); io != output.end(); ++io, ++ir, +ii) {
41  *io = to_complex(*ir,*ii);
42  }
43  return output;
44  }
45 
46 } // namespace tensor