| [9c5296] | 1 | /* | 
|---|
|  | 2 | * Project: MoleCuilder | 
|---|
|  | 3 | * Description: creates and alters molecular systems | 
|---|
|  | 4 | * Copyright (C)  2010 University of Bonn. All rights reserved. | 
|---|
|  | 5 | * Please see the LICENSE file or "Copyright notice" in builder.cpp for details. | 
|---|
|  | 6 | */ | 
|---|
|  | 7 |  | 
|---|
|  | 8 | /* | 
|---|
|  | 9 | * Eigenspace.cpp | 
|---|
|  | 10 | * | 
|---|
|  | 11 | *  Created on: Nov 22, 2010 | 
|---|
|  | 12 | *      Author: heber | 
|---|
|  | 13 | */ | 
|---|
|  | 14 |  | 
|---|
|  | 15 | // include config.h | 
|---|
|  | 16 | #ifdef HAVE_CONFIG_H | 
|---|
|  | 17 | #include <config.h> | 
|---|
|  | 18 | #endif | 
|---|
|  | 19 |  | 
|---|
|  | 20 | #include "Helpers/MemDebug.hpp" | 
|---|
|  | 21 |  | 
|---|
|  | 22 | #include <iostream> | 
|---|
|  | 23 | #include <boost/foreach.hpp> | 
|---|
|  | 24 |  | 
|---|
|  | 25 | #include "Helpers/Assert.hpp" | 
|---|
|  | 26 | #include "Helpers/Log.hpp" | 
|---|
|  | 27 | #include "Helpers/Verbose.hpp" | 
|---|
|  | 28 |  | 
|---|
|  | 29 | #include "Eigenspace.hpp" | 
|---|
|  | 30 |  | 
|---|
|  | 31 |  | 
|---|
|  | 32 | /** Constructor for Eigenspace. | 
|---|
|  | 33 | * @param _Indices index set for columns and rows of EigenspaceMatrix. | 
|---|
|  | 34 | */ | 
|---|
|  | 35 | Eigenspace::Eigenspace(const indexset &_Indices) : | 
|---|
|  | 36 | Indices(_Indices), | 
|---|
|  | 37 | EigenspaceMatrix(_Indices.size(),_Indices.size()), | 
|---|
|  | 38 | EigenvectorMatrix(_Indices.size(),_Indices.size()) | 
|---|
|  | 39 | { | 
|---|
| [286af5f] | 40 | EigenvectorMatrix.setIdentity(); | 
|---|
|  | 41 | for (size_t i = 0 ; i< _Indices.size(); ++i) | 
|---|
|  | 42 | Eigenvalues.push_back(0.); | 
|---|
| [9c5296] | 43 | createEigenvectorViews(); | 
|---|
|  | 44 | } | 
|---|
|  | 45 |  | 
|---|
|  | 46 |  | 
|---|
|  | 47 | /** Constructor for Eigenspace. | 
|---|
|  | 48 | * @param _Indices index set for columns and rows of EigenspaceMatrix. | 
|---|
|  | 49 | * @param _matrix matrix to use | 
|---|
|  | 50 | */ | 
|---|
|  | 51 | Eigenspace::Eigenspace(const indexset &_Indices, const MatrixContent &_matrix) : | 
|---|
|  | 52 | Indices(_Indices), | 
|---|
|  | 53 | EigenspaceMatrix(_matrix), | 
|---|
|  | 54 | EigenvectorMatrix(_matrix.getRows(), _matrix.getColumns()) | 
|---|
|  | 55 | { | 
|---|
|  | 56 | ASSERT(_Indices.size() == _matrix.getRows(), | 
|---|
|  | 57 | "Eigenspace::Eigenspace() - number of indices "+toString(_Indices.size()) | 
|---|
|  | 58 | +" and row dimension of matrix "+toString(_matrix.getRows())+" don't match!"); | 
|---|
|  | 59 | ASSERT(_Indices.size() == _matrix.getColumns(), | 
|---|
|  | 60 | "Eigenspace::Eigenspace() - number of indices "+toString(_Indices.size()) | 
|---|
|  | 61 | +" and column dimension of matrix "+toString(_matrix.getColumns())+" don't match!"); | 
|---|
| [a06042] | 62 |  | 
|---|
| [286af5f] | 63 | EigenvectorMatrix.setIdentity(); | 
|---|
|  | 64 | for (size_t i = 0 ; i< _Indices.size(); ++i) | 
|---|
|  | 65 | Eigenvalues.push_back(0.); | 
|---|
| [a06042] | 66 | createEigenvectorViews(); | 
|---|
| [9c5296] | 67 | } | 
|---|
|  | 68 |  | 
|---|
|  | 69 |  | 
|---|
|  | 70 | /** Destructor for Eigenspace. | 
|---|
|  | 71 | * | 
|---|
|  | 72 | */ | 
|---|
|  | 73 | Eigenspace::~Eigenspace() | 
|---|
|  | 74 | {} | 
|---|
|  | 75 |  | 
|---|
|  | 76 |  | 
|---|
|  | 77 | /** Create a number of eigenvectors in Eigenspace::Eigenvectors. | 
|---|
|  | 78 | * These are views on the resepctive column vectors in | 
|---|
|  | 79 | * Eigenspace::EigenvectorMatrix. | 
|---|
|  | 80 | */ | 
|---|
|  | 81 | void Eigenspace::createEigenvectorViews() | 
|---|
|  | 82 | { | 
|---|
| [286af5f] | 83 | const size_t ColumnCount = EigenvectorMatrix.getColumns(); | 
|---|
| [9c5296] | 84 | for (size_t iter = 0; iter < ColumnCount; ++iter) { | 
|---|
| [286af5f] | 85 | boost::shared_ptr<VectorContent> ev(EigenvectorMatrix.getColumnVector(iter)); | 
|---|
| [9c5296] | 86 | Eigenvectors.push_back( ev ); | 
|---|
| [e828c0] | 87 | DoLog(1) && (Log() << Verbose(1) << iter << " th Eigenvector is " << *ev << std::endl); | 
|---|
| [9c5296] | 88 | } | 
|---|
|  | 89 | } | 
|---|
|  | 90 |  | 
|---|
|  | 91 |  | 
|---|
|  | 92 | /** Obtains the eigenvectors to Eigenspace::EigenspaceMatrix. | 
|---|
|  | 93 | * We diagonalize the matrix and set the Eigenspace::Eigenvectors and | 
|---|
|  | 94 | * Eigenspace::Eigenvalues. | 
|---|
|  | 95 | */ | 
|---|
|  | 96 | void Eigenspace::calculateEigenSubspace() | 
|---|
|  | 97 | { | 
|---|
| [286af5f] | 98 | ASSERT(0, "Eigenspace::calculateEigenSubspace() - we never want to call this function!"); | 
|---|
| [9c5296] | 99 | } | 
|---|
|  | 100 |  | 
|---|
|  | 101 |  | 
|---|
|  | 102 | /** Getter for constant reference to Eigenspace::EigenspaceMatrix. | 
|---|
|  | 103 | * | 
|---|
|  | 104 | * @return Eigenspace::EigenspaceMatrix | 
|---|
|  | 105 | */ | 
|---|
|  | 106 | const MatrixContent & Eigenspace::getEigenspaceMatrix() const | 
|---|
|  | 107 | { | 
|---|
|  | 108 | return EigenspaceMatrix; | 
|---|
|  | 109 | } | 
|---|
|  | 110 |  | 
|---|
|  | 111 |  | 
|---|
|  | 112 | /** Setter for Eigenspace::EigenspaceMatrix. | 
|---|
|  | 113 | * | 
|---|
|  | 114 | * @param _content matrix to use | 
|---|
|  | 115 | */ | 
|---|
|  | 116 | void Eigenspace::setEigenspaceMatrix(const MatrixContent &_content) | 
|---|
|  | 117 | { | 
|---|
|  | 118 | EigenspaceMatrix = _content; | 
|---|
|  | 119 | EigenvectorMatrix.setZero(); | 
|---|
|  | 120 | } | 
|---|
|  | 121 |  | 
|---|
| [a06042] | 122 |  | 
|---|
| [286af5f] | 123 | const VectorContent & Eigenspace::getEigenvector(const size_t i) const | 
|---|
| [a06042] | 124 | { | 
|---|
|  | 125 | return *(Eigenvectors[i]); | 
|---|
|  | 126 | } | 
|---|
|  | 127 |  | 
|---|
| [9c5296] | 128 | /** Checks whether each index of _indexset is contained in this subspace:Indices. | 
|---|
|  | 129 | * | 
|---|
|  | 130 | * @param _subspace subspace set to check | 
|---|
|  | 131 | * @return true - _index is contained, false - at least index is not contained | 
|---|
|  | 132 | */ | 
|---|
|  | 133 | bool Eigenspace::contains(const Eigenspace &_subspace) | 
|---|
|  | 134 | { | 
|---|
|  | 135 | BOOST_FOREACH(size_t iter, _subspace.getIndices()) { | 
|---|
|  | 136 | if (Indices.count(iter) == 0) {  // index not present, then not contained | 
|---|
|  | 137 | return false; | 
|---|
|  | 138 | } | 
|---|
|  | 139 | } | 
|---|
|  | 140 | return true; | 
|---|
|  | 141 | } | 
|---|
|  | 142 |  | 
|---|
|  | 143 |  | 
|---|
|  | 144 | /** Getter for Eigenspace::Indices. | 
|---|
|  | 145 | * | 
|---|
|  | 146 | * @return indexset of this eigenspace | 
|---|
|  | 147 | */ | 
|---|
|  | 148 | const Eigenspace::indexset & Eigenspace::getIndices() const | 
|---|
|  | 149 | { | 
|---|
|  | 150 | return Indices; | 
|---|
|  | 151 | } | 
|---|
|  | 152 |  | 
|---|
| [286af5f] | 153 | const MatrixContent & Eigenspace::getEigenvectorMatrix() const | 
|---|
|  | 154 | { | 
|---|
|  | 155 | return EigenvectorMatrix; | 
|---|
|  | 156 | } | 
|---|
|  | 157 |  | 
|---|
|  | 158 | const double Eigenspace::getEigenvalue(const size_t i) const | 
|---|
|  | 159 | { | 
|---|
|  | 160 | return Eigenvalues[i]; | 
|---|
|  | 161 | } | 
|---|
|  | 162 |  | 
|---|
|  | 163 | const Eigenspace::eigenvalueset & Eigenspace::getEigenvalues() const | 
|---|
|  | 164 | { | 
|---|
|  | 165 | return Eigenvalues; | 
|---|
|  | 166 | } | 
|---|
|  | 167 |  | 
|---|
| [a06042] | 168 |  | 
|---|
|  | 169 | /** Sets the eigenvectors and -values. | 
|---|
|  | 170 | * | 
|---|
|  | 171 | * We only implement this for eigenpairs, not eigenvector and eigenvalue | 
|---|
|  | 172 | * distinctly to avoid mismatches, i.e. old eigenvalues used because only new | 
|---|
|  | 173 | * eigenvectors have been given. | 
|---|
|  | 174 | * | 
|---|
|  | 175 | * @param CurrentEigenvectors eigenvectors to set to | 
|---|
|  | 176 | * @param CurrentEigenvalues eigenvalues to set to | 
|---|
|  | 177 | */ | 
|---|
|  | 178 | void Eigenspace::setEigenpairs(const eigenvectorset &CurrentEigenvectors, const eigenvalueset &CurrentEigenvalues) | 
|---|
|  | 179 | { | 
|---|
|  | 180 | ASSERT(CurrentEigenvectors.size() == Eigenvectors.size(), | 
|---|
|  | 181 | "Eigenspace::setEigenpairs() - " | 
|---|
|  | 182 | +toString(CurrentEigenvectors.size())+" x CurrentEigenvectors is not the same as " | 
|---|
|  | 183 | +toString(Eigenvectors.size())+"x Eigenvectors!"); | 
|---|
|  | 184 | // set eigenvectors | 
|---|
|  | 185 | std::vector<boost::shared_ptr<VectorContent> >::const_iterator newev = CurrentEigenvectors.begin(); | 
|---|
|  | 186 | for(std::vector<boost::shared_ptr<VectorContent> >::iterator ev = Eigenvectors.begin(); | 
|---|
|  | 187 | ev != Eigenvectors.end(); | 
|---|
|  | 188 | ++ev, ++newev) { | 
|---|
|  | 189 | *ev = *newev; | 
|---|
|  | 190 | } | 
|---|
|  | 191 | // eigenvalues can be just copied (integral type) | 
|---|
| [286af5f] | 192 | Eigenvalues.clear(); | 
|---|
| [a06042] | 193 | Eigenvalues = CurrentEigenvalues; | 
|---|
|  | 194 | } | 
|---|
|  | 195 |  | 
|---|
|  | 196 |  | 
|---|
|  | 197 | /** Output operator for Eigenspace. | 
|---|
|  | 198 | * | 
|---|
|  | 199 | * @param ost output stream | 
|---|
|  | 200 | * @param _s Eigenspace to print: Indices and contained matrix | 
|---|
|  | 201 | * @return given output stream | 
|---|
|  | 202 | */ | 
|---|
| [9c5296] | 203 | std::ostream & operator<<(std::ostream &ost, const Eigenspace &_s) | 
|---|
|  | 204 | { | 
|---|
| [a06042] | 205 | BOOST_FOREACH(size_t iter, _s.Indices) { | 
|---|
| [9c5296] | 206 | ost << iter << " "; | 
|---|
|  | 207 | } | 
|---|
| [a06042] | 208 | ost << " with matrix " << _s.EigenspaceMatrix; | 
|---|
| [9c5296] | 209 | return ost; | 
|---|
|  | 210 | } | 
|---|
| [a06042] | 211 |  | 
|---|