| 1 | /*
 | 
|---|
| 2 |  * Project: MoleCuilder
 | 
|---|
| 3 |  * Description: creates and alters molecular systems
 | 
|---|
| 4 |  * Copyright (C)  2013 University of Bonn. All rights reserved.
 | 
|---|
| 5 |  * Copyright (C)  2013 Frederik Heber. All rights reserved.
 | 
|---|
| 6 |  * 
 | 
|---|
| 7 |  *
 | 
|---|
| 8 |  *   This file is part of MoleCuilder.
 | 
|---|
| 9 |  *
 | 
|---|
| 10 |  *    MoleCuilder is free software: you can redistribute it and/or modify
 | 
|---|
| 11 |  *    it under the terms of the GNU General Public License as published by
 | 
|---|
| 12 |  *    the Free Software Foundation, either version 2 of the License, or
 | 
|---|
| 13 |  *    (at your option) any later version.
 | 
|---|
| 14 |  *
 | 
|---|
| 15 |  *    MoleCuilder is distributed in the hope that it will be useful,
 | 
|---|
| 16 |  *    but WITHOUT ANY WARRANTY; without even the implied warranty of
 | 
|---|
| 17 |  *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 | 
|---|
| 18 |  *    GNU General Public License for more details.
 | 
|---|
| 19 |  *
 | 
|---|
| 20 |  *    You should have received a copy of the GNU General Public License
 | 
|---|
| 21 |  *    along with MoleCuilder.  If not, see <http://www.gnu.org/licenses/>.
 | 
|---|
| 22 |  */
 | 
|---|
| 23 | 
 | 
|---|
| 24 | /*
 | 
|---|
| 25 |  * FragmentationShortRangeResults.cpp
 | 
|---|
| 26 |  *
 | 
|---|
| 27 |  *  Created on: Mar 07, 2013
 | 
|---|
| 28 |  *      Author: heber
 | 
|---|
| 29 |  */
 | 
|---|
| 30 | 
 | 
|---|
| 31 | 
 | 
|---|
| 32 | // include config.h
 | 
|---|
| 33 | #ifdef HAVE_CONFIG_H
 | 
|---|
| 34 | #include <config.h>
 | 
|---|
| 35 | #endif
 | 
|---|
| 36 | 
 | 
|---|
| 37 | #include "CodePatterns/MemDebug.hpp"
 | 
|---|
| 38 | 
 | 
|---|
| 39 | #include "FragmentationShortRangeResults.hpp"
 | 
|---|
| 40 | 
 | 
|---|
| 41 | #include <boost/fusion/container/map.hpp>
 | 
|---|
| 42 | #include <boost/mpl/for_each.hpp>
 | 
|---|
| 43 | #include <boost/mpl/remove.hpp>
 | 
|---|
| 44 | #include <sstream>
 | 
|---|
| 45 | 
 | 
|---|
| 46 | #include "CodePatterns/Assert.hpp"
 | 
|---|
| 47 | #include "CodePatterns/Log.hpp"
 | 
|---|
| 48 | 
 | 
|---|
| 49 | #include "Fragmentation/KeySetsContainer.hpp"
 | 
|---|
| 50 | #include "Fragmentation/parseKeySetFile.hpp"
 | 
|---|
| 51 | #include "Fragmentation/Summation/Converter/DataConverter.hpp"
 | 
|---|
| 52 | #include "Fragmentation/Summation/Containers/createMatrixNrLookup.hpp"
 | 
|---|
| 53 | #include "Fragmentation/Summation/Containers/extractJobIds.hpp"
 | 
|---|
| 54 | #include "Fragmentation/Summation/AllLevelOrthogonalSummator.hpp"
 | 
|---|
| 55 | #include "Fragmentation/Summation/IndexSetContainer.hpp"
 | 
|---|
| 56 | #include "Fragmentation/Summation/OrthogonalSumUpPerLevel.hpp"
 | 
|---|
| 57 | #include "Fragmentation/Summation/SubsetMap.hpp"
 | 
