My Project
drovector-calc.hpp
1 //=============================================================================
3 inline _dcovector t(const drovector& rovec)
4 {
5 #ifdef CPPL_VERBOSE
6  std::cerr << "# [MARK] t(const drovector&)"
7  << std::endl;
8 #endif//CPPL_VERBOSE
9 
10  dcovector covec(rovec.L);
11  dcopy_(rovec.L, rovec.Array, 1, covec.array, 1);
12 
13  return _(covec);
14 }
15 
16 //=============================================================================
18 inline double nrm2(const drovector& vec)
19 {
20 #ifdef CPPL_VERBOSE
21  std::cerr << "# [MARK] nrm2(const drovector&)"
22  << std::endl;
23 #endif//CPPL_VERBOSE
24 
25  return dnrm2_(vec.L, vec.Array, 1);
26 }
27 
28 //=============================================================================
31 inline long idamax(const drovector& vec)
32 {
33 #ifdef CPPL_VERBOSE
34  std::cerr << "# [MARK] idamax(const drovector&)"
35  << std::endl;
36 #endif//CPPL_VERBOSE
37 
38  return idamax_(vec.L, vec.Array, 1) -1;
39 }
40 
41 //=============================================================================
43 inline double damax(const drovector& vec)
44 {
45 #ifdef CPPL_VERBOSE
46  std::cerr << "# [MARK] damax(const drovector&)"
47  << std::endl;
48 #endif//CPPL_VERBOSE
49 
50  return vec.Array[idamax_(vec.L, vec.Array, 1) -1];
51 }
friend double damax(const drovector &)
Definition: drovector-calc.hpp:43
friend double nrm2(const drovector &)
Definition: drovector-calc.hpp:18
double *const & array
1D array to store vector data (readable)
Definition: dcovector.hpp:13
Real Double-precision Row Vector Class.
Definition: drovector.hpp:3
friend _dcovector t(const drovector &)
Definition: drovector-calc.hpp:3
Real Double-precision Column Vector Class.
Definition: dcovector.hpp:3
friend long idamax(const drovector &)
Definition: drovector-calc.hpp:31
(DO NOT USE) Smart-temporary Real Double-precision Column Vector Class
Definition: _dcovector.hpp:3