Tpetra Matrix/Vector Services: Tpetra_BlockMultiVector.cpp Source File

00001 /*
00002 // @HEADER
00003 // ***********************************************************************
00004 // 
00005 //          Tpetra: Templated Linear Algebra Services Package
00006 //                 Copyright (2008) Sandia Corporation
00007 // 
00008 // Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation,
00009 // the U.S. Government retains certain rights in this software.
00010 // 
00011 // Redistribution and use in source and binary forms, with or without
00012 // modification, are permitted provided that the following conditions are
00013 // met:
00014 //
00015 // 1. Redistributions of source code must retain the above copyright
00016 // notice, this list of conditions and the following disclaimer.
00017 //
00018 // 2. Redistributions in binary form must reproduce the above copyright
00019 // notice, this list of conditions and the following disclaimer in the
00020 // documentation and/or other materials provided with the distribution.
00021 //
00022 // 3. Neither the name of the Corporation nor the names of the
00023 // contributors may be used to endorse or promote products derived from
00024 // this software without specific prior written permission.
00025 //
00026 // THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
00027 // EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
00028 // IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
00029 // PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
00030 // CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
00031 // EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
00032 // PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
00033 // PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
00034 // LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
00035 // NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
00036 // SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
00037 //
00038 // Questions? Contact Michael A. Heroux (maherou@sandia.gov) 
00039 // 
00040 // ************************************************************************
00041 // @HEADER
00042 */
00043 
00044 #include "Tpetra_BlockMultiVector.hpp"
00045 
00046 #ifdef HAVE_TPETRA_EXPLICIT_INSTANTIATION
00047 
00048 #include "Tpetra_BlockMultiVector_def.hpp"
00049 
00050 #include <Kokkos_SerialNode.hpp>
00051 #if defined(HAVE_KOKKOSCLASSIC_TBB)
00052 #  include <Kokkos_TBBNode.hpp>
00053 #endif
00054 #if defined(HAVE_KOKKOSCLASSIC_THREADPOOL)
00055 #  include <Kokkos_TPINode.hpp>
00056 #endif
00057 #if defined(HAVE_KOKKOSCLASSIC_THRUST)
00058 #  include <Kokkos_ThrustGPUNode.hpp>
00059 #endif
00060 #if defined(HAVE_KOKKOSCLASSIC_OPENMP)
00061 #  include <Kokkos_OpenMPNode.hpp>
00062 #endif
00063 
00064 namespace Tpetra {
00065 
00066 #if defined(HAVE_TPETRA_INST_FLOAT)
00067   TPETRA_BLOCKMULTIVECTOR_INSTANT(float,int,int,Kokkos::SerialNode)
00068 #if defined(HAVE_KOKKOSCLASSIC_TBB)
00069   TPETRA_BLOCKMULTIVECTOR_INSTANT(float,int,int,Kokkos::TBBNode)
00070 #endif
00071 #if defined(HAVE_KOKKOSCLASSIC_THREADPOOL)
00072     TPETRA_BLOCKMULTIVECTOR_INSTANT(float,int,int,Kokkos::TPINode)
00073 #endif
00074 #if defined(HAVE_KOKKOSCLASSIC_OPENMP)
00075     TPETRA_BLOCKMULTIVECTOR_INSTANT(float,int,int,Kokkos::OpenMPNode)
00076 #endif
00077 #if defined(HAVE_KOKKOSCLASSIC_THRUST) && defined(HAVE_KOKKOSCLASSIC_CUDA_FLOAT)
00078     TPETRA_BLOCKMULTIVECTOR_INSTANT(float,int,int,Kokkos::ThrustGPUNode)
00079 #endif
00080 #endif
00081 #if defined(HAVE_TPETRA_INST_DOUBLE)
00082   TPETRA_BLOCKMULTIVECTOR_INSTANT(double,int,int,Kokkos::SerialNode)
00083 #if defined(HAVE_KOKKOSCLASSIC_TBB)
00084   TPETRA_BLOCKMULTIVECTOR_INSTANT(double,int,int,Kokkos::TBBNode)
00085 #endif
00086 #if defined(HAVE_KOKKOSCLASSIC_THREADPOOL)
00087     TPETRA_BLOCKMULTIVECTOR_INSTANT(double,int,int,Kokkos::TPINode)
00088 #endif
00089 #if defined(HAVE_KOKKOSCLASSIC_OPENMP)
00090     TPETRA_BLOCKMULTIVECTOR_INSTANT(double,int,int,Kokkos::OpenMPNode)
00091 #endif
00092 #if defined(HAVE_KOKKOSCLASSIC_THRUST) && defined(HAVE_KOKKOSCLASSIC_CUDA_DOUBLE)
00093     TPETRA_BLOCKMULTIVECTOR_INSTANT(double,int,int,Kokkos::ThrustGPUNode)
00094 #endif
00095 #endif
00096 #if defined(HAVE_TPETRA_INST_COMPLEX_FLOAT)
00097   TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<float>,int,int,Kokkos::SerialNode)
00098 #if defined(HAVE_KOKKOSCLASSIC_TBB)
00099   TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<float>,int,int,Kokkos::TBBNode)
00100 #endif
00101 #if defined(HAVE_KOKKOSCLASSIC_THREADPOOL)
00102     TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<float>,int,int,Kokkos::TPINode)
00103 #endif
00104 #if defined(HAVE_KOKKOSCLASSIC_OPENMP)
00105     TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<float>,int,int,Kokkos::OpenMPNode)
00106 #endif
00107 // no complex on GPU support for now
00108 //#if defined(HAVE_KOKKOSCLASSIC_THRUST) && defined(HAVE_KOKKOSCLASSIC_CUDA_DOUBLE)
00109 //    TPETRA_BLOCKMULTIVECTOR_INSTANT(double,int,int,Kokkos::ThrustGPUNode)
00110 //#endif
00111 #endif
00112 #if defined(HAVE_TPETRA_INST_COMPLEX_DOUBLE)
00113   TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<double>,int,int,Kokkos::SerialNode)
00114 #if defined(HAVE_KOKKOSCLASSIC_TBB)
00115   TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<double>,int,int,Kokkos::TBBNode)
00116 #endif
00117 #if defined(HAVE_KOKKOSCLASSIC_THREADPOOL)
00118     TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<double>,int,int,Kokkos::TPINode)
00119 #endif
00120 #if defined(HAVE_KOKKOSCLASSIC_OPENMP)
00121     TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<double>,int,int,Kokkos::OpenMPNode)
00122 #endif
00123 // no complex on GPU support for now
00124 //#if defined(HAVE_KOKKOSCLASSIC_THRUST) && defined(HAVE_KOKKOSCLASSIC_CUDA_DOUBLE)
00125 //    TPETRA_BLOCKMULTIVECTOR_INSTANT(double,int,int,Kokkos::ThrustGPUNode)
00126 //#endif
00127 #endif
00128 
00129 
00130 #ifdef HAVE_TPETRA_INST_INT_LONG
00131 #if defined(HAVE_TPETRA_INST_FLOAT)
00132   TPETRA_BLOCKMULTIVECTOR_INSTANT(float,int,long,Kokkos::SerialNode)
00133 #if defined(HAVE_KOKKOSCLASSIC_TBB)
00134   TPETRA_BLOCKMULTIVECTOR_INSTANT(float,int,long,Kokkos::TBBNode)
00135 #endif
00136 #if defined(HAVE_KOKKOSCLASSIC_THREADPOOL)
00137     TPETRA_BLOCKMULTIVECTOR_INSTANT(float,int,long,Kokkos::TPINode)
00138 #endif
00139 #if defined(HAVE_KOKKOSCLASSIC_OPENMP)
00140     TPETRA_BLOCKMULTIVECTOR_INSTANT(float,int,long,Kokkos::OpenMPNode)
00141 #endif
00142 #if defined(HAVE_KOKKOSCLASSIC_THRUST) && defined(HAVE_KOKKOSCLASSIC_CUDA_FLOAT)
00143     TPETRA_BLOCKMULTIVECTOR_INSTANT(float,int,long,Kokkos::ThrustGPUNode)
00144 #endif
00145 #endif
00146 #if defined(HAVE_TPETRA_INST_DOUBLE)
00147   TPETRA_BLOCKMULTIVECTOR_INSTANT(double,int,long,Kokkos::SerialNode)
00148 #if defined(HAVE_KOKKOSCLASSIC_TBB)
00149   TPETRA_BLOCKMULTIVECTOR_INSTANT(double,int,long,Kokkos::TBBNode)
00150 #endif
00151 #if defined(HAVE_KOKKOSCLASSIC_THREADPOOL)
00152     TPETRA_BLOCKMULTIVECTOR_INSTANT(double,int,long,Kokkos::TPINode)
00153 #endif
00154 #if defined(HAVE_KOKKOSCLASSIC_OPENMP)
00155     TPETRA_BLOCKMULTIVECTOR_INSTANT(double,int,long,Kokkos::OpenMPNode)
00156 #endif
00157 #if defined(HAVE_KOKKOSCLASSIC_THRUST) && defined(HAVE_KOKKOSCLASSIC_CUDA_DOUBLE)
00158     TPETRA_BLOCKMULTIVECTOR_INSTANT(double,int,long,Kokkos::ThrustGPUNode)
00159 #endif
00160 #endif
00161 #if defined(HAVE_TPETRA_INST_COMPLEX_FLOAT)
00162   TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<float>,int,long,Kokkos::SerialNode)
00163 #if defined(HAVE_KOKKOSCLASSIC_TBB)
00164   TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<float>,int,long,Kokkos::TBBNode)
00165 #endif
00166 #if defined(HAVE_KOKKOSCLASSIC_THREADPOOL)
00167     TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<float>,int,long,Kokkos::TPINode)
00168 #endif
00169 #if defined(HAVE_KOKKOSCLASSIC_OPENMP)
00170     TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<float>,int,long,Kokkos::OpenMPNode)
00171 #endif
00172 // no complex on GPU support for now
00173 //#if defined(HAVE_KOKKOSCLASSIC_THRUST) && defined(HAVE_KOKKOSCLASSIC_CUDA_DOUBLE)
00174 //    TPETRA_BLOCKMULTIVECTOR_INSTANT(double,int,long,Kokkos::ThrustGPUNode)
00175 //#endif
00176 #endif
00177 #if defined(HAVE_TPETRA_INST_COMPLEX_DOUBLE)
00178   TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<double>,int,long,Kokkos::SerialNode)
00179 #if defined(HAVE_KOKKOSCLASSIC_TBB)
00180   TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<double>,int,long,Kokkos::TBBNode)
00181 #endif
00182 #if defined(HAVE_KOKKOSCLASSIC_THREADPOOL)
00183     TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<double>,int,long,Kokkos::TPINode)
00184 #endif
00185 #if defined(HAVE_KOKKOSCLASSIC_OPENMP)
00186     TPETRA_BLOCKMULTIVECTOR_INSTANT(std::complex<double>,int,long,Kokkos::OpenMPNode)
00187 #endif
00188 // no complex on GPU support for now
00189 //#if defined(HAVE_KOKKOSCLASSIC_THRUST) && defined(HAVE_KOKKOSCLASSIC_CUDA_DOUBLE)
00190 //    TPETRA_BLOCKMULTIVECTOR_INSTANT(double,int,long,Kokkos::ThrustGPUNode)
00191 //#endif
00192 #endif // COMPLEX_DOUBLE
00193 #endif // HAVE_TPETRA_INST_INT_LONG
00194 
00195 
00196 } // namespace Tpetra
00197 
00198 #endif // HAVE_TPETRA_EXPLICIT_INSTANTIATION