|---|
| 58 | #include "Fragmentation/Summation/SumUpPerLevel.hpp"
 | 
|---|
| 59 | 
 | 
|---|
| 60 | #include "Helpers/defs.hpp"
 | 
|---|
| 61 | 
 | 
|---|
| 62 | FragmentationShortRangeResults::FragmentationShortRangeResults(
 | 
|---|
| 63 |     const std::map<JobId_t,MPQCData> &fragmentData,
 | 
|---|
| 64 |     const KeySetsContainer& _KeySet,
 | 
|---|
| 65 |     const KeySetsContainer& _ForceKeySet,
 | 
|---|
| 66 |     const edges_per_fragment_t &_edges_per_fragment,
 | 
|---|
| 67 |     std::vector<bool> &_ValueMask) :
 | 
|---|
| 68 |     KeySet(_KeySet),
 | 
|---|
| 69 |     ForceKeySet(_ForceKeySet),
 | 
|---|
| 70 |     edges_per_fragment(_edges_per_fragment)
 | 
|---|
| 71 | {
 | 
|---|
| 72 |   initLookups(fragmentData,_ValueMask);
 | 
|---|
| 73 | 
 | 
|---|
| 74 |   // convert KeySetContainer to IndexSetContainer
 | 
|---|
| 75 |   container.reset(new IndexSetContainer(KeySet));
 | 
|---|
| 76 |   // create the map of all keysets
 | 
|---|
| 77 |   subsetmap.reset(new SubsetMap(*container));
 | 
|---|
| 78 | }
 | 
|---|
| 79 | 
 | 
|---|
| 80 | void FragmentationShortRangeResults::initLookups(
 | 
|---|
| 81 |     const std::map<JobId_t,MPQCData> &fragmentData,
 | 
|---|
| 82 |     std::vector<bool> &_ValueMask)
 | 
|---|
| 83 | {
 | 
|---|
| 84 |   // create lookup from job nr to fragment number
 | 
|---|
| 85 |   size_t MPQCFragmentCounter = 0;
 | 
|---|
| 86 |   const std::vector<JobId_t> mpqcjobids = extractJobIds<MPQCData>(fragmentData);
 | 
|---|
| 87 |   MPQCMatrixNrLookup =
 | 
|---|
| 88 |       createMatrixNrLookup(mpqcjobids, MPQCFragmentCounter, _ValueMask);
 | 
|---|
| 89 | }
 | 
|---|
| 90 | 
 | 
|---|
| 91 | void FragmentationShortRangeResults::operator()(
 | 
|---|
| 92 |     const std::map<JobId_t,MPQCData> &fragmentData)
 | 
