 rebase? (#1)
* With the Intel compiler on Linux, prefer ifort for the final link step
icc has known problems with mixed-language builds that ifort can handle just fine. Fixes #1956
* Rename operands to put lda on the input/output constraint list
* Fix wrong constraints in inline assembly
for #2009
* Fix inline assembly constraints
rework indices to allow marking argument lda4 as input and output. For #2009
* Fix inline assembly constraints
rework indices to allow marking argument lda as input and output.
* Fix inline assembly constraints
* Fix inline assembly constraints
* Fix inline assembly constraints in Bulldozer TRSM kernels
rework indices to allow marking i,as and bs as both input and output (marked operand n1 as well for simplicity). For #2009
* Correct range_n limiting
same bug as seen in #1388, somehow missed in corresponding PR #1389
* Allow multithreading TRMV again
revert workaround introduced for issue #1332 as the actual cause appears to be my incorrect fix from #1262 (see #1388)
* Fix error introduced during cleanup
* Reduce list of kernels in the dynamic arch build
to make compilation complete reliably within the 1h limit again
* init
* move fix to right place
* Fix missing -c option in AVX512 test
* Fix AVX512 test always returning false due to missing compiler option
* Make x86_32 imply NO_AVX2, NO_AVX512 in addition to NO_AVX
fixes #2033
* Keep xcode8.3 for osx BINARY=32 build
as xcode10 deprecated i386
* Make sure that AVX512 is disabled in 32bit builds
for #2033
* Improve handling of NO_STATIC and NO_SHARED
to avoid surprises from defining either as zero. Fixes #2035 by addressing some concerns from #1422
* init
* address warning introed with #1814 et al
* Restore locking optimizations for OpenMP case
restore another accidentally dropped part of #1468 that was missed in #2004 to address performance regression reported in #1461
* HiSilicon tsv110 CPUs optimization branch
add HiSilicon tsv110 CPUs optimization branch
* add TARGET support for HiSilicon tsv110 CPUs
* add TARGET support for HiSilicon tsv110 CPUs
* add TARGET support for HiSilicon tsv110 CPUs
* Fix module definition conflicts between LAPACK and ReLAPACK
for #2043
* Do not compile in AVX512 check if AVX support is disabled
xgetbv is function depends on NO_AVX being undefined - we could change that too, but that combo is unlikely to work anyway
* ctest.c : add __POWERPC__ for PowerMac
* Fix crash in sgemm SSE/nano kernel on x86_64
Fix bug #2047.
Signed-off-by: Celelibi <celelibi@gmail.com>
* param.h : enable defines for PPC970 on DarwinOS
fixes:
gemm.c: In function 'sgemm_':
../common_param.h:981:18: error: 'SGEMM_DEFAULT_P' undeclared (first use in this function)
#define SGEMM_P SGEMM_DEFAULT_P
^
* common_power.h: force DCBT_ARG 0 on PPC970 Darwin
without this, we see
../kernel/power/gemv_n.S:427:Parameter syntax error
and many more similar entries
that relates to this assembly command
dcbt 8, r24, r18
this change makes the DCBT_ARG = 0
and openblas builds through to completion on PowerMac 970
Tests pass
* Make TARGET=GENERIC compatible with DYNAMIC_ARCH=1
for issue #2048
* make DYNAMIC_ARCH=1 package work on TSV110.
* make DYNAMIC_ARCH=1 package work on TSV110
* Add Intel Denverton
for #2048
* Add Intel Denverton
* Change 64-bit detection as explained in #2056
* Trivial typo fix
as suggested in #2022
* Disable the AVX512 DGEMM kernel (again)
Due to as yet unresolved errors seen in #1955 and #2029
* Use POSIX getenv on Cygwin
The Windows-native GetEnvironmentVariable cannot be relied on, as
Cygwin does not always copy environment variables set through Cygwin
to the Windows environment block, particularly after fork().
* Fix for #2063: The DllMain used in Cygwin did not run the thread memory
pool cleanup upon THREAD_DETACH which is needed when compiled with
USE_TLS=1.
* Also call CloseHandle on each thread, as well as on the event so as to not leak thread handles.
* AIX asm syntax changes needed for shared object creation
* power9 makefile. dgemm based on power8 kernel with following changes : 32x unrolled 16x4 kernel and 8x4 kernel using (lxv stxv butterfly rank1 update). improvement from 17 to 22-23gflops. dtrmm cases were added into dgemm itself
* Expose CBLAS interfaces for I?MIN and I?MAX
* Build CBLAS interfaces for I?MIN and I?MAX
* Add declarations for ?sum and cblas_?sum
* Add interface for ?sum (derived from ?asum)
* Add ?sum
* Add implementations of ssum/dsum and csum/zsum
as trivial copies of asum/zsasum with the fabs calls replaced by fmov to preserve code structure
* Add ARM implementations of ?sum
(trivial copies of the respective ?asum with the fabs calls removed)
* Add ARM64 implementations of ?sum
as trivial copies of the respective ?asum kernels with the fabs calls removed
* Add ia64 implementation of ?sum
as trivial copy of asum with the fabs calls removed
* Add MIPS implementation of ?sum
as trivial copy of ?asum with the fabs calls removed
* Add MIPS64 implementation of ?sum
as trivial copy of ?asum with the fabs replaced by mov to preserve code structure
* Add POWER implementation of ?sum
as trivial copy of ?asum with the fabs replaced by fmr to preserve code structure
* Add SPARC implementation of ?sum
as trivial copy of ?asum with the fabs replaced by fmov to preserve code structure
* Add x86 implementation of ?sum
as trivial copy of ?asum with the fabs calls removed
* Add x86_64 implementation of ?sum
as trivial copy of ?asum with the fabs calls removed
* Add ZARCH implementation of ?sum
as trivial copies of the respective ?asum kernels with the ABS and vflpsb calls removed
* Detect 32bit environment on 64bit ARM hardware
for #2056, using same approach as #2058
* Add cmake defaults for ?sum kernels
* Add ?sum
* Add ?sum definitions for generic kernel
* Add declarations for ?sum
* Add -lm and disable EXPRECISION support on *BSD
fixes #2075
* Add in runtime CPU detection for POWER.
* snprintf define consolidated to common.h
* Support INTERFACE64=1
* Add support for INTERFACE64 and fix XERBLA calls
1. Replaced all instances of "int" with "blasint"
2. Added string length as "hidden" third parameter in calls to fortran XERBLA
* Correct length of name string in xerbla call
* Avoid out-of-bounds accesses in LAPACK EIG tests
see https://github.com/Reference-LAPACK/lapack/issues/333
* Correct INFO=4 condition
* Disable reallocation of work array in xSYTRF
as it appears to cause memory management problems (seen in the LAPACK tests)
* Disable repeated recursion on Ab_BR in ReLAPACK xGBTRF
due to crashes in LAPACK tests
* sgemm/strmm
* Update Changelog with changes from 0.3.6
* Increment version to 0.3.7.dev
* Increment version to 0.3.7.dev
* Misc. typo fixes
Found via `codespell -q 3 -w -L ith,als,dum,nd,amin,nto,wis,ba -S ./relapack,./kernel,./lapack-netlib`
* Correct argument of CPU_ISSET for glibc <2.5
fixes #2104
* conflict resolve
* Revert reference/ fixes
* Revert Changelog.txt typos
* Disable the SkyLakeX DGEMMITCOPY kernel as well
as a stopgap measure for https://github.com/numpy/numpy/issues/13401 as mentioned in #1955
* Disable DGEMMINCOPY as well for now
#1955
* init
* Fix errors in cpu enumeration with glibc 2.6
for #2114
* Change two http links to https
Closes #2109
* remove redundant code #2113
* Set up CI with Azure Pipelines
[skip ci]
* TST: add native POWER8 to CI
* add native POWER8 testing to
Travis CI matrix with ppc64le
os entry
* Update link to IBM MASS library, update cpu support status
* first try migrating one of the arm builds from travis
* fix tabbing in azure commands
* Update azure-pipelines.yml
take out offending lines (although stolen from https://github.com/conda-forge/opencv-feedstock azure-pipelines fiie)
* Update azure-pipelines.yml
* Update azure-pipelines.yml
* Update azure-pipelines.yml
* Update azure-pipelines.yml
* DOC: Add Azure CI status badge
* Add ARMV6 build to azure CI setup (#2122)
using aytekinar's Alpine image and docker script from the Travis setup
[skip ci]
* TST: Azure manylinux1 & clean-up
* remove some of the steps & comments
from the original Azure yml template
* modify the trigger section to use
develop since OpenBLAS primarily uses
this branch; use the same batching
behavior as downstream projects NumPy/
SciPy
* remove Travis emulated ARMv6 gcc build
because this now happens in Azure
* use documented Ubuntu vmImage name for Azure
and add in a manylinux1 test run to the matrix
[skip appveyor]
* Add NO_AFFINITY to available options on Linux, and set it to ON
to match the gmake default. Fixes second part of #2114
* Replace ISMIN and ISAMIN kernels on all x86_64 platforms (#2125)
* Mark iamax_sse.S as unsuitable for MIN due to issue #2116
* Use iamax.S rather than iamax_sse.S for ISMIN/ISAMIN on all x86_64 as workaround for #2116
* Move ARMv8 gcc build from Travis to Azure
* Move ARMv8 gcc build from Travis to Azure
* Update .travis.yml
* Test drone CI
* install make
* remove sudo
* Install gcc
* Install perl
* Install gfortran and add a clang job
* gfortran->gcc-gfortran
* Switch to ubuntu and parallel jobs
* apt update
* Fix typo
* update yes
* no need of gcc in clang build
* Add a cmake build as well
* Add cmake builds and print options
* build without lapack on cmake
* parallel build
* See if ubuntu 19.04 fixes the ICE
* Remove qemu armv8 builds
* arm32 build
* Fix typo
* TST: add SkylakeX AVX512 CI test
* adapt the C-level reproducer code for some
recent SkylakeX AVX512 kernel issues, provided
by Isuru Fernando and modified by Martin Kroeker,
for usage in the utest suite
* add an Intel SDE SkylakeX emulation utest run to
the Azure CI matrix; a custom Docker build was required
because Ubuntu image provided by Azure does not support
AVX512VL instructions
* Add option USE_LOCKING for single-threaded build with locking support
for calling from concurrent threads
* Add option USE_LOCKING for single-threaded build with locking support
* Add option USE_LOCKING for SMP-like locking in USE_THREAD=0 builds
* Add option USE_LOCKING but keep default settings intact
* Remove unrelated change
* Do not try ancient PGI hacks with recent versions of that compiler
should fix #2139
* Build and run utests in any case, they do their own checks for fortran availability
* Add softfp support in min/max kernels
fix for #1912
* Revert "Add softfp support in min/max kernels"
* Separate implementations of AMAX and IAMAX on arm
As noted in #1912 and comment on #1942, the combined implementation happens to "do the right thing" on hardfp, but cannot return both value and index on softfp where they would have to share the return register
* Ensure correct output for DAMAX with softfp
* Use generic kernels for complex (I)AMAX to support softfp
* improved zgemm power9 based on power8
* upload thread safety test folder
* hook up c++ thread safety test (main Makefile)
* add c++ thread test option to Makefile.rule
* Document NO_AVX512
for #2151
* sgemm pipeline improved, zgemm rewritten without inner packs, ABI lxvx v20 fixed with vs52
* Fix detection of AVX512 capable compilers in getarch
21eda8b5 introduced a check in getarch.c to test if the compiler is capable of
AVX512. This check currently fails, since the used __AVX2__ macro is only
defined if getarch itself was compiled with AVX2/AVX512 support. Make sure this
is the case by building getarch with -march=native on x86_64. It is only
supposed to run on the build host anyway.
* c_check: Unlink correct file
* power9 zgemm ztrmm optimized
* conflict resolve
* Add gfortran workaround for ABI violations in LAPACKE
for #2154 (see gcc bug 90329)
* Add gfortran workaround for ABI violations
for #2154 (see gcc bug 90329)
* Add gfortran workaround for potential ABI violation
for #2154
* Update fc.cmake
* Remove any inadvertent use of -march=native from DYNAMIC_ARCH builds
from #2143, -march=native precludes use of more specific options like -march=skylake-avx512 in individual kernels, and defeats the purpose of dynamic arch anyway.
* Avoid unintentional activation of TLS code via USE_TLS=0
fixes #2149
* Do not force gcc options on non-gcc compilers
fixes compile failure with pgi 18.10 as reported on OpenBLAS-users
* Update Makefile.x86_64
* Zero ecx with a mov instruction
PGI assembler does not like the initialization in the constraints.
* Fix mov syntax
* new sgemm 8x16
* Update dtrmm_kernel_16x4_power8.S
* PGI compiler does not like -march=native
* Fix build on FreeBSD/powerpc64.
Signed-off-by: Piotr Kubaj <pkubaj@anongoth.pl>
* Fix build for PPC970 on FreeBSD pt. 1
FreeBSD needs DCBT_ARG=0 as well.
* Fix build for PPC970 on FreeBSD pt.2
FreeBSD needs those macros too.
* cgemm/ctrmm power9
* Utest needs CBLAS but not necessarily FORTRAN
* Add mingw builds to Appveyor config
* Add getarch flags to disable AVX on x86
(and other small fixes to match Makefile behaviour)
* Make disabling DYNAMIC_ARCH on unsupported systems work
needs to be unset in the cache for the change to have any effect
* Mingw32 needs leading underscore on object names
(also copy BUNDERSCORE settings for FORTRAN from the corresponding Makefile)
6 years ago |
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775 |
- /*********************************************************************/
- /* Copyright 2009, 2010 The University of Texas at Austin. */
- /* All rights reserved. */
- /* */
- /* 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. */
- /* */
- /* THIS SOFTWARE IS PROVIDED BY THE UNIVERSITY OF TEXAS AT */
- /* AUSTIN ``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 UNIVERSITY OF TEXAS AT */
- /* AUSTIN OR 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. */
- /* */
- /* The views and conclusions contained in the software and */
- /* documentation are those of the authors and should not be */
- /* interpreted as representing official policies, either expressed */
- /* or implied, of The University of Texas at Austin. */
- /*********************************************************************/
-
- #ifndef ASSEMBLER
-
- #ifdef __cplusplus
- extern "C" {
- /* Assume C declarations for C++ */
- #endif /* __cplusplus */
-
- int BLASFUNC(xerbla)(char *, blasint *info, blasint);
-
- void openblas_set_num_threads_(int *);
-
- FLOATRET BLASFUNC(sdot) (blasint *, float *, blasint *, float *, blasint *);
- FLOATRET BLASFUNC(sdsdot)(blasint *, float *, float *, blasint *, float *, blasint *);
-
- double BLASFUNC(dsdot) (blasint *, float *, blasint *, float *, blasint *);
- double BLASFUNC(ddot) (blasint *, double *, blasint *, double *, blasint *);
- xdouble BLASFUNC(qdot) (blasint *, xdouble *, blasint *, xdouble *, blasint *);
-
-
- #ifdef RETURN_BY_STRUCT
- typedef struct {
- float r, i;
- } myccomplex_t;
-
- typedef struct {
- double r, i;
- } myzcomplex_t;
-
- typedef struct {
- xdouble r, i;
- } myxcomplex_t;
-
- myccomplex_t BLASFUNC(cdotu) (blasint *, float *, blasint *, float *, blasint *);
- myccomplex_t BLASFUNC(cdotc) (blasint *, float *, blasint *, float *, blasint *);
- myzcomplex_t BLASFUNC(zdotu) (blasint *, double *, blasint *, double *, blasint *);
- myzcomplex_t BLASFUNC(zdotc) (blasint *, double *, blasint *, double *, blasint *);
- myxcomplex_t BLASFUNC(xdotu) (blasint *, xdouble *, blasint *, xdouble *, blasint *);
- myxcomplex_t BLASFUNC(xdotc) (blasint *, xdouble *, blasint *, xdouble *, blasint *);
-
- #elif defined RETURN_BY_STACK
- void BLASFUNC(cdotu) (openblas_complex_float *, blasint *, float * , blasint *, float *, blasint *);
- void BLASFUNC(cdotc) (openblas_complex_float *, blasint *, float *, blasint *, float *, blasint *);
- void BLASFUNC(zdotu) (openblas_complex_double *, blasint *, double *, blasint *, double *, blasint *);
- void BLASFUNC(zdotc) (openblas_complex_double *, blasint *, double *, blasint *, double *, blasint *);
- void BLASFUNC(xdotu) (openblas_complex_xdouble *, blasint *, xdouble *, blasint *, xdouble *, blasint *);
- void BLASFUNC(xdotc) (openblas_complex_xdouble *, blasint *, xdouble *, blasint *, xdouble *, blasint *);
- #else
- openblas_complex_float BLASFUNC(cdotu) (blasint *, float *, blasint *, float *, blasint *);
- openblas_complex_float BLASFUNC(cdotc) (blasint *, float *, blasint *, float *, blasint *);
- openblas_complex_double BLASFUNC(zdotu) (blasint *, double *, blasint *, double *, blasint *);
- openblas_complex_double BLASFUNC(zdotc) (blasint *, double *, blasint *, double *, blasint *);
- openblas_complex_xdouble BLASFUNC(xdotu) (blasint *, xdouble *, blasint *, xdouble *, blasint *);
- openblas_complex_xdouble BLASFUNC(xdotc) (blasint *, xdouble *, blasint *, xdouble *, blasint *);
- #endif
-
- void BLASFUNC(saxpy) (blasint *, float *, float *, blasint *, float *, blasint *);
- void BLASFUNC(daxpy) (blasint *, double *, double *, blasint *, double *, blasint *);
- void BLASFUNC(qaxpy) (blasint *, xdouble *, xdouble *, blasint *, xdouble *, blasint *);
- void BLASFUNC(caxpy) (blasint *, float *, float *, blasint *, float *, blasint *);
- void BLASFUNC(zaxpy) (blasint *, double *, double *, blasint *, double *, blasint *);
- void BLASFUNC(xaxpy) (blasint *, xdouble *, xdouble *, blasint *, xdouble *, blasint *);
- void BLASFUNC(caxpyc)(blasint *, float *, float *, blasint *, float *, blasint *);
- void BLASFUNC(zaxpyc)(blasint *, double *, double *, blasint *, double *, blasint *);
- void BLASFUNC(xaxpyc)(blasint *, xdouble *, xdouble *, blasint *, xdouble *, blasint *);
-
- void BLASFUNC(scopy) (blasint *, float *, blasint *, float *, blasint *);
- void BLASFUNC(dcopy) (blasint *, double *, blasint *, double *, blasint *);
- void BLASFUNC(qcopy) (blasint *, xdouble *, blasint *, xdouble *, blasint *);
- void BLASFUNC(ccopy) (blasint *, float *, blasint *, float *, blasint *);
- void BLASFUNC(zcopy) (blasint *, double *, blasint *, double *, blasint *);
- void BLASFUNC(xcopy) (blasint *, xdouble *, blasint *, xdouble *, blasint *);
-
- void BLASFUNC(sswap) (blasint *, float *, blasint *, float *, blasint *);
- void BLASFUNC(dswap) (blasint *, double *, blasint *, double *, blasint *);
- void BLASFUNC(qswap) (blasint *, xdouble *, blasint *, xdouble *, blasint *);
- void BLASFUNC(cswap) (blasint *, float *, blasint *, float *, blasint *);
- void BLASFUNC(zswap) (blasint *, double *, blasint *, double *, blasint *);
- void BLASFUNC(xswap) (blasint *, xdouble *, blasint *, xdouble *, blasint *);
-
- FLOATRET BLASFUNC(sasum) (blasint *, float *, blasint *);
- FLOATRET BLASFUNC(scasum)(blasint *, float *, blasint *);
- double BLASFUNC(dasum) (blasint *, double *, blasint *);
- xdouble BLASFUNC(qasum) (blasint *, xdouble *, blasint *);
- double BLASFUNC(dzasum)(blasint *, double *, blasint *);
- xdouble BLASFUNC(qxasum)(blasint *, xdouble *, blasint *);
-
- FLOATRET BLASFUNC(ssum) (blasint *, float *, blasint *);
- FLOATRET BLASFUNC(scsum)(blasint *, float *, blasint *);
- double BLASFUNC(dsum) (blasint *, double *, blasint *);
- xdouble BLASFUNC(qsum) (blasint *, xdouble *, blasint *);
- double BLASFUNC(dzsum)(blasint *, double *, blasint *);
- xdouble BLASFUNC(qxsum)(blasint *, xdouble *, blasint *);
-
- blasint BLASFUNC(isamax)(blasint *, float *, blasint *);
- blasint BLASFUNC(idamax)(blasint *, double *, blasint *);
- blasint BLASFUNC(iqamax)(blasint *, xdouble *, blasint *);
- blasint BLASFUNC(icamax)(blasint *, float *, blasint *);
- blasint BLASFUNC(izamax)(blasint *, double *, blasint *);
- blasint BLASFUNC(ixamax)(blasint *, xdouble *, blasint *);
-
- blasint BLASFUNC(ismax) (blasint *, float *, blasint *);
- blasint BLASFUNC(idmax) (blasint *, double *, blasint *);
- blasint BLASFUNC(iqmax) (blasint *, xdouble *, blasint *);
- blasint BLASFUNC(icmax) (blasint *, float *, blasint *);
- blasint BLASFUNC(izmax) (blasint *, double *, blasint *);
- blasint BLASFUNC(ixmax) (blasint *, xdouble *, blasint *);
-
- blasint BLASFUNC(isamin)(blasint *, float *, blasint *);
- blasint BLASFUNC(idamin)(blasint *, double *, blasint *);
- blasint BLASFUNC(iqamin)(blasint *, xdouble *, blasint *);
- blasint BLASFUNC(icamin)(blasint *, float *, blasint *);
- blasint BLASFUNC(izamin)(blasint *, double *, blasint *);
- blasint BLASFUNC(ixamin)(blasint *, xdouble *, blasint *);
-
- blasint BLASFUNC(ismin)(blasint *, float *, blasint *);
- blasint BLASFUNC(idmin)(blasint *, double *, blasint *);
- blasint BLASFUNC(iqmin)(blasint *, xdouble *, blasint *);
- blasint BLASFUNC(icmin)(blasint *, float *, blasint *);
- blasint BLASFUNC(izmin)(blasint *, double *, blasint *);
- blasint BLASFUNC(ixmin)(blasint *, xdouble *, blasint *);
-
- FLOATRET BLASFUNC(samax) (blasint *, float *, blasint *);
- double BLASFUNC(damax) (blasint *, double *, blasint *);
- xdouble BLASFUNC(qamax) (blasint *, xdouble *, blasint *);
- FLOATRET BLASFUNC(scamax)(blasint *, float *, blasint *);
- double BLASFUNC(dzamax)(blasint *, double *, blasint *);
- xdouble BLASFUNC(qxamax)(blasint *, xdouble *, blasint *);
-
- FLOATRET BLASFUNC(samin) (blasint *, float *, blasint *);
- double BLASFUNC(damin) (blasint *, double *, blasint *);
- xdouble BLASFUNC(qamin) (blasint *, xdouble *, blasint *);
- FLOATRET BLASFUNC(scamin)(blasint *, float *, blasint *);
- double BLASFUNC(dzamin)(blasint *, double *, blasint *);
- xdouble BLASFUNC(qxamin)(blasint *, xdouble *, blasint *);
-
- FLOATRET BLASFUNC(smax) (blasint *, float *, blasint *);
- double BLASFUNC(dmax) (blasint *, double *, blasint *);
- xdouble BLASFUNC(qmax) (blasint *, xdouble *, blasint *);
- FLOATRET BLASFUNC(scmax) (blasint *, float *, blasint *);
- double BLASFUNC(dzmax) (blasint *, double *, blasint *);
- xdouble BLASFUNC(qxmax) (blasint *, xdouble *, blasint *);
-
- FLOATRET BLASFUNC(smin) (blasint *, float *, blasint *);
- double BLASFUNC(dmin) (blasint *, double *, blasint *);
- xdouble BLASFUNC(qmin) (blasint *, xdouble *, blasint *);
- FLOATRET BLASFUNC(scmin) (blasint *, float *, blasint *);
- double BLASFUNC(dzmin) (blasint *, double *, blasint *);
- xdouble BLASFUNC(qxmin) (blasint *, xdouble *, blasint *);
-
- void BLASFUNC(sscal) (blasint *, float *, float *, blasint *);
- void BLASFUNC(dscal) (blasint *, double *, double *, blasint *);
- void BLASFUNC(qscal) (blasint *, xdouble *, xdouble *, blasint *);
- void BLASFUNC(cscal) (blasint *, float *, float *, blasint *);
- void BLASFUNC(zscal) (blasint *, double *, double *, blasint *);
- void BLASFUNC(xscal) (blasint *, xdouble *, xdouble *, blasint *);
- void BLASFUNC(csscal)(blasint *, float *, float *, blasint *);
- void BLASFUNC(zdscal)(blasint *, double *, double *, blasint *);
- void BLASFUNC(xqscal)(blasint *, xdouble *, xdouble *, blasint *);
-
- FLOATRET BLASFUNC(snrm2) (blasint *, float *, blasint *);
- FLOATRET BLASFUNC(scnrm2)(blasint *, float *, blasint *);
-
- double BLASFUNC(dnrm2) (blasint *, double *, blasint *);
- xdouble BLASFUNC(qnrm2) (blasint *, xdouble *, blasint *);
- double BLASFUNC(dznrm2)(blasint *, double *, blasint *);
- xdouble BLASFUNC(qxnrm2)(blasint *, xdouble *, blasint *);
-
- void BLASFUNC(srot) (blasint *, float *, blasint *, float *, blasint *, float *, float *);
- void BLASFUNC(drot) (blasint *, double *, blasint *, double *, blasint *, double *, double *);
- void BLASFUNC(qrot) (blasint *, xdouble *, blasint *, xdouble *, blasint *, xdouble *, xdouble *);
- void BLASFUNC(csrot) (blasint *, float *, blasint *, float *, blasint *, float *, float *);
- void BLASFUNC(zdrot) (blasint *, double *, blasint *, double *, blasint *, double *, double *);
- void BLASFUNC(xqrot) (blasint *, xdouble *, blasint *, xdouble *, blasint *, xdouble *, xdouble *);
-
- void BLASFUNC(srotg) (float *, float *, float *, float *);
- void BLASFUNC(drotg) (double *, double *, double *, double *);
- void BLASFUNC(qrotg) (xdouble *, xdouble *, xdouble *, xdouble *);
- void BLASFUNC(crotg) (float *, float *, float *, float *);
- void BLASFUNC(zrotg) (double *, double *, double *, double *);
- void BLASFUNC(xrotg) (xdouble *, xdouble *, xdouble *, xdouble *);
-
- void BLASFUNC(srotmg)(float *, float *, float *, float *, float *);
- void BLASFUNC(drotmg)(double *, double *, double *, double *, double *);
-
- void BLASFUNC(srotm) (blasint *, float *, blasint *, float *, blasint *, float *);
- void BLASFUNC(drotm) (blasint *, double *, blasint *, double *, blasint *, double *);
- void BLASFUNC(qrotm) (blasint *, xdouble *, blasint *, xdouble *, blasint *, xdouble *);
-
- /* Level 2 routines */
-
- void BLASFUNC(sger)(blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, blasint *);
- void BLASFUNC(dger)(blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, blasint *);
- void BLASFUNC(qger)(blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, blasint *);
- void BLASFUNC(cgeru)(blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, blasint *);
- void BLASFUNC(cgerc)(blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, blasint *);
- void BLASFUNC(zgeru)(blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, blasint *);
- void BLASFUNC(zgerc)(blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, blasint *);
- void BLASFUNC(xgeru)(blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, blasint *);
- void BLASFUNC(xgerc)(blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, blasint *);
-
- void BLASFUNC(sgemv)(char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(dgemv)(char *, blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(qgemv)(char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
- void BLASFUNC(cgemv)(char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zgemv)(char *, blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xgemv)(char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(strsv) (char *, char *, char *, blasint *, float *, blasint *,
- float *, blasint *);
- void BLASFUNC(dtrsv) (char *, char *, char *, blasint *, double *, blasint *,
- double *, blasint *);
- void BLASFUNC(qtrsv) (char *, char *, char *, blasint *, xdouble *, blasint *,
- xdouble *, blasint *);
- void BLASFUNC(ctrsv) (char *, char *, char *, blasint *, float *, blasint *,
- float *, blasint *);
- void BLASFUNC(ztrsv) (char *, char *, char *, blasint *, double *, blasint *,
- double *, blasint *);
- void BLASFUNC(xtrsv) (char *, char *, char *, blasint *, xdouble *, blasint *,
- xdouble *, blasint *);
-
- void BLASFUNC(strmv) (char *, char *, char *, blasint *, float *, blasint *,
- float *, blasint *);
- void BLASFUNC(dtrmv) (char *, char *, char *, blasint *, double *, blasint *,
- double *, blasint *);
- void BLASFUNC(qtrmv) (char *, char *, char *, blasint *, xdouble *, blasint *,
- xdouble *, blasint *);
- void BLASFUNC(ctrmv) (char *, char *, char *, blasint *, float *, blasint *,
- float *, blasint *);
- void BLASFUNC(ztrmv) (char *, char *, char *, blasint *, double *, blasint *,
- double *, blasint *);
- void BLASFUNC(xtrmv) (char *, char *, char *, blasint *, xdouble *, blasint *,
- xdouble *, blasint *);
-
- void BLASFUNC(stpsv) (char *, char *, char *, blasint *, float *, float *, blasint *);
- void BLASFUNC(dtpsv) (char *, char *, char *, blasint *, double *, double *, blasint *);
- void BLASFUNC(qtpsv) (char *, char *, char *, blasint *, xdouble *, xdouble *, blasint *);
- void BLASFUNC(ctpsv) (char *, char *, char *, blasint *, float *, float *, blasint *);
- void BLASFUNC(ztpsv) (char *, char *, char *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xtpsv) (char *, char *, char *, blasint *, xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(stpmv) (char *, char *, char *, blasint *, float *, float *, blasint *);
- void BLASFUNC(dtpmv) (char *, char *, char *, blasint *, double *, double *, blasint *);
- void BLASFUNC(qtpmv) (char *, char *, char *, blasint *, xdouble *, xdouble *, blasint *);
- void BLASFUNC(ctpmv) (char *, char *, char *, blasint *, float *, float *, blasint *);
- void BLASFUNC(ztpmv) (char *, char *, char *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xtpmv) (char *, char *, char *, blasint *, xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(stbmv) (char *, char *, char *, blasint *, blasint *, float *, blasint *, float *, blasint *);
- void BLASFUNC(dtbmv) (char *, char *, char *, blasint *, blasint *, double *, blasint *, double *, blasint *);
- void BLASFUNC(qtbmv) (char *, char *, char *, blasint *, blasint *, xdouble *, blasint *, xdouble *, blasint *);
- void BLASFUNC(ctbmv) (char *, char *, char *, blasint *, blasint *, float *, blasint *, float *, blasint *);
- void BLASFUNC(ztbmv) (char *, char *, char *, blasint *, blasint *, double *, blasint *, double *, blasint *);
- void BLASFUNC(xtbmv) (char *, char *, char *, blasint *, blasint *, xdouble *, blasint *, xdouble *, blasint *);
-
- void BLASFUNC(stbsv) (char *, char *, char *, blasint *, blasint *, float *, blasint *, float *, blasint *);
- void BLASFUNC(dtbsv) (char *, char *, char *, blasint *, blasint *, double *, blasint *, double *, blasint *);
- void BLASFUNC(qtbsv) (char *, char *, char *, blasint *, blasint *, xdouble *, blasint *, xdouble *, blasint *);
- void BLASFUNC(ctbsv) (char *, char *, char *, blasint *, blasint *, float *, blasint *, float *, blasint *);
- void BLASFUNC(ztbsv) (char *, char *, char *, blasint *, blasint *, double *, blasint *, double *, blasint *);
- void BLASFUNC(xtbsv) (char *, char *, char *, blasint *, blasint *, xdouble *, blasint *, xdouble *, blasint *);
-
- void BLASFUNC(ssymv) (char *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(dsymv) (char *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(qsymv) (char *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
- void BLASFUNC(csymv) (char *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zsymv) (char *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xsymv) (char *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(sspmv) (char *, blasint *, float *, float *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(dspmv) (char *, blasint *, double *, double *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(qspmv) (char *, blasint *, xdouble *, xdouble *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
- void BLASFUNC(cspmv) (char *, blasint *, float *, float *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zspmv) (char *, blasint *, double *, double *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xspmv) (char *, blasint *, xdouble *, xdouble *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(ssyr) (char *, blasint *, float *, float *, blasint *,
- float *, blasint *);
- void BLASFUNC(dsyr) (char *, blasint *, double *, double *, blasint *,
- double *, blasint *);
- void BLASFUNC(qsyr) (char *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *);
- void BLASFUNC(csyr) (char *, blasint *, float *, float *, blasint *,
- float *, blasint *);
- void BLASFUNC(zsyr) (char *, blasint *, double *, double *, blasint *,
- double *, blasint *);
- void BLASFUNC(xsyr) (char *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *);
-
- void BLASFUNC(ssyr2) (char *, blasint *, float *,
- float *, blasint *, float *, blasint *, float *, blasint *);
- void BLASFUNC(dsyr2) (char *, blasint *, double *,
- double *, blasint *, double *, blasint *, double *, blasint *);
- void BLASFUNC(qsyr2) (char *, blasint *, xdouble *,
- xdouble *, blasint *, xdouble *, blasint *, xdouble *, blasint *);
- void BLASFUNC(csyr2) (char *, blasint *, float *,
- float *, blasint *, float *, blasint *, float *, blasint *);
- void BLASFUNC(zsyr2) (char *, blasint *, double *,
- double *, blasint *, double *, blasint *, double *, blasint *);
- void BLASFUNC(xsyr2) (char *, blasint *, xdouble *,
- xdouble *, blasint *, xdouble *, blasint *, xdouble *, blasint *);
-
- void BLASFUNC(sspr) (char *, blasint *, float *, float *, blasint *,
- float *);
- void BLASFUNC(dspr) (char *, blasint *, double *, double *, blasint *,
- double *);
- void BLASFUNC(qspr) (char *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *);
- void BLASFUNC(cspr) (char *, blasint *, float *, float *, blasint *,
- float *);
- void BLASFUNC(zspr) (char *, blasint *, double *, double *, blasint *,
- double *);
- void BLASFUNC(xspr) (char *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *);
-
- void BLASFUNC(sspr2) (char *, blasint *, float *,
- float *, blasint *, float *, blasint *, float *);
- void BLASFUNC(dspr2) (char *, blasint *, double *,
- double *, blasint *, double *, blasint *, double *);
- void BLASFUNC(qspr2) (char *, blasint *, xdouble *,
- xdouble *, blasint *, xdouble *, blasint *, xdouble *);
- void BLASFUNC(cspr2) (char *, blasint *, float *,
- float *, blasint *, float *, blasint *, float *);
- void BLASFUNC(zspr2) (char *, blasint *, double *,
- double *, blasint *, double *, blasint *, double *);
- void BLASFUNC(xspr2) (char *, blasint *, xdouble *,
- xdouble *, blasint *, xdouble *, blasint *, xdouble *);
-
- void BLASFUNC(cher) (char *, blasint *, float *, float *, blasint *,
- float *, blasint *);
- void BLASFUNC(zher) (char *, blasint *, double *, double *, blasint *,
- double *, blasint *);
- void BLASFUNC(xher) (char *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *);
-
- void BLASFUNC(chpr) (char *, blasint *, float *, float *, blasint *, float *);
- void BLASFUNC(zhpr) (char *, blasint *, double *, double *, blasint *, double *);
- void BLASFUNC(xhpr) (char *, blasint *, xdouble *, xdouble *, blasint *, xdouble *);
-
- void BLASFUNC(cher2) (char *, blasint *, float *,
- float *, blasint *, float *, blasint *, float *, blasint *);
- void BLASFUNC(zher2) (char *, blasint *, double *,
- double *, blasint *, double *, blasint *, double *, blasint *);
- void BLASFUNC(xher2) (char *, blasint *, xdouble *,
- xdouble *, blasint *, xdouble *, blasint *, xdouble *, blasint *);
-
- void BLASFUNC(chpr2) (char *, blasint *, float *,
- float *, blasint *, float *, blasint *, float *);
- void BLASFUNC(zhpr2) (char *, blasint *, double *,
- double *, blasint *, double *, blasint *, double *);
- void BLASFUNC(xhpr2) (char *, blasint *, xdouble *,
- xdouble *, blasint *, xdouble *, blasint *, xdouble *);
-
- void BLASFUNC(chemv) (char *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zhemv) (char *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xhemv) (char *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(chpmv) (char *, blasint *, float *, float *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zhpmv) (char *, blasint *, double *, double *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xhpmv) (char *, blasint *, xdouble *, xdouble *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- int BLASFUNC(snorm)(char *, blasint *, blasint *, float *, blasint *);
- int BLASFUNC(dnorm)(char *, blasint *, blasint *, double *, blasint *);
- int BLASFUNC(cnorm)(char *, blasint *, blasint *, float *, blasint *);
- int BLASFUNC(znorm)(char *, blasint *, blasint *, double *, blasint *);
-
- void BLASFUNC(sgbmv)(char *, blasint *, blasint *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(dgbmv)(char *, blasint *, blasint *, blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(qgbmv)(char *, blasint *, blasint *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
- void BLASFUNC(cgbmv)(char *, blasint *, blasint *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zgbmv)(char *, blasint *, blasint *, blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xgbmv)(char *, blasint *, blasint *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(ssbmv)(char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(dsbmv)(char *, blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(qsbmv)(char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
- void BLASFUNC(csbmv)(char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zsbmv)(char *, blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xsbmv)(char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(chbmv)(char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zhbmv)(char *, blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xhbmv)(char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- /* Level 3 routines */
-
- void BLASFUNC(sgemm)(char *, char *, blasint *, blasint *, blasint *, float *,
- float *, blasint *, float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(dgemm)(char *, char *, blasint *, blasint *, blasint *, double *,
- double *, blasint *, double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(qgemm)(char *, char *, blasint *, blasint *, blasint *, xdouble *,
- xdouble *, blasint *, xdouble *, blasint *, xdouble *, xdouble *, blasint *);
- void BLASFUNC(cgemm)(char *, char *, blasint *, blasint *, blasint *, float *,
- float *, blasint *, float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zgemm)(char *, char *, blasint *, blasint *, blasint *, double *,
- double *, blasint *, double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xgemm)(char *, char *, blasint *, blasint *, blasint *, xdouble *,
- xdouble *, blasint *, xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(cgemm3m)(char *, char *, blasint *, blasint *, blasint *, float *,
- float *, blasint *, float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zgemm3m)(char *, char *, blasint *, blasint *, blasint *, double *,
- double *, blasint *, double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xgemm3m)(char *, char *, blasint *, blasint *, blasint *, xdouble *,
- xdouble *, blasint *, xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- int BLASFUNC(sge2mm)(char *, char *, char *, blasint *, blasint *,
- float *, float *, blasint *, float *, blasint *,
- float *, float *, blasint *);
- int BLASFUNC(dge2mm)(char *, char *, char *, blasint *, blasint *,
- double *, double *, blasint *, double *, blasint *,
- double *, double *, blasint *);
- int BLASFUNC(cge2mm)(char *, char *, char *, blasint *, blasint *,
- float *, float *, blasint *, float *, blasint *,
- float *, float *, blasint *);
- int BLASFUNC(zge2mm)(char *, char *, char *, blasint *, blasint *,
- double *, double *, blasint *, double *, blasint *,
- double *, double *, blasint *);
-
- void BLASFUNC(strsm)(char *, char *, char *, char *, blasint *, blasint *,
- float *, float *, blasint *, float *, blasint *);
- void BLASFUNC(dtrsm)(char *, char *, char *, char *, blasint *, blasint *,
- double *, double *, blasint *, double *, blasint *);
- void BLASFUNC(qtrsm)(char *, char *, char *, char *, blasint *, blasint *,
- xdouble *, xdouble *, blasint *, xdouble *, blasint *);
- void BLASFUNC(ctrsm)(char *, char *, char *, char *, blasint *, blasint *,
- float *, float *, blasint *, float *, blasint *);
- void BLASFUNC(ztrsm)(char *, char *, char *, char *, blasint *, blasint *,
- double *, double *, blasint *, double *, blasint *);
- void BLASFUNC(xtrsm)(char *, char *, char *, char *, blasint *, blasint *,
- xdouble *, xdouble *, blasint *, xdouble *, blasint *);
-
- void BLASFUNC(strmm)(char *, char *, char *, char *, blasint *, blasint *,
- float *, float *, blasint *, float *, blasint *);
- void BLASFUNC(dtrmm)(char *, char *, char *, char *, blasint *, blasint *,
- double *, double *, blasint *, double *, blasint *);
- void BLASFUNC(qtrmm)(char *, char *, char *, char *, blasint *, blasint *,
- xdouble *, xdouble *, blasint *, xdouble *, blasint *);
- void BLASFUNC(ctrmm)(char *, char *, char *, char *, blasint *, blasint *,
- float *, float *, blasint *, float *, blasint *);
- void BLASFUNC(ztrmm)(char *, char *, char *, char *, blasint *, blasint *,
- double *, double *, blasint *, double *, blasint *);
- void BLASFUNC(xtrmm)(char *, char *, char *, char *, blasint *, blasint *,
- xdouble *, xdouble *, blasint *, xdouble *, blasint *);
-
- void BLASFUNC(ssymm)(char *, char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(dsymm)(char *, char *, blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(qsymm)(char *, char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
- void BLASFUNC(csymm)(char *, char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zsymm)(char *, char *, blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xsymm)(char *, char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(csymm3m)(char *, char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zsymm3m)(char *, char *, blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xsymm3m)(char *, char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(ssyrk)(char *, char *, blasint *, blasint *, float *, float *, blasint *,
- float *, float *, blasint *);
- void BLASFUNC(dsyrk)(char *, char *, blasint *, blasint *, double *, double *, blasint *,
- double *, double *, blasint *);
- void BLASFUNC(qsyrk)(char *, char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, xdouble *, blasint *);
- void BLASFUNC(csyrk)(char *, char *, blasint *, blasint *, float *, float *, blasint *,
- float *, float *, blasint *);
- void BLASFUNC(zsyrk)(char *, char *, blasint *, blasint *, double *, double *, blasint *,
- double *, double *, blasint *);
- void BLASFUNC(xsyrk)(char *, char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(ssyr2k)(char *, char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(dsyr2k)(char *, char *, blasint *, blasint *, double *, double *, blasint *,
- double*, blasint *, double *, double *, blasint *);
- void BLASFUNC(qsyr2k)(char *, char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble*, blasint *, xdouble *, xdouble *, blasint *);
- void BLASFUNC(csyr2k)(char *, char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zsyr2k)(char *, char *, blasint *, blasint *, double *, double *, blasint *,
- double*, blasint *, double *, double *, blasint *);
- void BLASFUNC(xsyr2k)(char *, char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble*, blasint *, xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(chemm)(char *, char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zhemm)(char *, char *, blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xhemm)(char *, char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(chemm3m)(char *, char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zhemm3m)(char *, char *, blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(xhemm3m)(char *, char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(cherk)(char *, char *, blasint *, blasint *, float *, float *, blasint *,
- float *, float *, blasint *);
- void BLASFUNC(zherk)(char *, char *, blasint *, blasint *, double *, double *, blasint *,
- double *, double *, blasint *);
- void BLASFUNC(xherk)(char *, char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble *, xdouble *, blasint *);
-
- void BLASFUNC(cher2k)(char *, char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zher2k)(char *, char *, blasint *, blasint *, double *, double *, blasint *,
- double*, blasint *, double *, double *, blasint *);
- void BLASFUNC(xher2k)(char *, char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble*, blasint *, xdouble *, xdouble *, blasint *);
-
- int BLASFUNC(cher2m)(char *, char *, char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *, float *, float *, blasint *);
- int BLASFUNC(zher2m)(char *, char *, char *, blasint *, blasint *, double *, double *, blasint *,
- double*, blasint *, double *, double *, blasint *);
- int BLASFUNC(xher2m)(char *, char *, char *, blasint *, blasint *, xdouble *, xdouble *, blasint *,
- xdouble*, blasint *, xdouble *, xdouble *, blasint *);
-
- int BLASFUNC(sgemt)(char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *);
- int BLASFUNC(dgemt)(char *, blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *);
- int BLASFUNC(cgemt)(char *, blasint *, blasint *, float *, float *, blasint *,
- float *, blasint *);
- int BLASFUNC(zgemt)(char *, blasint *, blasint *, double *, double *, blasint *,
- double *, blasint *);
-
- int BLASFUNC(sgema)(char *, char *, blasint *, blasint *, float *,
- float *, blasint *, float *, float *, blasint *, float *, blasint *);
- int BLASFUNC(dgema)(char *, char *, blasint *, blasint *, double *,
- double *, blasint *, double*, double *, blasint *, double*, blasint *);
- int BLASFUNC(cgema)(char *, char *, blasint *, blasint *, float *,
- float *, blasint *, float *, float *, blasint *, float *, blasint *);
- int BLASFUNC(zgema)(char *, char *, blasint *, blasint *, double *,
- double *, blasint *, double*, double *, blasint *, double*, blasint *);
-
- int BLASFUNC(sgems)(char *, char *, blasint *, blasint *, float *,
- float *, blasint *, float *, float *, blasint *, float *, blasint *);
- int BLASFUNC(dgems)(char *, char *, blasint *, blasint *, double *,
- double *, blasint *, double*, double *, blasint *, double*, blasint *);
- int BLASFUNC(cgems)(char *, char *, blasint *, blasint *, float *,
- float *, blasint *, float *, float *, blasint *, float *, blasint *);
- int BLASFUNC(zgems)(char *, char *, blasint *, blasint *, double *,
- double *, blasint *, double*, double *, blasint *, double*, blasint *);
-
- int BLASFUNC(sgemc)(char *, char *, blasint *, blasint *, blasint *, float *,
- float *, blasint *, float *, blasint *, float *, blasint *, float *, float *, blasint *);
- int BLASFUNC(dgemc)(char *, char *, blasint *, blasint *, blasint *, double *,
- double *, blasint *, double *, blasint *, double *, blasint *, double *, double *, blasint *);
- int BLASFUNC(qgemc)(char *, char *, blasint *, blasint *, blasint *, xdouble *,
- xdouble *, blasint *, xdouble *, blasint *, xdouble *, blasint *, xdouble *, xdouble *, blasint *);
- int BLASFUNC(cgemc)(char *, char *, blasint *, blasint *, blasint *, float *,
- float *, blasint *, float *, blasint *, float *, blasint *, float *, float *, blasint *);
- int BLASFUNC(zgemc)(char *, char *, blasint *, blasint *, blasint *, double *,
- double *, blasint *, double *, blasint *, double *, blasint *, double *, double *, blasint *);
- int BLASFUNC(xgemc)(char *, char *, blasint *, blasint *, blasint *, xdouble *,
- xdouble *, blasint *, xdouble *, blasint *, xdouble *, blasint *, xdouble *, xdouble *, blasint *);
-
- /* Lapack routines */
-
- int BLASFUNC(sgetf2)(blasint *, blasint *, float *, blasint *, blasint *, blasint *);
- int BLASFUNC(dgetf2)(blasint *, blasint *, double *, blasint *, blasint *, blasint *);
- int BLASFUNC(qgetf2)(blasint *, blasint *, xdouble *, blasint *, blasint *, blasint *);
- int BLASFUNC(cgetf2)(blasint *, blasint *, float *, blasint *, blasint *, blasint *);
- int BLASFUNC(zgetf2)(blasint *, blasint *, double *, blasint *, blasint *, blasint *);
- int BLASFUNC(xgetf2)(blasint *, blasint *, xdouble *, blasint *, blasint *, blasint *);
-
- int BLASFUNC(sgetrf)(blasint *, blasint *, float *, blasint *, blasint *, blasint *);
- int BLASFUNC(dgetrf)(blasint *, blasint *, double *, blasint *, blasint *, blasint *);
- int BLASFUNC(qgetrf)(blasint *, blasint *, xdouble *, blasint *, blasint *, blasint *);
- int BLASFUNC(cgetrf)(blasint *, blasint *, float *, blasint *, blasint *, blasint *);
- int BLASFUNC(zgetrf)(blasint *, blasint *, double *, blasint *, blasint *, blasint *);
- int BLASFUNC(xgetrf)(blasint *, blasint *, xdouble *, blasint *, blasint *, blasint *);
-
- int BLASFUNC(slaswp)(blasint *, float *, blasint *, blasint *, blasint *, blasint *, blasint *);
- int BLASFUNC(dlaswp)(blasint *, double *, blasint *, blasint *, blasint *, blasint *, blasint *);
- int BLASFUNC(qlaswp)(blasint *, xdouble *, blasint *, blasint *, blasint *, blasint *, blasint *);
- int BLASFUNC(claswp)(blasint *, float *, blasint *, blasint *, blasint *, blasint *, blasint *);
- int BLASFUNC(zlaswp)(blasint *, double *, blasint *, blasint *, blasint *, blasint *, blasint *);
- int BLASFUNC(xlaswp)(blasint *, xdouble *, blasint *, blasint *, blasint *, blasint *, blasint *);
-
- int BLASFUNC(sgetrs)(char *, blasint *, blasint *, float *, blasint *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(dgetrs)(char *, blasint *, blasint *, double *, blasint *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(qgetrs)(char *, blasint *, blasint *, xdouble *, blasint *, blasint *, xdouble *, blasint *, blasint *);
- int BLASFUNC(cgetrs)(char *, blasint *, blasint *, float *, blasint *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(zgetrs)(char *, blasint *, blasint *, double *, blasint *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(xgetrs)(char *, blasint *, blasint *, xdouble *, blasint *, blasint *, xdouble *, blasint *, blasint *);
-
- int BLASFUNC(sgesv)(blasint *, blasint *, float *, blasint *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(dgesv)(blasint *, blasint *, double *, blasint *, blasint *, double*, blasint *, blasint *);
- int BLASFUNC(qgesv)(blasint *, blasint *, xdouble *, blasint *, blasint *, xdouble*, blasint *, blasint *);
- int BLASFUNC(cgesv)(blasint *, blasint *, float *, blasint *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(zgesv)(blasint *, blasint *, double *, blasint *, blasint *, double*, blasint *, blasint *);
- int BLASFUNC(xgesv)(blasint *, blasint *, xdouble *, blasint *, blasint *, xdouble*, blasint *, blasint *);
-
- int BLASFUNC(spotf2)(char *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(dpotf2)(char *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(qpotf2)(char *, blasint *, xdouble *, blasint *, blasint *);
- int BLASFUNC(cpotf2)(char *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(zpotf2)(char *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(xpotf2)(char *, blasint *, xdouble *, blasint *, blasint *);
-
- int BLASFUNC(spotrf)(char *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(dpotrf)(char *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(qpotrf)(char *, blasint *, xdouble *, blasint *, blasint *);
- int BLASFUNC(cpotrf)(char *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(zpotrf)(char *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(xpotrf)(char *, blasint *, xdouble *, blasint *, blasint *);
-
- int BLASFUNC(spotrs)(char *, blasint *, blasint *, float *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(dpotrs)(char *, blasint *, blasint *, double *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(qpotrs)(char *, blasint *, blasint *, xdouble *, blasint *, xdouble *, blasint *, blasint *);
- int BLASFUNC(cpotrs)(char *, blasint *, blasint *, float *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(zpotrs)(char *, blasint *, blasint *, double *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(xpotrs)(char *, blasint *, blasint *, xdouble *, blasint *, xdouble *, blasint *, blasint *);
-
- int BLASFUNC(slauu2)(char *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(dlauu2)(char *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(qlauu2)(char *, blasint *, xdouble *, blasint *, blasint *);
- int BLASFUNC(clauu2)(char *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(zlauu2)(char *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(xlauu2)(char *, blasint *, xdouble *, blasint *, blasint *);
-
- int BLASFUNC(slauum)(char *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(dlauum)(char *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(qlauum)(char *, blasint *, xdouble *, blasint *, blasint *);
- int BLASFUNC(clauum)(char *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(zlauum)(char *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(xlauum)(char *, blasint *, xdouble *, blasint *, blasint *);
-
- int BLASFUNC(strti2)(char *, char *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(dtrti2)(char *, char *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(qtrti2)(char *, char *, blasint *, xdouble *, blasint *, blasint *);
- int BLASFUNC(ctrti2)(char *, char *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(ztrti2)(char *, char *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(xtrti2)(char *, char *, blasint *, xdouble *, blasint *, blasint *);
-
- int BLASFUNC(strtri)(char *, char *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(dtrtri)(char *, char *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(qtrtri)(char *, char *, blasint *, xdouble *, blasint *, blasint *);
- int BLASFUNC(ctrtri)(char *, char *, blasint *, float *, blasint *, blasint *);
- int BLASFUNC(ztrtri)(char *, char *, blasint *, double *, blasint *, blasint *);
- int BLASFUNC(xtrtri)(char *, char *, blasint *, xdouble *, blasint *, blasint *);
-
-
- FLOATRET BLASFUNC(slamch)(char *);
- double BLASFUNC(dlamch)(char *);
- xdouble BLASFUNC(qlamch)(char *);
-
- FLOATRET BLASFUNC(slamc3)(float *, float *);
- double BLASFUNC(dlamc3)(double *, double *);
- xdouble BLASFUNC(qlamc3)(xdouble *, xdouble *);
-
- /* BLAS extensions */
-
- void BLASFUNC(saxpby) (blasint *, float *, float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(daxpby) (blasint *, double *, double *, blasint *, double *, double *, blasint *);
- void BLASFUNC(caxpby) (blasint *, float *, float *, blasint *, float *, float *, blasint *);
- void BLASFUNC(zaxpby) (blasint *, double *, double *, blasint *, double *, double *, blasint *);
-
- void BLASFUNC(somatcopy) (char *, char *, blasint *, blasint *, float *, float *, blasint *, float *, blasint *);
- void BLASFUNC(domatcopy) (char *, char *, blasint *, blasint *, double *, double *, blasint *, double *, blasint *);
- void BLASFUNC(comatcopy) (char *, char *, blasint *, blasint *, float *, float *, blasint *, float *, blasint *);
- void BLASFUNC(zomatcopy) (char *, char *, blasint *, blasint *, double *, double *, blasint *, double *, blasint *);
-
- void BLASFUNC(simatcopy) (char *, char *, blasint *, blasint *, float *, float *, blasint *, blasint *);
- void BLASFUNC(dimatcopy) (char *, char *, blasint *, blasint *, double *, double *, blasint *, blasint *);
- void BLASFUNC(cimatcopy) (char *, char *, blasint *, blasint *, float *, float *, blasint *, blasint *);
- void BLASFUNC(zimatcopy) (char *, char *, blasint *, blasint *, double *, double *, blasint *, blasint *);
-
- void BLASFUNC(sgeadd) (blasint *, blasint *, float *, float *, blasint *, float *, float *, blasint*);
- void BLASFUNC(dgeadd) (blasint *, blasint *, double *, double *, blasint *, double *, double *, blasint*);
- void BLASFUNC(cgeadd) (blasint *, blasint *, float *, float *, blasint *, float *, float *, blasint*);
- void BLASFUNC(zgeadd) (blasint *, blasint *, double *, double *, blasint *, double *, double *, blasint*);
-
-
- #ifdef __cplusplus
- }
-
- #endif /* __cplusplus */
-
- #endif
|
