1 /* 2 * Copyright (c) 2012, Michael Lehn, Klaus Pototzky 3 * 4 * All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 10 * 1) Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2) Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in 14 * the documentation and/or other materials provided with the 15 * distribution. 16 * 3) Neither the name of the FLENS development group nor the names of 17 * its contributors may be used to endorse or promote products derived 18 * from this software without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 21 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 22 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR 23 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 24 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 25 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT 26 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 30 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 31 */ 32 33 #ifndef CXXLAPACK_INTERFACE_SYRFS_H 34 #define CXXLAPACK_INTERFACE_SYRFS_H 1 35 36 #include <complex> 37 38 namespace cxxlapack { 39 40 template <typename IndexType> 41 IndexType 42 syrfs(char uplo, 43 IndexType n, 44 IndexType nRhs, 45 const float *A, 46 IndexType ldA, 47 const float *Af, 48 IndexType ldAf, 49 const IndexType *iPiv, 50 const float *B, 51 IndexType ldB, 52 float *X, 53 IndexType ldX, 54 float *ferr, 55 float *berr, 56 float *work, 57 IndexType *iWork); 58 59 template <typename IndexType> 60 IndexType 61 syrfs(char uplo, 62 IndexType n, 63 IndexType nRhs, 64 const double *A, 65 IndexType ldA, 66 const double *Af, 67 IndexType ldAf, 68 const IndexType *iPiv, 69 const double *B, 70 IndexType ldB, 71 double *X, 72 IndexType ldX, 73 double *ferr, 74 double *berr, 75 double *work, 76 IndexType *iWork); 77 78 template <typename IndexType> 79 IndexType 80 syrfs(char uplo, 81 IndexType n, 82 IndexType nRhs, 83 const std::complex<float > *A, 84 IndexType ldA, 85 const std::complex<float > *Af, 86 IndexType ldAf, 87 const IndexType *iPiv, 88 const std::complex<float > *B, 89 IndexType ldB, 90 std::complex<float > *X, 91 IndexType ldX, 92 float *ferr, 93 float *berr, 94 std::complex<float > *work, 95 float *rWork); 96 97 template <typename IndexType> 98 IndexType 99 syrfs(char uplo, 100 IndexType n, 101 IndexType nRhs, 102 const std::complex<double> *A, 103 IndexType ldA, 104 const std::complex<double> *Af, 105 IndexType ldAf, 106 const IndexType *iPiv, 107 const std::complex<double> *B, 108 IndexType ldB, 109 std::complex<double> *X, 110 IndexType ldX, 111 double *ferr, 112 double *berr, 113 std::complex<double> *work, 114 double *rWork); 115 116 } // namespace cxxlapack 117 118 #endif // CXXLAPACK_INTERFACE_SYRFS_H 119