src/gromacs/mdlib/tests/constrtestdata.cpp

   1 /*
   2  * This file is part of the GROMACS molecular simulation package.
   3  *
   4  * Copyright (c) 2018,2019,2020, by the GROMACS development team, led by
   5  * Mark Abraham, David van der Spoel, Berk Hess, and Erik Lindahl,
   6  * and including many others, as listed in the AUTHORS file in the
   7  * top-level source directory and at http://www.gromacs.org.
   8  *
   9  * GROMACS is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU Lesser General Public License
  11  * as published by the Free Software Foundation; either version 2.1
  12  * of the License, or (at your option) any later version.
  13  *
  14  * GROMACS is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17  * Lesser General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU Lesser General Public
  20  * License along with GROMACS; if not, see
  21  * http://www.gnu.org/licenses, or write to the Free Software Foundation,
  22  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA.
  23  *
  24  * If you want to redistribute modifications to GROMACS, please
  25  * consider that scientific software is very special. Version
  26  * control is crucial - bugs must be traceable. We will be happy to
  27  * consider code for inclusion in the official distribution, but
  28  * derived work must not be called official GROMACS. Details are found
  29  * in the README & COPYING files - if they are missing, get the
  30  * official version at http://www.gromacs.org.
  31  *
  32  * To help us fund GROMACS development, we humbly ask that you cite
  33  * the research papers on the package. Check out http://www.gromacs.org.
  34  */
  35 /*! \internal \file
  36  * \brief SHAKE and LINCS tests.
  37  *
  38  * \todo Better tests for virial are needed.
  39  * \todo Tests for bigger systems to test threads synchronization,
  40  *       reduction, etc. on the GPU.
  41  * \todo Tests for algorithms for derivatives.
  42  * \todo Free-energy perturbation tests
  43  *
  44  * \author Artem Zhmurov <zhmurov@gmail.com>
  45  * \ingroup module_mdlib
  46  */
  47
  48 #include "gmxpre.h"
  49
  50 #include "constrtestdata.h"
  51
  52 #include "gromacs/utility/smalloc.h"
  53 #include "gromacs/utility/stringutil.h"
  54
  55 namespace gmx
  56 {
  57 namespace test
  58 {
  59
  60 ConstraintsTestData::ConstraintsTestData(const std::string&       title,
  61                                          int                      numAtoms,
  62                                          std::vector<real>        masses,
  63                                          std::vector<int>         constraints,
  64                                          std::vector<real>        constraintsR0,
  65                                          bool                     computeVirial,
  66                                          tensor                   virialScaledRef,
  67                                          bool                     compute_dHdLambda,
  68                                          float                    dHdLambdaRef,
  69                                          real                     initialTime,
  70                                          real                     timestep,
  71                                          const std::vector<RVec>& x,
  72                                          const std::vector<RVec>& xPrime,
  73                                          const std::vector<RVec>& v,
  74                                          real                     shakeTolerance,
  75                                          gmx_bool                 shakeUseSOR,
  76                                          int                      lincsNumIterations,
  77                                          int                      lincsExpansionOrder,
  78                                          real                     lincsWarnAngle)
  79 {
  80     title_    = title;    // Human-friendly name of the system
  81     numAtoms_ = numAtoms; // Number of atoms
  82
  83     // Masses of atoms
  84     masses_ = masses;
  85     invmass_.resize(numAtoms); // Vector of inverse masses
  86
  87     for (int i = 0; i < numAtoms; i++)
  88     {
  89         invmass_[i] = 1.0 / masses.at(i);
  90     }
  91
  92     // Saving constraints to check if they are satisfied after algorithm was applied
  93     constraints_   = constraints;   // Constraints indices (in type-i-j format)
  94     constraintsR0_ = constraintsR0; // Equilibrium distances for each type of constraint
  95
  96     invdt_ = 1.0 / timestep; // Inverse timestep
  97
  98     // Input record - data that usually comes from configuration file (.mdp)
  99     ir_.efep    = 0;
 100     ir_.init_t  = initialTime;
 101     ir_.delta_t = timestep;
 102     ir_.eI      = 0;
 103
 104     // Virial evaluation
 105     computeVirial_ = computeVirial;
 106     if (computeVirial)
 107     {
 108         for (int i = 0; i < DIM; i++)
 109         {
 110             for (int j = 0; j < DIM; j++)
 111             {
 112                 virialScaled_[i][j]    = 0;
 113                 virialScaledRef_[i][j] = virialScaledRef[i][j];
 114             }
 115         }
 116     }
 117
 118     // Free energy evaluation
 119     hasMassPerturbed_  = false;
 120     lambda_            = 0.0;
 121     compute_dHdLambda_ = compute_dHdLambda;
 122     dHdLambda_         = 0;
 123     if (compute_dHdLambda_)
 124     {
 125         ir_.efep      = efepYES;
 126         dHdLambdaRef_ = dHdLambdaRef;
 127     }
 128     else
 129     {
 130         ir_.efep      = efepNO;
 131         dHdLambdaRef_ = 0;
 132     }
 133
 134     int maxType = 0;
 135     for (index i = 0; i < ssize(constraints); i += 3)
 136     {
 137         if (maxType < constraints.at(i))
 138         {
 139             maxType = constraints.at(i);
 140         }
 141     }
 142     auto& iparams = mtop_.ffparams.iparams;
 143     iparams.resize(maxType + 1);
 144     for (index i = 0; i < ssize(constraints) / 3; i++)
 145     {
 146         iparams[constraints.at(3 * i)].constr.dA = constraintsR0.at(constraints.at(3 * i));
 147         iparams[constraints.at(3 * i)].constr.dB = constraintsR0.at(constraints.at(3 * i));
 148     }
 149     idef_ = std::make_unique<InteractionDefinitions>(mtop_.ffparams);
 150     for (index i = 0; i < ssize(constraints); i++)
 151     {
 152         idef_->il[F_CONSTR].iatoms.push_back(constraints.at(i));
 153     }
 154
 155     // Constraints and their parameters (global topology)
 156     InteractionList interactionList;
 157     interactionList.iatoms.resize(constraints.size());
 158     std::copy(constraints.begin(), constraints.end(), interactionList.iatoms.begin());
 159     InteractionList interactionListEmpty;
 160     interactionListEmpty.iatoms.resize(0);
 161
 162     gmx_moltype_t molType;
 163     molType.atoms.nr             = numAtoms;
 164     molType.ilist.at(F_CONSTR)   = interactionList;
 165     molType.ilist.at(F_CONSTRNC) = interactionListEmpty;
 166     mtop_.moltype.push_back(molType);
 167
 168     gmx_molblock_t molBlock;
 169     molBlock.type = 0;
 170     molBlock.nmol = 1;
 171     mtop_.molblock.push_back(molBlock);
 172
 173     mtop_.natoms                      = numAtoms;
 174     mtop_.bIntermolecularInteractions = false;
 175
 176     // Coordinates and velocities
 177     x_.resizeWithPadding(numAtoms);
 178     xPrime_.resizeWithPadding(numAtoms);
 179     xPrime0_.resizeWithPadding(numAtoms);
 180     xPrime2_.resizeWithPadding(numAtoms);
 181
 182     v_.resizeWithPadding(numAtoms);
 183     v0_.resizeWithPadding(numAtoms);
 184
 185     std::copy(x.begin(), x.end(), x_.begin());
 186     std::copy(xPrime.begin(), xPrime.end(), xPrime_.begin());
 187     std::copy(xPrime.begin(), xPrime.end(), xPrime0_.begin());
 188     std::copy(xPrime.begin(), xPrime.end(), xPrime2_.begin());
 189
 190     std::copy(v.begin(), v.end(), v_.begin());
 191     std::copy(v.begin(), v.end(), v0_.begin());
 192
 193     // SHAKE-specific parameters
 194     ir_.shake_tol = shakeTolerance;
 195     ir_.bShakeSOR = shakeUseSOR;
 196
 197     // LINCS-specific parameters
 198     ir_.nLincsIter     = lincsNumIterations;
 199     ir_.nProjOrder     = lincsExpansionOrder;
 200     ir_.LincsWarnAngle = lincsWarnAngle;
 201 }
 202
 203 /*! \brief
 204  * Reset the data structure so it can be reused.
 205  *
 206  * Set the coordinates and velocities back to their values before
 207  * constraining. The scaled virial tensor and dHdLambda are zeroed.
 208  *
 209  */
 210 void ConstraintsTestData::reset()
 211 {
 212     xPrime_  = xPrime0_;
 213     xPrime2_ = xPrime0_;
 214     v_       = v0_;
 215
 216     if (computeVirial_)
 217     {
 218         for (int i = 0; i < DIM; i++)
 219         {
 220             for (int j = 0; j < DIM; j++)
 221             {
 222                 virialScaled_[i][j] = 0;
 223             }
 224         }
 225     }
 226     dHdLambda_ = 0;
 227 }
 228
 229 } // namespace test
 230 } // namespace gmx