Go to the source code of this file.
Functions | |
double | operator * (const _drovector &rovec, const dcovector &covec) |
|
_drovector*dcovector operator Definition at line 3 of file _drovector-dcovector.hpp. References dcovector::Array, _drovector::Array, dcovector::Desc, _drovector::Desc, _drovector::destroy(), dcovector::L, and _drovector::L.
00004 { 00005 #ifdef CPPSL_DEBUG 00006 if(rovec.L!=covec.L){ 00007 std::cerr << "[ERROR] operator*(const _drovector&, const dcovector&)" 00008 << std::endl 00009 << "These two vectors can not make a product." << std::endl 00010 << "Your input was (" << rovec.L << ") * (" << covec.L << ")." 00011 << std::endl; 00012 exit(1); 00013 } 00014 #endif//CPPSL_DEBUG 00015 00016 double val; 00017 pddot_( rovec.L, val, 00018 rovec.Array, 1, 1, rovec.Desc, 1, covec.Array, 1, 1, covec.Desc, 1 ); 00019 00020 rovec.destroy(); 00021 return val; 00022 } |