potentialfunction.cc 2.81 KB
Newer Older
Christoph Junghans's avatar
Christoph Junghans committed
1
/* 
Christoph Junghans's avatar
Christoph Junghans committed
2
 * Copyright 2009-2018 The VOTCA Development Team (http://www.votca.org)
Christoph Junghans's avatar
Christoph Junghans committed
3 4 5 6 7 8 9 10 11 12 13 14 15 16
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 *
 */
17 18

#include <votca/csg/potentialfunctions/potentialfunction.h>
19 20 21 22 23 24
#include <votca/tools/table.h>

#include <boost/lexical_cast.hpp>

using namespace std;
using namespace votca::tools;
25 26 27 28 29

PotentialFunction::PotentialFunction(const string& name_,const int nlam_,
                                     const double min_,const double max_){

  _name = name_;
Jens Wehner's avatar
Jens Wehner committed
30
  _lam=Eigen::VectorXd::Zero(nlam_);
31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48
  _min = min_;
  _cut_off = max_;

}


void PotentialFunction::setParam(string filename) {

  Table param;
  param.Load(filename);

  if( param.size() != _lam.size()) {

    throw std::runtime_error("In potential " + _name +": parameters size mismatch!\n"
                             "Check input parameter file \""
                             + filename + "\" \nThere should be "
                             + boost::lexical_cast<string>( _lam.size() ) + " parameters");
  } else {
Christoph Junghans's avatar
Christoph Junghans committed
49
    for( unsigned int i = 0; i < _lam.size(); i++)
50 51 52 53 54 55 56 57 58
      _lam(i) = param.y(i);
  }

}

void PotentialFunction::SaveParam(const string& filename){

  Table param;
  param.SetHasYErr(false);
Jens Wehner's avatar
Jens Wehner committed
59
  param.resize(_lam.size());
60

Christoph Junghans's avatar
Christoph Junghans committed
61
  for (unsigned int i = 0; i < _lam.size(); i++)
62 63 64 65 66 67 68
    param.set(i, i, _lam(i), 'i');

  param.Save(filename);

}

void PotentialFunction::SavePotTab(const string& filename,
69 70
                                   const double step)
{
71 72 73
  int ngrid = (int) ((_cut_off - _min) / step + 1.00000001);
  Table pot_tab;
  pot_tab.SetHasYErr(false);
Jens Wehner's avatar
Jens Wehner committed
74
  pot_tab.resize(ngrid);
75 76 77 78 79 80 81 82 83 84 85 86
  double r_init;
  int i;

  for (r_init = _min, i = 0; i < ngrid - 1; r_init += step)
    pot_tab.set(i++, r_init, CalculateF(r_init), 'i');

  pot_tab.set(i, _cut_off, CalculateF(_cut_off), 'i');
  pot_tab.Save(filename);
}

void PotentialFunction::SavePotTab(const string& filename,
                                   const double step,
87 88
                                   const double rmin, const double rcut)
{
89 90 91
  int ngrid = (int) ((rcut - rmin) / step + 1.00000001);
  Table pot_tab;
  pot_tab.SetHasYErr(false);
Jens Wehner's avatar
Jens Wehner committed
92
  pot_tab.resize(ngrid);
93 94
  double r_init;
  int i;
95
  char flag = 'i';
96

97
  for (r_init = rmin, i = 0; i < ngrid - 1; r_init += step)
98 99 100 101 102
    pot_tab.set(i++, r_init, CalculateF(r_init), flag);

  pot_tab.set(i, rcut, CalculateF(rcut), flag);
  pot_tab.Save(filename);
}