00002 /*      LAPACK++ (V. 1.0 Beta)                      */
00003 /*      (C) 1992-1994 All Rights Reserved.              */
00004 /*
00005               LAPACK++ 1.0: Linear Algebra Package 1.0
00006                University of Tennessee, Knoxvilee, TN.
00007             Oak Ridge National Laboratory, Oak Ridge, TN.
00008         Authors: J. J. Dongarra, E. Greaser, R. Pozo, D. Walker
00009                  (C) 1992-1993 All Rights Reserved
00011                              NOTICE
00013  Permission to use, copy, modify, and distribute this software and
00014  its documentation for any purpose and without fee is hereby granted
00015  provided that the above copyright notice appear in all copies and
00016  that both the copyright notice and this permission notice appear in
00017  supporting documentation.
00019  Neither the Institutions (University of Tennessee, and Oak Ridge National
00020  Laboratory) nor the Authors make any representations about the suitability
00021  of this software for any purpose.  This software is provided ``as is''
00022  without express or implied warranty.
00024  LAPACK++ was funded in part by the U.S. Department of Energy, the
00025  National Science Foundation and the State of Tennessee.
00026 */
00028 #include "ifp_arch.h"
00030 extern "C"
00031 {
00032     void F77NAME(dgemm)(char *transa, char *transb, integer *m, integer *n, integer *k,
00033         double *alpha, const double *a, integer *lda, const double *b, 
00034         integer *ldb, double *beta, double *c, integer *ldc);
00036     void F77NAME(dtrsm)(char *side, char *uplo, char *transa, char *diag,
00037         integer *m, integer *n, double *alpha, const double *A, integer *lda,
00038         const double *B, integer *ldb);
00040     void F77NAME(dtrmm)(char *side, char *uplo, char *transa, char *diag,
00041         integer *m, integer *n, double *alpha, const double *A, integer *lda,
00042         const double *B, integer *ldb);
00044     void F77NAME(dsymm)(char *side, char *uplo, integer *m, integer *n, 
00045         double *alpha, const double *A, integer *lda, const double *B, 
00046         integer *ldb, double *beta, double *C, integer *ldc);
00048     void F77NAME(dsyrk)(char *uplo, char *transa, integer *n, integer *k, 
00049         double *alpha, double *A, integer *lda, double *beta, double *C, 
00050         integer *ldc);
00052     void F77NAME(dsyr2k)(char *uplo, char *transa, integer *n, integer *k, 
00053         double *alpha, double *A, integer *lda, double *B, integer *ldb,
00054         double *beta, double *C, integer *ldc);
00055 }
 All Classes Files Functions Variables Enumerations Friends
Generated on Wed Apr 13 10:05:22 2011 for IFPACK by  doxygen 1.6.3