|---|
| 93 | {
 | 
|---|
| 94 |   MaxLevel = subsetmap->getMaximumSetLevel();
 | 
|---|
| 95 |   LOG(1, "INFO: Summing up results till level " << MaxLevel << ".");
 | 
|---|
| 96 |   /// convert all MPQCData to MPQCDataMap_t
 | 
|---|
| 97 |   {
 | 
|---|
| 98 |     ASSERT( ForceKeySet.KeySets.size() == fragmentData.size(),
 | 
|---|
| 99 |         "FragmentationShortRangeResults::FragmentationShortRangeResults() - ForceKeySet's KeySets and fragmentData differ in size.");
 | 
|---|
| 100 | 
 | 
|---|
| 101 |     OrthogonalSumUpPerLevel<MPQCDataEnergyMap_t, MPQCData, MPQCDataEnergyVector_t> mpqcenergysummation(
 | 
|---|
| 102 |         fragmentData);
 | 
|---|
| 103 |     mpqcenergysummation(MPQCMatrixNrLookup, container, subsetmap,
 | 
|---|
| 104 |         Result_Energy_fused, Result_perIndexSet_Energy);
 | 
|---|
| 105 |     OrthogonalSumUpPerLevel<MPQCDataFragmentMap_t, MPQCData, MPQCDataFragmentVector_t> mpqcfragmentsummation(
 | 
|---|
| 106 |         fragmentData);
 | 
|---|
| 107 |     mpqcfragmentsummation(MPQCMatrixNrLookup, container, subsetmap,
 | 
|---|
| 108 |         Result_Fragment_fused, Result_perIndexSet_Fragment);
 | 
|---|
| 109 |     SumUpPerLevel<MPQCDataTimeMap_t, MPQCData, MPQCDataTimeVector_t> mpqctimesummation(
 | 
|---|
| 110 |         fragmentData);
 | 
|---|
| 111 |     mpqctimesummation(MPQCMatrixNrLookup, container, subsetmap,
 | 
|---|
| 112 |         Result_Time_fused, Result_perIndexSet_Time);
 | 
|---|
| 113 | 
 | 
|---|
| 114 |     // initialize zero instance map
 | 
|---|
| 115 |     MPQCDataForceMap_t ZeroInstances;
 | 
|---|
| 116 |     ZeroInstanceInitializer<MPQCDataForceMap_t> initZeroInstance(ZeroInstances);
 | 
|---|
| 117 |     boost::mpl::for_each<MPQCDataForceVector_t>(boost::ref(initZeroInstance));
 | 
|---|
| 118 | 
 | 
|---|
| 119 |     // force has extra data converter
 | 
|---|
| 120 |     std::map<JobId_t, MPQCDataForceMap_t> MPQCData_Force_fused;
 | 
|---|
| 121 |     convertDatatoForceMap<MPQCData, MPQCDataForceMap_t, MPQCDataFused>(fragmentData, ForceKeySet, MPQCData_Force_fused);
 | 
|---|
| 122 |     Result_Force_fused.resize(MaxLevel); // we need the results of correct size already
 | 
|---|
| 123 |     AllLevelOrthogonalSummator<MPQCDataForceMap_t> forceSummer(
 | 
|---|
| 124 |                 subsetmap,
 | 
|---|
| 125 |                 MPQCData_Force_fused,
 | 
|---|
| 126 |                 container->getContainer(),
 | 
|---|
| 127 |                 MPQCMatrixNrLookup,
 | 
|---|
| 128 |                 Result_Force_fused,
 | 
|---|
| 129 |                 Result_perIndexSet_Force,
 | 
|---|
| 130 |                 ZeroInstances);
 | 
|---|
| 131 |     boost::mpl::for_each<MPQCDataForceVector_t>(boost::ref(forceSummer));
 | 
|---|
| 132 |   }
 | 
|---|
| 133 | }
 | 
|---|
| 134 | 
 | 
|---|
| 135 | const FragmentationShortRangeResults::summedshortrange_t
 | 
|---|
| 136 | FragmentationShortRangeResults::getSummedShortRangeResults() const
 | 
|---|
| 137 | {
 | 
|---|
| 138 |   summedshortrange_t results;
 | 
|---|
| 139 |   typedef std::map<
 | 
|---|
| 140 |       IndexSet::ptr, 
 | 
|---|
| 141 |       std::pair<MPQCDataEnergyMap_t,MPQCDataEnergyMap_t> 
 | 
|---|
| 142 |       >::const_iterator maptype_citer_t;
 | 
|---|
| 143 |   for (maptype_citer_t resultiter = Result_perIndexSet_Energy.begin();
 | 
|---|
| 144 |       resultiter != Result_perIndexSet_Energy.end(); ++resultiter) {
 | 
|---|
| 145 |     MPQCData values;
 | 
|---|
| 146 |     values.energies.total = boost::fusion::at_key<MPQCDataFused::energy_total>(resultiter->second.first);
 | 
|---|
| 147 |     MPQCData contributions;
 | 
|---|
| 148 |     contributions.energies.total = boost::fusion::at_key<MPQCDataFused::energy_total>(resultiter->second.second);
 | 
|---|
| 149 |     results.insert( std::make_pair( resultiter->first, std::make_pair(values, contributions) ) );
 | 
|---|
| 150 |   }
 | 
|---|
| 151 |   return results;
 | 
|---|
| 152 | }
 | 
|---|