src/gromacs/ewald/pme_spline_work.cpp

   1 /*
   2  * This file is part of the GROMACS molecular simulation package.
   3  *
   4  * Copyright (c) 1991-2000, University of Groningen, The Netherlands.
   5  * Copyright (c) 2001-2004, The GROMACS development team.
   6  * Copyright (c) 2013,2014,2015,2017,2018 by the GROMACS development team.
   7  * Copyright (c) 2019,2020, by the GROMACS development team, led by
   8  * Mark Abraham, David van der Spoel, Berk Hess, and Erik Lindahl,
   9  * and including many others, as listed in the AUTHORS file in the
  10  * top-level source directory and at http://www.gromacs.org.
  11  *
  12  * GROMACS is free software; you can redistribute it and/or
  13  * modify it under the terms of the GNU Lesser General Public License
  14  * as published by the Free Software Foundation; either version 2.1
  15  * of the License, or (at your option) any later version.
  16  *
  17  * GROMACS is distributed in the hope that it will be useful,
  18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  20  * Lesser General Public License for more details.
  21  *
  22  * You should have received a copy of the GNU Lesser General Public
  23  * License along with GROMACS; if not, see
  24  * http://www.gnu.org/licenses, or write to the Free Software Foundation,
  25  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA.
  26  *
  27  * If you want to redistribute modifications to GROMACS, please
  28  * consider that scientific software is very special. Version
  29  * control is crucial - bugs must be traceable. We will be happy to
  30  * consider code for inclusion in the official distribution, but
  31  * derived work must not be called official GROMACS. Details are found
  32  * in the README & COPYING files - if they are missing, get the
  33  * official version at http://www.gromacs.org.
  34  *
  35  * To help us fund GROMACS development, we humbly ask that you cite
  36  * the research papers on the package. Check out http://www.gromacs.org.
  37  */
  38
  39 #include "gmxpre.h"
  40
  41 #include "pme_spline_work.h"
  42
  43 #include "gromacs/simd/simd.h"
  44 #include "gromacs/utility/alignedallocator.h"
  45 #include "gromacs/utility/basedefinitions.h"
  46 #include "gromacs/utility/real.h"
  47 #include "gromacs/utility/smalloc.h"
  48
  49 #include "pme_simd.h"
  50
  51 using namespace gmx; // TODO: Remove when this file is moved into gmx namespace
  52
  53 pme_spline_work* make_pme_spline_work(int gmx_unused order)
  54 {
  55     pme_spline_work* work;
  56
  57 #ifdef PME_SIMD4_SPREAD_GATHER
  58     alignas(GMX_SIMD_ALIGNMENT) real tmp[GMX_SIMD4_WIDTH * 2];
  59     Simd4Real                        zero_S;
  60     Simd4Real                        real_mask_S0, real_mask_S1;
  61     int                              of, i;
  62
  63     work = new (gmx::AlignedAllocationPolicy::malloc(sizeof(pme_spline_work))) pme_spline_work;
  64
  65     zero_S = setZero();
  66
  67     /* Generate bit masks to mask out the unused grid entries,
  68      * as we only operate on order of the 8 grid entries that are
  69      * load into 2 SIMD registers.
  70      */
  71     for (of = 0; of < 2 * GMX_SIMD4_WIDTH - (order - 1); of++)
  72     {
  73         for (i = 0; i < 2 * GMX_SIMD4_WIDTH; i++)
  74         {
  75             tmp[i] = (i >= of && i < of + order ? -1.0 : 1.0);
  76         }
  77         real_mask_S0      = load4(tmp);
  78         real_mask_S1      = load4(tmp + GMX_SIMD4_WIDTH);
  79         work->mask_S0[of] = (real_mask_S0 < zero_S);
  80         work->mask_S1[of] = (real_mask_S1 < zero_S);
  81     }
  82 #else
  83     work = nullptr;
  84 #endif
  85
  86     return work;
  87 }
  88
  89 void destroy_pme_spline_work(pme_spline_work* work)
  90 {
  91     if (work != nullptr)
  92     {
  93         gmx::AlignedAllocationPolicy::free(work);
  94     }
  95 }