src/gromacs/pulling/tests/pull.cpp

   1 /*
   2  * This file is part of the GROMACS molecular simulation package.
   3  *
   4  * Copyright (c) 2016,2018,2019,2020,2021, 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
  37  * Implements test of some pulling routines
  38  *
  39  * \author David van der Spoel <david.vanderspoel@icm.uu.se>
  40  * \ingroup module_pulling
  41  */
  42 #include "gmxpre.h"
  43
  44 #include "gromacs/pulling/pull.h"
  45
  46 #include <cmath>
  47
  48 #include <algorithm>
  49
  50 #include <gtest/gtest.h>
  51
  52 #include "gromacs/math/vec.h"
  53 #include "gromacs/pbcutil/pbc.h"
  54 #include "gromacs/pulling/pull_internal.h"
  55 #include "gromacs/utility/smalloc.h"
  56
  57 #include "testutils/refdata.h"
  58 #include "testutils/testasserts.h"
  59 #include "testutils/testfilemanager.h"
  60
  61 namespace gmx
  62 {
  63 namespace
  64 {
  65
  66 using gmx::test::defaultRealTolerance;
  67
  68 class PullTest : public ::testing::Test
  69 {
  70 protected:
  71     PullTest() {}
  72
  73     static void test(PbcType pbcType, matrix box)
  74     {
  75         t_pbc pbc;
  76
  77         // PBC stuff
  78         set_pbc(&pbc, pbcType, box);
  79
  80         GMX_ASSERT(pbc.ndim_ePBC >= 1 && pbc.ndim_ePBC <= DIM,
  81                    "Tests only support PBC along at least x and at most x, y, and z");
  82
  83         real boxSizeZSquared;
  84         if (pbc.ndim_ePBC > ZZ)
  85         {
  86             boxSizeZSquared = gmx::square(box[ZZ][ZZ]);
  87         }
  88         else
  89         {
  90             boxSizeZSquared = GMX_REAL_MAX;
  91         }
  92
  93         {
  94             // Distance pulling in all 3 dimensions
  95             t_pull_coord params;
  96             params.eGeom      = PullGroupGeometry::Distance;
  97             params.dim[XX]    = 1;
  98             params.dim[YY]    = 1;
  99             params.dim[ZZ]    = 1;
 100             params.coordIndex = 0;
 101             pull_coord_work_t pcrd(params);
 102             clear_dvec(pcrd.spatialData.vec);
 103
 104             real minBoxSize2 = GMX_REAL_MAX;
 105             for (int d = 0; d < pbc.ndim_ePBC; d++)
 106             {
 107                 minBoxSize2 = std::min(minBoxSize2, norm2(box[d]));
 108             }
 109             EXPECT_REAL_EQ_TOL(
 110                     0.25 * minBoxSize2, max_pull_distance2(&pcrd, &pbc), defaultRealTolerance());
 111         }
 112
 113         {
 114             // Distance pulling along Z
 115             t_pull_coord params;
 116             params.eGeom      = PullGroupGeometry::Distance;
 117             params.dim[XX]    = 0;
 118             params.dim[YY]    = 0;
 119             params.dim[ZZ]    = 1;
 120             params.coordIndex = 0;
 121             pull_coord_work_t pcrd(params);
 122             clear_dvec(pcrd.spatialData.vec);
 123             EXPECT_REAL_EQ_TOL(
 124                     0.25 * boxSizeZSquared, max_pull_distance2(&pcrd, &pbc), defaultRealTolerance());
 125         }
 126
 127         {
 128             // Directional pulling along Z
 129             t_pull_coord params;
 130             params.eGeom      = PullGroupGeometry::Direction;
 131             params.dim[XX]    = 1;
 132             params.dim[YY]    = 1;
 133             params.dim[ZZ]    = 1;
 134             params.coordIndex = 0;
 135             pull_coord_work_t pcrd(params);
 136             clear_dvec(pcrd.spatialData.vec);
 137             pcrd.spatialData.vec[ZZ] = 1;
 138             EXPECT_REAL_EQ_TOL(
 139                     0.25 * boxSizeZSquared, max_pull_distance2(&pcrd, &pbc), defaultRealTolerance());
 140         }
 141
 142         {
 143             // Directional pulling along X
 144             t_pull_coord params;
 145             params.eGeom      = PullGroupGeometry::Direction;
 146             params.dim[XX]    = 1;
 147             params.dim[YY]    = 1;
 148             params.dim[ZZ]    = 1;
 149             params.coordIndex = 0;
 150             pull_coord_work_t pcrd(params);
 151             clear_dvec(pcrd.spatialData.vec);
 152             pcrd.spatialData.vec[XX] = 1;
 153
 154             real minDist2 = square(box[XX][XX]);
 155             for (int d = XX + 1; d < DIM; d++)
 156             {
 157                 minDist2 -= square(box[d][XX]);
 158             }
 159             EXPECT_REAL_EQ_TOL(0.25 * minDist2, max_pull_distance2(&pcrd, &pbc), defaultRealTolerance());
 160         }
 161     }
 162 };
 163
 164 TEST_F(PullTest, MaxPullDistanceXyzScrewBox)
 165 {
 166     matrix box = { { 10, 0, 0 }, { 0, 10, 0 }, { 0, 0, 10 } };
 167
 168     test(PbcType::Screw, box);
 169 }
 170
 171 TEST_F(PullTest, MaxPullDistanceXyzCubicBox)
 172 {
 173     matrix box = { { 10, 0, 0 }, { 0, 10, 0 }, { 0, 0, 10 } };
 174
 175     test(PbcType::Xyz, box);
 176 }
 177
 178 TEST_F(PullTest, MaxPullDistanceXyzTricBox)
 179 {
 180     matrix box = { { 10, 0, 0 }, { 3, 10, 0 }, { 3, 4, 10 } };
 181
 182     test(PbcType::Xyz, box);
 183 }
 184
 185 TEST_F(PullTest, MaxPullDistanceXyzLongBox)
 186 {
 187     matrix box = { { 10, 0, 0 }, { 0, 10, 0 }, { 0, 0, 30 } };
 188
 189     test(PbcType::Xyz, box);
 190 }
 191
 192 TEST_F(PullTest, MaxPullDistanceXySkewedBox)
 193 {
 194     matrix box = { { 10, 0, 0 }, { 5, 8, 0 }, { 0, 0, 0 } };
 195
 196     test(PbcType::XY, box);
 197 }
 198
 199 } // namespace
 200
 201 } // namespace gmx