/* * Sp3MM_for_AlgebraicMultiGrid * (C) Copyright 2021-2022 * Andrea Di Iorio * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions, and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. The name of the Sp3MM_for_AlgebraicMultiGrid or the names of its contributors may * not be used to endorse or promote products derived from this * software without specific written permission. * * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE Sp3MM_for_AlgebraicMultiGrid GROUP OR ITS CONTRIBUTORS * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE * POSSIBILITY OF SUCH DAMAGE. */ #include "macros.h" #include "config.h" #include "sparseMatrix.h" #include "linuxK_rbtree_minimalized.h" #include "Sp3MM_CSR_OMP_SymbStep_Multi.h" #include "sparseUtilsMulti.h" #include "utils.h" #include //inline exports //ushort matchingUnifRangeIdx(idx_t idx, idx_t size, ushort rangesN); idx_t* CAT(spMMSizeUpperbound_,0)(spmat* ,spmat* ); idx_t* CAT(spMMSizeUpperbound_,1)(spmat* ,spmat* ); idx_t* CAT(spMMSizeUpperboundColParts_,0)(spmat* ,spmat* ,ushort); idx_t* CAT(spMMSizeUpperboundColParts_,1)(spmat* ,spmat* ,ushort); /* Multi implementation of symbolic product of sparse matrixes, config macros * OFF_F: C-Fortran spmat indexing * OUT_IDXS: indexes output * COL_PARTS: partitioning columns output... */ #define OUT_IDXS_ON OutIdxs_ #define COL_PARTS_ON ColParts_ #undef OUT_IDXS #undef COL_PARTS #define OFF_F 0 ///generate basic versions #include "Sp3MM_CSR_OMP_SymbStep_Generic.c" ///generate outIdxs versions #define OUT_IDXS OUT_IDXS_ON #include "Sp3MM_CSR_OMP_SymbStep_Generic.c" #undef OUT_IDXS ///generate colParts versions #define COL_PARTS COL_PARTS_ON #include "Sp3MM_CSR_OMP_SymbStep_Generic.c" //generate outIdxs AND colParts versions #define OUT_IDXS OUT_IDXS_ON #include "Sp3MM_CSR_OMP_SymbStep_Generic.c" #undef OUT_IDXS #undef COL_PARTS #undef OFF_F #define OFF_F 1 ///generate basic versions #include "Sp3MM_CSR_OMP_SymbStep_Generic.c" ///generate outIdxs versions #define OUT_IDXS OUT_IDXS_ON #include "Sp3MM_CSR_OMP_SymbStep_Generic.c" #undef OUT_IDXS ///generate colParts versions #define COL_PARTS COL_PARTS_ON #include "Sp3MM_CSR_OMP_SymbStep_Generic.c" //generate outIdxs AND colParts versions #define OUT_IDXS OUT_IDXS_ON #include "Sp3MM_CSR_OMP_SymbStep_Generic.c" #undef OUT_IDXS #undef COL_PARTS #undef OFF_F