Merge pull request #1046 from wernsaar/develop
updated lapack to version 3.7.0 with latest patches from git
This commit is contained in:
Werner Saar
GitHub
commit
5bb2b91a03
|
|
@ -0,0 +1,55 @@
|
||||||
|
#!/bin/bash
|
||||||
|
|
||||||
|
while read OBJ; do
|
||||||
|
|
||||||
|
if echo "$OBJ"|grep "_$" >/dev/null
|
||||||
|
then
|
||||||
|
|
||||||
|
O1=$(echo "$OBJ"|sed -e 's/_$//' )
|
||||||
|
|
||||||
|
if grep -w "$O1" exports/gensymbol >/dev/null
|
||||||
|
then
|
||||||
|
true
|
||||||
|
else
|
||||||
|
echo "$O1"
|
||||||
|
fi
|
||||||
|
fi
|
||||||
|
|
||||||
|
if echo "$OBJ"|grep "^cblas" >/dev/null
|
||||||
|
then
|
||||||
|
|
||||||
|
if grep -w "$OBJ" exports/gensymbol >/dev/null
|
||||||
|
then
|
||||||
|
true
|
||||||
|
else
|
||||||
|
echo "$OBJ"
|
||||||
|
fi
|
||||||
|
fi
|
||||||
|
|
||||||
|
if echo "$OBJ"|grep "^LAPACKE" >/dev/null
|
||||||
|
then
|
||||||
|
|
||||||
|
if grep -w "$OBJ" exports/gensymbol >/dev/null
|
||||||
|
then
|
||||||
|
true
|
||||||
|
else
|
||||||
|
echo "$OBJ"
|
||||||
|
fi
|
||||||
|
fi
|
||||||
|
|
||||||
|
if echo "$OBJ"|grep "^lapack" >/dev/null
|
||||||
|
then
|
||||||
|
|
||||||
|
if grep -w "$OBJ" exports/gensymbol >/dev/null
|
||||||
|
then
|
||||||
|
true
|
||||||
|
else
|
||||||
|
echo "$OBJ"
|
||||||
|
fi
|
||||||
|
fi
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
done
|
||||||
|
|
||||||
|
|
@ -1,11 +1,21 @@
|
||||||
#!/usr/bin/perl
|
#!/usr/bin/perl
|
||||||
|
|
||||||
|
# Changelog
|
||||||
|
# 2017/07/01 Saar
|
||||||
|
# removed zsymv and csymv from @blasobs, because these functions
|
||||||
|
# are now in lapack-3.7.0
|
||||||
|
# added blas_thread_shutdown
|
||||||
|
# added cblas_cgemm3m and cblas_zgemm3m
|
||||||
|
# added somatcopy, simatcopy ...
|
||||||
|
# added new functions from lapack-3.7.0
|
||||||
|
# added LAPACKE deprecated objs from lapack-3.7.0
|
||||||
|
#
|
||||||
@blasobjs = (
|
@blasobjs = (
|
||||||
caxpy,ccopy,cdotc,cdotu,cgbmv,cgemm,cgemv,cgerc,cgeru,
|
caxpy,ccopy,cdotc,cdotu,cgbmv,cgemm,cgemv,cgerc,cgeru,
|
||||||
chbmv,chemm,chemv,cher2,cher2k,cher,cherk,
|
chbmv,chemm,chemv,cher2,cher2k,cher,cherk,
|
||||||
chpmv,chpr2,chpr,crotg,cscal,csrot,csscal,cswap,
|
chpmv,chpr2,chpr,crotg,cscal,csrot,csscal,cswap,
|
||||||
csymm,csyr2k,csyrk,ctbmv,ctbsv,ctpmv,ctpsv,ctrmm,ctrmv,ctrsm,
|
csymm,csyr2k,csyrk,ctbmv,ctbsv,ctpmv,ctpsv,ctrmm,ctrmv,ctrsm,
|
||||||
ctrsv, csymv,
|
ctrsv,
|
||||||
damax,damin,dasum,daxpy,dcabs1,dcopy,ddot,dgbmv,dgemm,
|
damax,damin,dasum,daxpy,dcabs1,dcopy,ddot,dgbmv,dgemm,
|
||||||
dgemv,dger,dmax,dmin,dnrm2,drot,drotg,drotm,drotmg,dsbmv,
|
dgemv,dger,dmax,dmin,dnrm2,drot,drotg,drotm,drotmg,dsbmv,
|
||||||
dscal,dsdot,dspmv,dspr2,
|
dscal,dsdot,dspmv,dspr2,
|
||||||
|
|
@ -21,10 +31,18 @@
|
||||||
zdscal,zgbmv,zgemm,zgemv,zgerc,zgeru,
|
zdscal,zgbmv,zgemm,zgemv,zgerc,zgeru,
|
||||||
zhbmv,zhemm,zhemv,zher2,zher2k,zher,zherk,zhpmv,zhpr2,
|
zhbmv,zhemm,zhemv,zher2,zher2k,zher,zherk,zhpmv,zhpr2,
|
||||||
zhpr,zrotg,zscal,zswap,zsymm,zsyr2k,zsyrk,ztbmv,
|
zhpr,zrotg,zscal,zswap,zsymm,zsyr2k,zsyrk,ztbmv,
|
||||||
ztbsv,ztpmv,ztpsv,ztrmm,ztrmv,ztrsm,ztrsv, zsymv,
|
ztbsv,ztpmv,ztpsv,ztrmm,ztrmv,ztrsm,ztrsv,
|
||||||
xerbla,
|
xerbla,
|
||||||
saxpby,daxpby,caxpby,zaxpby,
|
saxpby,daxpby,caxpby,zaxpby,
|
||||||
sgeadd,dgeadd,cgeadd,zgeadd,
|
sgeadd,dgeadd,cgeadd,zgeadd,
|
||||||
|
somatcopy,
|
||||||
|
simatcopy,
|
||||||
|
domatcopy,
|
||||||
|
dimatcopy,
|
||||||
|
comatcopy,
|
||||||
|
cimatcopy,
|
||||||
|
zomatcopy,
|
||||||
|
zimatcopy,
|
||||||
);
|
);
|
||||||
|
|
||||||
@cblasobjs = (
|
@cblasobjs = (
|
||||||
|
|
@ -80,6 +98,12 @@
|
||||||
cgemm3m,zgemm3m
|
cgemm3m,zgemm3m
|
||||||
);
|
);
|
||||||
|
|
||||||
|
@cblasgemm3mobjs = (
|
||||||
|
cblas_cgemm3m,cblas_zgemm3m
|
||||||
|
);
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
#both underscore and no underscore
|
#both underscore and no underscore
|
||||||
@misc_common_objs = (
|
@misc_common_objs = (
|
||||||
|
|
@ -96,6 +120,7 @@
|
||||||
);
|
);
|
||||||
|
|
||||||
@misc_underscore_objs = (
|
@misc_underscore_objs = (
|
||||||
|
blas_thread_shutdown,
|
||||||
);
|
);
|
||||||
|
|
||||||
@lapackobjs = (
|
@lapackobjs = (
|
||||||
|
|
@ -581,8 +606,208 @@
|
||||||
zsbmv,
|
zsbmv,
|
||||||
zspr2,
|
zspr2,
|
||||||
zsyr2,
|
zsyr2,
|
||||||
zunm22
|
zunm22,
|
||||||
|
|
||||||
|
# functions added for lapack-3.7.0
|
||||||
|
|
||||||
|
slarfy,
|
||||||
|
slasyf_rk,
|
||||||
|
ssyconvf_rook,
|
||||||
|
ssytf2_rk,
|
||||||
|
ssytrf_rk,
|
||||||
|
ssytrs_3,
|
||||||
|
ssytri_3,
|
||||||
|
ssytri_3x,
|
||||||
|
ssycon_3,
|
||||||
|
ssysv_rk,
|
||||||
|
slasyf_aa,
|
||||||
|
ssysv_aa,
|
||||||
|
ssytrf_aa,
|
||||||
|
ssytrs_aa,
|
||||||
|
strevc3,
|
||||||
|
sgelqt,
|
||||||
|
sgelqt3,
|
||||||
|
sgemlqt,
|
||||||
|
sgetsls,
|
||||||
|
sgeqr,
|
||||||
|
slatsqr,
|
||||||
|
slamtsqr,
|
||||||
|
sgemqr,
|
||||||
|
sgelq,
|
||||||
|
slaswlq,
|
||||||
|
slamswlq,
|
||||||
|
sgemlq,
|
||||||
|
stplqt,
|
||||||
|
stplqt2,
|
||||||
|
stpmlqt,
|
||||||
|
ssytrd_2stage,
|
||||||
|
ssytrd_sy2sb,
|
||||||
|
ssytrd_sb2st,
|
||||||
|
ssb2st_kernels,
|
||||||
|
ssyevd_2stage,
|
||||||
|
ssyev_2stage,
|
||||||
|
ssyevx_2stage,
|
||||||
|
ssyevr_2stage,
|
||||||
|
ssbev_2stage,
|
||||||
|
ssbevx_2stage,
|
||||||
|
ssbevd_2stage,
|
||||||
|
ssygv_2stage,
|
||||||
|
dlarfy,
|
||||||
|
dlasyf_rk,
|
||||||
|
dsyconvf,
|
||||||
|
dsyconvf_rook,
|
||||||
|
dsytf2_rk,
|
||||||
|
dsytrf_rk,
|
||||||
|
dsytrs_3,
|
||||||
|
dsytri_3,
|
||||||
|
dsytri_3x,
|
||||||
|
dsycon_3,
|
||||||
|
dsysv_rk,
|
||||||
|
dlasyf_aa,
|
||||||
|
dsysv_aa,
|
||||||
|
dsytrf_aa,
|
||||||
|
dsytrs_aa,
|
||||||
|
dtrevc3,
|
||||||
|
dgelqt,
|
||||||
|
dgelqt3,
|
||||||
|
dgemlqt,
|
||||||
|
dgetsls,
|
||||||
|
dgeqr,
|
||||||
|
dlatsqr,
|
||||||
|
dlamtsqr,
|
||||||
|
dgemqr,
|
||||||
|
dgelq,
|
||||||
|
dlaswlq,
|
||||||
|
dlamswlq,
|
||||||
|
dgemlq,
|
||||||
|
dtplqt,
|
||||||
|
dtplqt2,
|
||||||
|
dtpmlqt,
|
||||||
|
dsytrd_2stage,
|
||||||
|
dsytrd_sy2sb,
|
||||||
|
dsytrd_sb2st,
|
||||||
|
dsb2st_kernels,
|
||||||
|
dsyevd_2stage,
|
||||||
|
dsyev_2stage,
|
||||||
|
dsyevx_2stage,
|
||||||
|
dsyevr_2stage,
|
||||||
|
dsbev_2stage,
|
||||||
|
dsbevx_2stage,
|
||||||
|
dsbevd_2stage,
|
||||||
|
dsygv_2stage,
|
||||||
|
chetf2_rk,
|
||||||
|
chetrf_rk,
|
||||||
|
chetri_3,
|
||||||
|
chetri_3x,
|
||||||
|
chetrs_3,
|
||||||
|
checon_3,
|
||||||
|
chesv_rk,
|
||||||
|
chesv_aa,
|
||||||
|
chetrf_aa,
|
||||||
|
chetrs_aa,
|
||||||
|
clahef_aa,
|
||||||
|
clahef_rk,
|
||||||
|
clarfy,
|
||||||
|
clasyf_rk,
|
||||||
|
clasyf_aa,
|
||||||
|
csyconvf,
|
||||||
|
csyconvf_rook,
|
||||||
|
csytf2_rk,
|
||||||
|
csytrf_rk,
|
||||||
|
csytrf_aa,
|
||||||
|
csytrs_3,
|
||||||
|
csytrs_aa,
|
||||||
|
csytri_3,
|
||||||
|
csytri_3x,
|
||||||
|
csycon_3,
|
||||||
|
csysv_rk,
|
||||||
|
csysv_aa,
|
||||||
|
ctrevc3,
|
||||||
|
cgelqt,
|
||||||
|
cgelqt3,
|
||||||
|
cgemlqt,
|
||||||
|
cgetsls,
|
||||||
|
cgeqr,
|
||||||
|
clatsqr,
|
||||||
|
clamtsqr,
|
||||||
|
cgemqr,
|
||||||
|
cgelq,
|
||||||
|
claswlq,
|
||||||
|
clamswlq,
|
||||||
|
cgemlq,
|
||||||
|
ctplqt,
|
||||||
|
ctplqt2,
|
||||||
|
ctpmlqt,
|
||||||
|
chetrd_2stage,
|
||||||
|
chetrd_he2hb,
|
||||||
|
chetrd_hb2st,
|
||||||
|
chb2st_kernels,
|
||||||
|
cheevd_2stage,
|
||||||
|
cheev_2stage,
|
||||||
|
cheevx_2stage,
|
||||||
|
cheevr_2stage,
|
||||||
|
chbev_2stage,
|
||||||
|
chbevx_2stage,
|
||||||
|
chbevd_2stage,
|
||||||
|
chegv_2stage,
|
||||||
|
zhetf2_rk,
|
||||||
|
zhetrf_rk,
|
||||||
|
zhetri_3,
|
||||||
|
zhetri_3x,
|
||||||
|
zhetrs_3,
|
||||||
|
zhecon_3,
|
||||||
|
zhesv_rk,
|
||||||
|
zhesv_aa,
|
||||||
|
zhetrf_aa,
|
||||||
|
zhetrs_aa,
|
||||||
|
zlahef_aa,
|
||||||
|
zlahef_rk,
|
||||||
|
zlarfy,
|
||||||
|
zlasyf_rk,
|
||||||
|
zlasyf_aa,
|
||||||
|
zsyconvf,
|
||||||
|
zsyconvf_rook,
|
||||||
|
zsytrs_aa,
|
||||||
|
zsytf2_rk,
|
||||||
|
zsytrf_rk,
|
||||||
|
zsytrf_aa,
|
||||||
|
zsytrs_3,
|
||||||
|
zsytri_3,
|
||||||
|
zsytri_3x,
|
||||||
|
zsycon_3,
|
||||||
|
zsysv_rk,
|
||||||
|
zsysv_aa,
|
||||||
|
ztrevc3,
|
||||||
|
ztplqt,
|
||||||
|
ztplqt2,
|
||||||
|
ztpmlqt,
|
||||||
|
zgelqt,
|
||||||
|
zgelqt3,
|
||||||
|
zgemlqt,
|
||||||
|
zgetsls,
|
||||||
|
zgeqr,
|
||||||
|
zlatsqr,
|
||||||
|
zlamtsqr,
|
||||||
|
zgemqr,
|
||||||
|
zgelq,
|
||||||
|
zlaswlq,
|
||||||
|
zlamswlq,
|
||||||
|
zgemlq,
|
||||||
|
zhetrd_2stage,
|
||||||
|
zhetrd_he2hb,
|
||||||
|
zhetrd_hb2st,
|
||||||
|
zhb2st_kernels,
|
||||||
|
zheevd_2stage,
|
||||||
|
zheev_2stage,
|
||||||
|
zheevx_2stage,
|
||||||
|
zheevr_2stage,
|
||||||
|
zhbev_2stage,
|
||||||
|
zhbevx_2stage,
|
||||||
|
zhbevd_2stage,
|
||||||
|
zhegv_2stage,
|
||||||
|
sladiv1,
|
||||||
|
dladiv1,
|
||||||
|
iparam2stage,
|
||||||
);
|
);
|
||||||
|
|
||||||
@lapack_extendedprecision_objs = (
|
@lapack_extendedprecision_objs = (
|
||||||
|
|
@ -597,6 +822,36 @@
|
||||||
cgeqpf, clatzm, dgelsx, dlahrd, sgegv, sggsvp, zgegs, zggsvd, ztzrqf,
|
cgeqpf, clatzm, dgelsx, dlahrd, sgegv, sggsvp, zgegs, zggsvd, ztzrqf,
|
||||||
);
|
);
|
||||||
|
|
||||||
|
@lapacke_deprecated_objs = (
|
||||||
|
|
||||||
|
LAPACKE_cggsvp,
|
||||||
|
LAPACKE_cggsvp_work,
|
||||||
|
LAPACKE_dggsvp,
|
||||||
|
LAPACKE_dggsvp_work,
|
||||||
|
LAPACKE_sggsvp,
|
||||||
|
LAPACKE_sggsvp_work,
|
||||||
|
LAPACKE_zggsvp,
|
||||||
|
LAPACKE_zggsvp_work,
|
||||||
|
LAPACKE_cggsvd,
|
||||||
|
LAPACKE_cggsvd_work,
|
||||||
|
LAPACKE_dggsvd,
|
||||||
|
LAPACKE_dggsvd_work,
|
||||||
|
LAPACKE_sggsvd,
|
||||||
|
LAPACKE_sggsvd_work,
|
||||||
|
LAPACKE_zggsvd,
|
||||||
|
LAPACKE_zggsvd_work,
|
||||||
|
LAPACKE_cgeqpf,
|
||||||
|
LAPACKE_cgeqpf_work,
|
||||||
|
LAPACKE_dgeqpf,
|
||||||
|
LAPACKE_dgeqpf_work,
|
||||||
|
LAPACKE_sgeqpf,
|
||||||
|
LAPACKE_sgeqpf_work,
|
||||||
|
LAPACKE_zgeqpf,
|
||||||
|
LAPACKE_zgeqpf_work,
|
||||||
|
|
||||||
|
);
|
||||||
|
|
||||||
|
|
||||||
@lapackeobjs = (
|
@lapackeobjs = (
|
||||||
# LAPACK C interface routines.
|
# LAPACK C interface routines.
|
||||||
#
|
#
|
||||||
|
|
@ -2948,7 +3203,186 @@
|
||||||
LAPACKE_zsytrs_rook,
|
LAPACKE_zsytrs_rook,
|
||||||
LAPACKE_zsytrs_rook_work,
|
LAPACKE_zsytrs_rook_work,
|
||||||
LAPACKE_zuncsd2by1,
|
LAPACKE_zuncsd2by1,
|
||||||
LAPACKE_zuncsd2by1_work
|
LAPACKE_zuncsd2by1_work,
|
||||||
|
|
||||||
|
## new function from lapack-3.7.0
|
||||||
|
|
||||||
|
LAPACKE_cgemqr,
|
||||||
|
LAPACKE_cgemqr_work,
|
||||||
|
LAPACKE_cgetsls,
|
||||||
|
LAPACKE_cgetsls_work,
|
||||||
|
LAPACKE_chbev_2stage,
|
||||||
|
LAPACKE_chbev_2stage_work,
|
||||||
|
LAPACKE_chbevd_2stage,
|
||||||
|
LAPACKE_chbevd_2stage_work,
|
||||||
|
LAPACKE_chbevx_2stage,
|
||||||
|
LAPACKE_chbevx_2stage_work,
|
||||||
|
LAPACKE_checon_3,
|
||||||
|
LAPACKE_checon_3_work,
|
||||||
|
LAPACKE_cheev_2stage,
|
||||||
|
LAPACKE_cheev_2stage_work,
|
||||||
|
LAPACKE_cheevd_2stage,
|
||||||
|
LAPACKE_cheevd_2stage_work,
|
||||||
|
LAPACKE_cheevr_2stage,
|
||||||
|
LAPACKE_cheevr_2stage_work,
|
||||||
|
LAPACKE_cheevx_2stage,
|
||||||
|
LAPACKE_cheevx_2stage_work,
|
||||||
|
LAPACKE_chegv_2stage,
|
||||||
|
LAPACKE_chegv_2stage_work,
|
||||||
|
LAPACKE_chesv_aa,
|
||||||
|
LAPACKE_chesv_aa_work,
|
||||||
|
LAPACKE_chesv_rk,
|
||||||
|
LAPACKE_chesv_rk_work,
|
||||||
|
LAPACKE_chetrf_aa,
|
||||||
|
LAPACKE_chetrf_aa_work,
|
||||||
|
LAPACKE_chetrf_rk,
|
||||||
|
LAPACKE_chetrf_rk_work,
|
||||||
|
LAPACKE_chetri_3,
|
||||||
|
LAPACKE_chetri_3_work,
|
||||||
|
LAPACKE_chetrs_aa,
|
||||||
|
LAPACKE_chetrs_aa_work,
|
||||||
|
LAPACKE_chetrs_3,
|
||||||
|
LAPACKE_chetrs_3_work,
|
||||||
|
LAPACKE_csycon_3,
|
||||||
|
LAPACKE_csycon_3_work,
|
||||||
|
LAPACKE_csysv_aa,
|
||||||
|
LAPACKE_csysv_aa_work,
|
||||||
|
LAPACKE_csysv_rk,
|
||||||
|
LAPACKE_csysv_rk_work,
|
||||||
|
LAPACKE_csytrf_aa,
|
||||||
|
LAPACKE_csytrf_aa_work,
|
||||||
|
LAPACKE_csytrf_rk,
|
||||||
|
LAPACKE_csytrf_rk_work,
|
||||||
|
LAPACKE_csytri_3,
|
||||||
|
LAPACKE_csytri_3_work,
|
||||||
|
LAPACKE_csytrs_aa,
|
||||||
|
LAPACKE_csytrs_aa_work,
|
||||||
|
LAPACKE_csytrs_3,
|
||||||
|
LAPACKE_csytrs_3_work,
|
||||||
|
LAPACKE_dgemqr,
|
||||||
|
LAPACKE_dgemqr_work,
|
||||||
|
LAPACKE_dgetsls,
|
||||||
|
LAPACKE_dgetsls_work,
|
||||||
|
LAPACKE_dsbev_2stage,
|
||||||
|
LAPACKE_dsbev_2stage_work,
|
||||||
|
LAPACKE_dsbevd_2stage,
|
||||||
|
LAPACKE_dsbevd_2stage_work,
|
||||||
|
LAPACKE_dsbevx_2stage,
|
||||||
|
LAPACKE_dsbevx_2stage_work,
|
||||||
|
LAPACKE_dsycon_3,
|
||||||
|
LAPACKE_dsycon_3_work,
|
||||||
|
LAPACKE_dsyev_2stage,
|
||||||
|
LAPACKE_dsyev_2stage_work,
|
||||||
|
LAPACKE_dsyevd_2stage,
|
||||||
|
LAPACKE_dsyevd_2stage_work,
|
||||||
|
LAPACKE_dsyevr_2stage,
|
||||||
|
LAPACKE_dsyevr_2stage_work,
|
||||||
|
LAPACKE_dsyevx_2stage,
|
||||||
|
LAPACKE_dsyevx_2stage_work,
|
||||||
|
LAPACKE_dsygv_2stage,
|
||||||
|
LAPACKE_dsygv_2stage_work,
|
||||||
|
LAPACKE_dsysv_aa,
|
||||||
|
LAPACKE_dsysv_aa_work,
|
||||||
|
LAPACKE_dsysv_rk,
|
||||||
|
LAPACKE_dsysv_rk_work,
|
||||||
|
LAPACKE_dsytrf_aa,
|
||||||
|
LAPACKE_dsytrf_aa_work,
|
||||||
|
LAPACKE_dsytrf_rk,
|
||||||
|
LAPACKE_dsytrf_rk_work,
|
||||||
|
LAPACKE_dsytri_3,
|
||||||
|
LAPACKE_dsytri_3_work,
|
||||||
|
LAPACKE_dsytrs_aa,
|
||||||
|
LAPACKE_dsytrs_aa_work,
|
||||||
|
LAPACKE_dsytrs_3,
|
||||||
|
LAPACKE_dsytrs_3_work,
|
||||||
|
LAPACKE_sgemqr,
|
||||||
|
LAPACKE_sgemqr_work,
|
||||||
|
LAPACKE_sgetsls,
|
||||||
|
LAPACKE_sgetsls_work,
|
||||||
|
LAPACKE_ssbev_2stage,
|
||||||
|
LAPACKE_ssbev_2stage_work,
|
||||||
|
LAPACKE_ssbevd_2stage,
|
||||||
|
LAPACKE_ssbevd_2stage_work,
|
||||||
|
LAPACKE_ssbevx_2stage,
|
||||||
|
LAPACKE_ssbevx_2stage_work,
|
||||||
|
LAPACKE_ssycon_3,
|
||||||
|
LAPACKE_ssycon_3_work,
|
||||||
|
LAPACKE_ssyev_2stage,
|
||||||
|
LAPACKE_ssyev_2stage_work,
|
||||||
|
LAPACKE_ssyevd_2stage,
|
||||||
|
LAPACKE_ssyevd_2stage_work,
|
||||||
|
LAPACKE_ssyevr_2stage,
|
||||||
|
LAPACKE_ssyevr_2stage_work,
|
||||||
|
LAPACKE_ssyevx_2stage,
|
||||||
|
LAPACKE_ssyevx_2stage_work,
|
||||||
|
LAPACKE_ssygv_2stage,
|
||||||
|
LAPACKE_ssygv_2stage_work,
|
||||||
|
LAPACKE_ssysv_aa,
|
||||||
|
LAPACKE_ssysv_aa_work,
|
||||||
|
LAPACKE_ssysv_rk,
|
||||||
|
LAPACKE_ssysv_rk_work,
|
||||||
|
LAPACKE_ssytrf_aa,
|
||||||
|
LAPACKE_ssytrf_aa_work,
|
||||||
|
LAPACKE_ssytrf_rk,
|
||||||
|
LAPACKE_ssytrf_rk_work,
|
||||||
|
LAPACKE_ssytri_3,
|
||||||
|
LAPACKE_ssytri_3_work,
|
||||||
|
LAPACKE_ssytrs_aa,
|
||||||
|
LAPACKE_ssytrs_aa_work,
|
||||||
|
LAPACKE_ssytrs_3,
|
||||||
|
LAPACKE_ssytrs_3_work,
|
||||||
|
LAPACKE_zgemqr,
|
||||||
|
LAPACKE_zgemqr_work,
|
||||||
|
LAPACKE_zgetsls,
|
||||||
|
LAPACKE_zgetsls_work,
|
||||||
|
LAPACKE_zhbev_2stage,
|
||||||
|
LAPACKE_zhbev_2stage_work,
|
||||||
|
LAPACKE_zhbevd_2stage,
|
||||||
|
LAPACKE_zhbevd_2stage_work,
|
||||||
|
LAPACKE_zhbevx_2stage,
|
||||||
|
LAPACKE_zhbevx_2stage_work,
|
||||||
|
LAPACKE_zhecon_3,
|
||||||
|
LAPACKE_zhecon_3_work,
|
||||||
|
LAPACKE_zheev_2stage,
|
||||||
|
LAPACKE_zheev_2stage_work,
|
||||||
|
LAPACKE_zheevd_2stage,
|
||||||
|
LAPACKE_zheevd_2stage_work,
|
||||||
|
LAPACKE_zheevr_2stage,
|
||||||
|
LAPACKE_zheevr_2stage_work,
|
||||||
|
LAPACKE_zheevx_2stage,
|
||||||
|
LAPACKE_zheevx_2stage_work,
|
||||||
|
LAPACKE_zhegv_2stage,
|
||||||
|
LAPACKE_zhegv_2stage_work,
|
||||||
|
LAPACKE_zhesv_aa,
|
||||||
|
LAPACKE_zhesv_aa_work,
|
||||||
|
LAPACKE_zhesv_rk,
|
||||||
|
LAPACKE_zhesv_rk_work,
|
||||||
|
LAPACKE_zhetrf_aa,
|
||||||
|
LAPACKE_zhetrf_aa_work,
|
||||||
|
LAPACKE_zhetrf_rk,
|
||||||
|
LAPACKE_zhetrf_rk_work,
|
||||||
|
LAPACKE_zhetri_3,
|
||||||
|
LAPACKE_zhetri_3_work,
|
||||||
|
LAPACKE_zhetrs_aa,
|
||||||
|
LAPACKE_zhetrs_aa_work,
|
||||||
|
LAPACKE_zhetrs_3,
|
||||||
|
LAPACKE_zhetrs_3_work,
|
||||||
|
LAPACKE_zsycon_3,
|
||||||
|
LAPACKE_zsycon_3_work,
|
||||||
|
LAPACKE_zsysv_aa,
|
||||||
|
LAPACKE_zsysv_aa_work,
|
||||||
|
LAPACKE_zsysv_rk,
|
||||||
|
LAPACKE_zsysv_rk_work,
|
||||||
|
LAPACKE_zsytrf_aa,
|
||||||
|
LAPACKE_zsytrf_aa_work,
|
||||||
|
LAPACKE_zsytrf_rk,
|
||||||
|
LAPACKE_zsytrf_rk_work,
|
||||||
|
LAPACKE_zsytri_3,
|
||||||
|
LAPACKE_zsytri_3_work,
|
||||||
|
LAPACKE_zsytrs_aa,
|
||||||
|
LAPACKE_zsytrs_aa_work,
|
||||||
|
LAPACKE_zsytrs_3,
|
||||||
|
LAPACKE_zsytrs_3_work,
|
||||||
);
|
);
|
||||||
|
|
||||||
#These function may need 2 underscores.
|
#These function may need 2 underscores.
|
||||||
|
|
@ -3026,7 +3460,12 @@ if ($ARGV[6] == 1) {
|
||||||
#NO_LAPACKE=1
|
#NO_LAPACKE=1
|
||||||
@no_underscore_objs = (@no_underscore_objs);
|
@no_underscore_objs = (@no_underscore_objs);
|
||||||
} else {
|
} else {
|
||||||
@no_underscore_objs = (@no_underscore_objs, @lapackeobjs);
|
if ($ARGV[11] == 1){
|
||||||
|
#BUILD_LAPACK_DEPRECATED=1
|
||||||
|
@no_underscore_objs = (@no_underscore_objs, @lapackeobjs, @lapacke_deprecated_objs);
|
||||||
|
}else{
|
||||||
|
@no_underscore_objs = (@no_underscore_objs, @lapackeobjs);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
@hplobjs = (daxpy, dcopy, dscal, idamax, dgemv, dtrsv, dger, dgemm, dtrsm);
|
@hplobjs = (daxpy, dcopy, dscal, idamax, dgemv, dtrsv, dger, dgemm, dtrsm);
|
||||||
|
|
|
||||||
|
|
@ -84,10 +84,10 @@ CBLAS1OBJS = \
|
||||||
|
|
||||||
CBLAS2OBJS = \
|
CBLAS2OBJS = \
|
||||||
cgemv.$(SUFFIX) cgeru.$(SUFFIX) cgerc.$(SUFFIX) \
|
cgemv.$(SUFFIX) cgeru.$(SUFFIX) cgerc.$(SUFFIX) \
|
||||||
ctrsv.$(SUFFIX) ctrmv.$(SUFFIX) csymv.$(SUFFIX) \
|
ctrsv.$(SUFFIX) ctrmv.$(SUFFIX) \
|
||||||
csyr.$(SUFFIX) csyr2.$(SUFFIX) cgbmv.$(SUFFIX) \
|
csyr2.$(SUFFIX) cgbmv.$(SUFFIX) \
|
||||||
csbmv.$(SUFFIX) cspmv.$(SUFFIX) \
|
csbmv.$(SUFFIX) \
|
||||||
cspr.$(SUFFIX) cspr2.$(SUFFIX) \
|
cspr2.$(SUFFIX) \
|
||||||
ctbsv.$(SUFFIX) ctbmv.$(SUFFIX) \
|
ctbsv.$(SUFFIX) ctbmv.$(SUFFIX) \
|
||||||
ctpsv.$(SUFFIX) ctpmv.$(SUFFIX) \
|
ctpsv.$(SUFFIX) ctpmv.$(SUFFIX) \
|
||||||
chemv.$(SUFFIX) chbmv.$(SUFFIX) \
|
chemv.$(SUFFIX) chbmv.$(SUFFIX) \
|
||||||
|
|
@ -113,10 +113,10 @@ ZBLAS1OBJS = \
|
||||||
|
|
||||||
ZBLAS2OBJS = \
|
ZBLAS2OBJS = \
|
||||||
zgemv.$(SUFFIX) zgeru.$(SUFFIX) zgerc.$(SUFFIX) \
|
zgemv.$(SUFFIX) zgeru.$(SUFFIX) zgerc.$(SUFFIX) \
|
||||||
ztrsv.$(SUFFIX) ztrmv.$(SUFFIX) zsymv.$(SUFFIX) \
|
ztrsv.$(SUFFIX) ztrmv.$(SUFFIX) \
|
||||||
zsyr.$(SUFFIX) zsyr2.$(SUFFIX) zgbmv.$(SUFFIX) \
|
zsyr2.$(SUFFIX) zgbmv.$(SUFFIX) \
|
||||||
zsbmv.$(SUFFIX) zspmv.$(SUFFIX) \
|
zsbmv.$(SUFFIX) \
|
||||||
zspr.$(SUFFIX) zspr2.$(SUFFIX) \
|
zspr2.$(SUFFIX) \
|
||||||
ztbsv.$(SUFFIX) ztbmv.$(SUFFIX) \
|
ztbsv.$(SUFFIX) ztbmv.$(SUFFIX) \
|
||||||
ztpsv.$(SUFFIX) ztpmv.$(SUFFIX) \
|
ztpsv.$(SUFFIX) ztpmv.$(SUFFIX) \
|
||||||
zhemv.$(SUFFIX) zhbmv.$(SUFFIX) \
|
zhemv.$(SUFFIX) zhbmv.$(SUFFIX) \
|
||||||
|
|
|
||||||
|
|
@ -1,19 +0,0 @@
|
||||||
========================================================================================
|
|
||||||
2014/05/07 Saar
|
|
||||||
|
|
||||||
Platform: BULLDOZER single thread
|
|
||||||
|
|
||||||
|
|
||||||
--> LAPACK TESTING SUMMARY <--
|
|
||||||
Processing LAPACK Testing output found in the TESTING direcory
|
|
||||||
SUMMARY nb test run numerical error other error
|
|
||||||
================ =========== ================= ================
|
|
||||||
REAL 1079349 0 (0.000%) 0 (0.000%)
|
|
||||||
DOUBLE PRECISION 1080161 0 (0.000%) 0 (0.000%)
|
|
||||||
COMPLEX 556022 0 (0.000%) 0 (0.000%)
|
|
||||||
COMPLEX16 556834 0 (0.000%) 0 (0.000%)
|
|
||||||
|
|
||||||
--> ALL PRECISIONS 3272366 0 (0.000%) 0 (0.000%)
|
|
||||||
|
|
||||||
========================================================================================
|
|
||||||
|
|
||||||
|
|
@ -1,8 +1,8 @@
|
||||||
add_subdirectory(SRC)
|
add_subdirectory(SRC)
|
||||||
if(BUILD_TESTING)
|
if(BUILD_TESTING)
|
||||||
add_subdirectory(TESTING)
|
add_subdirectory(TESTING)
|
||||||
endif(BUILD_TESTING)
|
endif()
|
||||||
configure_file(${CMAKE_CURRENT_SOURCE_DIR}/blas.pc.in ${CMAKE_CURRENT_BINARY_DIR}/blas.pc)
|
configure_file(${CMAKE_CURRENT_SOURCE_DIR}/blas.pc.in ${CMAKE_CURRENT_BINARY_DIR}/blas.pc @ONLY)
|
||||||
install(FILES
|
install(FILES
|
||||||
${CMAKE_CURRENT_BINARY_DIR}/blas.pc
|
${CMAKE_CURRENT_BINARY_DIR}/blas.pc
|
||||||
DESTINATION ${PKG_CONFIG_DIR}
|
DESTINATION ${PKG_CONFIG_DIR}
|
||||||
|
|
|
||||||
|
|
@ -69,7 +69,7 @@ set(DBLAS1 idamax.f dasum.f daxpy.f dcopy.f ddot.f dnrm2.f
|
||||||
set(ZBLAS1 dcabs1.f dzasum.f dznrm2.f izamax.f zaxpy.f zcopy.f
|
set(ZBLAS1 dcabs1.f dzasum.f dznrm2.f izamax.f zaxpy.f zcopy.f
|
||||||
zdotc.f zdotu.f zdscal.f zrotg.f zscal.f zswap.f zdrot.f)
|
zdotc.f zdotu.f zdscal.f zrotg.f zscal.f zswap.f zdrot.f)
|
||||||
|
|
||||||
set(CB1AUX isamax.f sasum.f saxpy.f scopy.f snrm2.f sscal.f)
|
set(CB1AUX isamax.f sasum.f saxpy.f scopy.f snrm2.f sscal.f)
|
||||||
|
|
||||||
set(ZB1AUX idamax.f dasum.f daxpy.f dcopy.f dnrm2.f dscal.f)
|
set(ZB1AUX idamax.f dasum.f daxpy.f dcopy.f dnrm2.f dscal.f)
|
||||||
|
|
||||||
|
|
@ -78,7 +78,7 @@ set(ZB1AUX idamax.f dasum.f daxpy.f dcopy.f dnrm2.f dscal.f)
|
||||||
# Level 2 and Level 3 BLAS. Comment it out only if you already have
|
# Level 2 and Level 3 BLAS. Comment it out only if you already have
|
||||||
# both the Level 2 and 3 BLAS.
|
# both the Level 2 and 3 BLAS.
|
||||||
#---------------------------------------------------------------------
|
#---------------------------------------------------------------------
|
||||||
set(ALLBLAS lsame.f xerbla.f xerbla_array.f)
|
set(ALLBLAS lsame.f xerbla.f xerbla_array.f)
|
||||||
|
|
||||||
#---------------------------------------------------------
|
#---------------------------------------------------------
|
||||||
# Comment out the next 4 definitions if you already have
|
# Comment out the next 4 definitions if you already have
|
||||||
|
|
@ -104,7 +104,7 @@ set(ZBLAS2 zgemv.f zgbmv.f zhemv.f zhbmv.f zhpmv.f
|
||||||
# Comment out the next 4 definitions if you already have
|
# Comment out the next 4 definitions if you already have
|
||||||
# the Level 3 BLAS.
|
# the Level 3 BLAS.
|
||||||
#---------------------------------------------------------
|
#---------------------------------------------------------
|
||||||
set(SBLAS3 sgemm.f ssymm.f ssyrk.f ssyr2k.f strmm.f strsm.f )
|
set(SBLAS3 sgemm.f ssymm.f ssyrk.f ssyr2k.f strmm.f strsm.f)
|
||||||
|
|
||||||
set(CBLAS3 cgemm.f csymm.f csyrk.f csyr2k.f ctrmm.f ctrsm.f
|
set(CBLAS3 cgemm.f csymm.f csyrk.f csyr2k.f ctrmm.f ctrsm.f
|
||||||
chemm.f cherk.f cher2k.f)
|
chemm.f cherk.f cher2k.f)
|
||||||
|
|
@ -127,11 +127,11 @@ if(BLAS_DOUBLE)
|
||||||
${DBLAS2} ${DBLAS3})
|
${DBLAS2} ${DBLAS3})
|
||||||
endif()
|
endif()
|
||||||
if(BLAS_COMPLEX)
|
if(BLAS_COMPLEX)
|
||||||
set(ALLOBJ ${BLASLIB} ${CBLAS1} ${CB1AUX}
|
set(ALLOBJ ${BLASLIB} ${CBLAS1} ${CB1AUX}
|
||||||
${ALLBLAS} ${CBLAS2})
|
${ALLBLAS} ${CBLAS2})
|
||||||
endif()
|
endif()
|
||||||
if(BLAS_COMPLEX16)
|
if(BLAS_COMPLEX16)
|
||||||
set(ALLOBJ ${BLASLIB} ${ZBLAS1} ${ZB1AUX}
|
set(ALLOBJ ${BLASLIB} ${ZBLAS1} ${ZB1AUX}
|
||||||
${ALLBLAS} ${ZBLAS2} ${ZBLAS3})
|
${ALLBLAS} ${ZBLAS2} ${ZBLAS3})
|
||||||
endif()
|
endif()
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -88,8 +88,8 @@ $(ZB1AUX): $(FRC)
|
||||||
# Level 2 and Level 3 BLAS. Comment it out only if you already have
|
# Level 2 and Level 3 BLAS. Comment it out only if you already have
|
||||||
# both the Level 2 and 3 BLAS.
|
# both the Level 2 and 3 BLAS.
|
||||||
#---------------------------------------------------------------------
|
#---------------------------------------------------------------------
|
||||||
ALLBLAS = lsame.o xerbla.o xerbla_array.o
|
ALLBLAS = lsame.o xerbla.o xerbla_array.o
|
||||||
$(ALLBLAS) : $(FRC)
|
$(ALLBLAS): $(FRC)
|
||||||
|
|
||||||
#---------------------------------------------------------
|
#---------------------------------------------------------
|
||||||
# Comment out the next 4 definitions if you already have
|
# Comment out the next 4 definitions if you already have
|
||||||
|
|
@ -133,7 +133,7 @@ ZBLAS3 = zgemm.o zsymm.o zsyrk.o zsyr2k.o ztrmm.o ztrsm.o \
|
||||||
zhemm.o zherk.o zher2k.o
|
zhemm.o zherk.o zher2k.o
|
||||||
$(ZBLAS3): $(FRC)
|
$(ZBLAS3): $(FRC)
|
||||||
|
|
||||||
ALLOBJ=$(SBLAS1) $(SBLAS2) $(SBLAS3) $(DBLAS1) $(DBLAS2) $(DBLAS3) \
|
ALLOBJ = $(SBLAS1) $(SBLAS2) $(SBLAS3) $(DBLAS1) $(DBLAS2) $(DBLAS3) \
|
||||||
$(CBLAS1) $(CBLAS2) $(CBLAS3) $(ZBLAS1) \
|
$(CBLAS1) $(CBLAS2) $(CBLAS3) $(ZBLAS1) \
|
||||||
$(ZBLAS2) $(ZBLAS3) $(ALLBLAS)
|
$(ZBLAS2) $(ZBLAS3) $(ALLBLAS)
|
||||||
|
|
||||||
|
|
@ -168,4 +168,4 @@ clean:
|
||||||
rm -f *.o
|
rm -f *.o
|
||||||
|
|
||||||
.f.o:
|
.f.o:
|
||||||
$(FORTRAN) $(OPTS) -c $< -o $@
|
$(FORTRAN) $(OPTS) -c -o $@ $<
|
||||||
|
|
|
||||||
|
|
@ -35,7 +35,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level1
|
*> \ingroup complex_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -51,10 +51,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CAXPY(N,CA,CX,INCX,CY,INCY)
|
SUBROUTINE CAXPY(N,CA,CX,INCX,CY,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX CA
|
COMPLEX CA
|
||||||
|
|
|
||||||
|
|
@ -34,7 +34,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level1
|
*> \ingroup complex_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -50,10 +50,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CCOPY(N,CX,INCX,CY,INCY)
|
SUBROUTINE CCOPY(N,CX,INCX,CY,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,INCY,N
|
INTEGER INCX,INCY,N
|
||||||
|
|
|
||||||
|
|
@ -36,7 +36,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level1
|
*> \ingroup complex_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -52,10 +52,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
COMPLEX FUNCTION CDOTC(N,CX,INCX,CY,INCY)
|
COMPLEX FUNCTION CDOTC(N,CX,INCX,CY,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.6.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,INCY,N
|
INTEGER INCX,INCY,N
|
||||||
|
|
|
||||||
|
|
@ -36,7 +36,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level1
|
*> \ingroup complex_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -52,10 +52,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
COMPLEX FUNCTION CDOTU(N,CX,INCX,CY,INCY)
|
COMPLEX FUNCTION CDOTU(N,CX,INCX,CY,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.6.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,INCY,N
|
INTEGER INCX,INCY,N
|
||||||
|
|
|
||||||
|
|
@ -165,7 +165,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -187,10 +187,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CGBMV(TRANS,M,N,KL,KU,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
SUBROUTINE CGBMV(TRANS,M,N,KL,KU,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.6.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA,BETA
|
COMPLEX ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -166,7 +166,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level3
|
*> \ingroup complex_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -187,10 +187,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CGEMM(TRANSA,TRANSB,M,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
SUBROUTINE CGEMM(TRANSA,TRANSB,M,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.6.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA,BETA
|
COMPLEX ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -136,7 +136,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -158,10 +158,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CGEMV(TRANS,M,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
SUBROUTINE CGEMV(TRANS,M,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.6.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA,BETA
|
COMPLEX ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -109,7 +109,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -130,10 +130,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CGERC(M,N,ALPHA,X,INCX,Y,INCY,A,LDA)
|
SUBROUTINE CGERC(M,N,ALPHA,X,INCX,Y,INCY,A,LDA)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA
|
COMPLEX ALPHA
|
||||||
|
|
|
||||||
|
|
@ -109,7 +109,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -130,10 +130,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CGERU(M,N,ALPHA,X,INCX,Y,INCY,A,LDA)
|
SUBROUTINE CGERU(M,N,ALPHA,X,INCX,Y,INCY,A,LDA)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA
|
COMPLEX ALPHA
|
||||||
|
|
|
||||||
|
|
@ -165,7 +165,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -187,10 +187,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CHBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
SUBROUTINE CHBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA,BETA
|
COMPLEX ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -170,7 +170,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level3
|
*> \ingroup complex_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -191,10 +191,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CHEMM(SIDE,UPLO,M,N,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
SUBROUTINE CHEMM(SIDE,UPLO,M,N,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.4.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA,BETA
|
COMPLEX ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -132,7 +132,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -154,10 +154,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CHEMV(UPLO,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
SUBROUTINE CHEMV(UPLO,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA,BETA
|
COMPLEX ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -114,7 +114,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -135,10 +135,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CHER(UPLO,N,ALPHA,X,INCX,A,LDA)
|
SUBROUTINE CHER(UPLO,N,ALPHA,X,INCX,A,LDA)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
REAL ALPHA
|
REAL ALPHA
|
||||||
|
|
|
||||||
|
|
@ -129,7 +129,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -150,10 +150,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CHER2(UPLO,N,ALPHA,X,INCX,Y,INCY,A,LDA)
|
SUBROUTINE CHER2(UPLO,N,ALPHA,X,INCX,Y,INCY,A,LDA)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA
|
COMPLEX ALPHA
|
||||||
|
|
|
||||||
|
|
@ -173,7 +173,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level3
|
*> \ingroup complex_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -197,10 +197,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CHER2K(UPLO,TRANS,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
SUBROUTINE CHER2K(UPLO,TRANS,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.4.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA
|
COMPLEX ALPHA
|
||||||
|
|
|
||||||
|
|
@ -149,7 +149,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level3
|
*> \ingroup complex_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -173,10 +173,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CHERK(UPLO,TRANS,N,K,ALPHA,A,LDA,BETA,C,LDC)
|
SUBROUTINE CHERK(UPLO,TRANS,N,K,ALPHA,A,LDA,BETA,C,LDC)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.4.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
REAL ALPHA,BETA
|
REAL ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -127,7 +127,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -149,10 +149,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CHPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY)
|
SUBROUTINE CHPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA,BETA
|
COMPLEX ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -109,7 +109,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -130,10 +130,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CHPR(UPLO,N,ALPHA,X,INCX,AP)
|
SUBROUTINE CHPR(UPLO,N,ALPHA,X,INCX,AP)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
REAL ALPHA
|
REAL ALPHA
|
||||||
|
|
|
||||||
|
|
@ -124,7 +124,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -145,10 +145,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CHPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP)
|
SUBROUTINE CHPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA
|
COMPLEX ALPHA
|
||||||
|
|
|
||||||
|
|
@ -32,17 +32,17 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level1
|
*> \ingroup complex_blas_level1
|
||||||
*
|
*
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CROTG(CA,CB,C,S)
|
SUBROUTINE CROTG(CA,CB,C,S)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX CA,CB,S
|
COMPLEX CA,CB,S
|
||||||
|
|
|
||||||
|
|
@ -35,7 +35,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level1
|
*> \ingroup complex_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -52,10 +52,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CSCAL(N,CA,CX,INCX)
|
SUBROUTINE CSCAL(N,CA,CX,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX CA
|
COMPLEX CA
|
||||||
|
|
|
||||||
|
|
@ -91,17 +91,17 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level1
|
*> \ingroup complex_blas_level1
|
||||||
*
|
*
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CSROT( N, CX, INCX, CY, INCY, C, S )
|
SUBROUTINE CSROT( N, CX, INCX, CY, INCY, C, S )
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX, INCY, N
|
INTEGER INCX, INCY, N
|
||||||
|
|
|
||||||
|
|
@ -35,7 +35,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level1
|
*> \ingroup complex_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -52,10 +52,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CSSCAL(N,SA,CX,INCX)
|
SUBROUTINE CSSCAL(N,SA,CX,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
REAL SA
|
REAL SA
|
||||||
|
|
|
||||||
|
|
@ -34,7 +34,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level1
|
*> \ingroup complex_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -50,10 +50,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CSWAP(N,CX,INCX,CY,INCY)
|
SUBROUTINE CSWAP(N,CX,INCX,CY,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,INCY,N
|
INTEGER INCX,INCY,N
|
||||||
|
|
|
||||||
|
|
@ -168,7 +168,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level3
|
*> \ingroup complex_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -189,10 +189,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CSYMM(SIDE,UPLO,M,N,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
SUBROUTINE CSYMM(SIDE,UPLO,M,N,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.4.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA,BETA
|
COMPLEX ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -167,7 +167,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level3
|
*> \ingroup complex_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -188,10 +188,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CSYR2K(UPLO,TRANS,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
SUBROUTINE CSYR2K(UPLO,TRANS,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.4.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA,BETA
|
COMPLEX ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -146,7 +146,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level3
|
*> \ingroup complex_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -167,10 +167,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CSYRK(UPLO,TRANS,N,K,ALPHA,A,LDA,BETA,C,LDC)
|
SUBROUTINE CSYRK(UPLO,TRANS,N,K,ALPHA,A,LDA,BETA,C,LDC)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.4.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA,BETA
|
COMPLEX ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -146,7 +146,7 @@
|
||||||
*> ( 1 + ( n - 1 )*abs( INCX ) ).
|
*> ( 1 + ( n - 1 )*abs( INCX ) ).
|
||||||
*> Before entry, the incremented array X must contain the n
|
*> Before entry, the incremented array X must contain the n
|
||||||
*> element vector x. On exit, X is overwritten with the
|
*> element vector x. On exit, X is overwritten with the
|
||||||
*> tranformed vector x.
|
*> transformed vector x.
|
||||||
*> \endverbatim
|
*> \endverbatim
|
||||||
*>
|
*>
|
||||||
*> \param[in] INCX
|
*> \param[in] INCX
|
||||||
|
|
@ -164,7 +164,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -186,10 +186,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CTBMV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX)
|
SUBROUTINE CTBMV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,K,LDA,N
|
INTEGER INCX,K,LDA,N
|
||||||
|
|
|
||||||
|
|
@ -168,7 +168,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -189,10 +189,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CTBSV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX)
|
SUBROUTINE CTBSV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,K,LDA,N
|
INTEGER INCX,K,LDA,N
|
||||||
|
|
|
||||||
|
|
@ -102,7 +102,7 @@
|
||||||
*> ( 1 + ( n - 1 )*abs( INCX ) ).
|
*> ( 1 + ( n - 1 )*abs( INCX ) ).
|
||||||
*> Before entry, the incremented array X must contain the n
|
*> Before entry, the incremented array X must contain the n
|
||||||
*> element vector x. On exit, X is overwritten with the
|
*> element vector x. On exit, X is overwritten with the
|
||||||
*> tranformed vector x.
|
*> transformed vector x.
|
||||||
*> \endverbatim
|
*> \endverbatim
|
||||||
*>
|
*>
|
||||||
*> \param[in] INCX
|
*> \param[in] INCX
|
||||||
|
|
@ -120,7 +120,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -142,10 +142,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CTPMV(UPLO,TRANS,DIAG,N,AP,X,INCX)
|
SUBROUTINE CTPMV(UPLO,TRANS,DIAG,N,AP,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -123,7 +123,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -144,10 +144,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CTPSV(UPLO,TRANS,DIAG,N,AP,X,INCX)
|
SUBROUTINE CTPSV(UPLO,TRANS,DIAG,N,AP,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -156,7 +156,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level3
|
*> \ingroup complex_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -177,10 +177,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CTRMM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB)
|
SUBROUTINE CTRMM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.4.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA
|
COMPLEX ALPHA
|
||||||
|
|
|
||||||
|
|
@ -107,7 +107,7 @@
|
||||||
*> ( 1 + ( n - 1 )*abs( INCX ) ).
|
*> ( 1 + ( n - 1 )*abs( INCX ) ).
|
||||||
*> Before entry, the incremented array X must contain the n
|
*> Before entry, the incremented array X must contain the n
|
||||||
*> element vector x. On exit, X is overwritten with the
|
*> element vector x. On exit, X is overwritten with the
|
||||||
*> tranformed vector x.
|
*> transformed vector x.
|
||||||
*> \endverbatim
|
*> \endverbatim
|
||||||
*>
|
*>
|
||||||
*> \param[in] INCX
|
*> \param[in] INCX
|
||||||
|
|
@ -125,7 +125,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -147,10 +147,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CTRMV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX)
|
SUBROUTINE CTRMV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,LDA,N
|
INTEGER INCX,LDA,N
|
||||||
|
|
|
||||||
|
|
@ -159,7 +159,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level3
|
*> \ingroup complex_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -180,10 +180,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CTRSM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB)
|
SUBROUTINE CTRSM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.4.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX ALPHA
|
COMPLEX ALPHA
|
||||||
|
|
|
||||||
|
|
@ -128,7 +128,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup complex_blas_level2
|
*> \ingroup complex_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -149,10 +149,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE CTRSV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX)
|
SUBROUTINE CTRSV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,LDA,N
|
INTEGER INCX,LDA,N
|
||||||
|
|
|
||||||
|
|
@ -34,7 +34,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -51,10 +51,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
DOUBLE PRECISION FUNCTION DASUM(N,DX,INCX)
|
DOUBLE PRECISION FUNCTION DASUM(N,DX,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -36,7 +36,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -52,10 +52,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DAXPY(N,DA,DX,INCX,DY,INCY)
|
SUBROUTINE DAXPY(N,DA,DX,INCX,DY,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION DA
|
DOUBLE PRECISION DA
|
||||||
|
|
|
||||||
|
|
@ -32,17 +32,17 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
DOUBLE PRECISION FUNCTION DCABS1(Z)
|
DOUBLE PRECISION FUNCTION DCABS1(Z)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.6.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX*16 Z
|
COMPLEX*16 Z
|
||||||
|
|
|
||||||
|
|
@ -35,7 +35,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -51,10 +51,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DCOPY(N,DX,INCX,DY,INCY)
|
SUBROUTINE DCOPY(N,DX,INCX,DY,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,INCY,N
|
INTEGER INCX,INCY,N
|
||||||
|
|
|
||||||
|
|
@ -35,7 +35,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -51,10 +51,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
DOUBLE PRECISION FUNCTION DDOT(N,DX,INCX,DY,INCY)
|
DOUBLE PRECISION FUNCTION DDOT(N,DX,INCX,DY,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,INCY,N
|
INTEGER INCX,INCY,N
|
||||||
|
|
|
||||||
|
|
@ -163,7 +163,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -185,10 +185,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DGBMV(TRANS,M,N,KL,KU,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
SUBROUTINE DGBMV(TRANS,M,N,KL,KU,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.6.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA,BETA
|
DOUBLE PRECISION ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -166,7 +166,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level3
|
*> \ingroup double_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -187,10 +187,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DGEMM(TRANSA,TRANSB,M,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
SUBROUTINE DGEMM(TRANSA,TRANSB,M,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.6.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA,BETA
|
DOUBLE PRECISION ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -134,7 +134,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -156,10 +156,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DGEMV(TRANS,M,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
SUBROUTINE DGEMV(TRANS,M,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.6.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA,BETA
|
DOUBLE PRECISION ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -109,7 +109,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -130,10 +130,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DGER(M,N,ALPHA,X,INCX,Y,INCY,A,LDA)
|
SUBROUTINE DGER(M,N,ALPHA,X,INCX,Y,INCY,A,LDA)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA
|
DOUBLE PRECISION ALPHA
|
||||||
|
|
|
||||||
|
|
@ -37,7 +37,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -54,10 +54,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
DOUBLE PRECISION FUNCTION DNRM2(N,X,INCX)
|
DOUBLE PRECISION FUNCTION DNRM2(N,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -35,7 +35,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -51,10 +51,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DROT(N,DX,INCX,DY,INCY,C,S)
|
SUBROUTINE DROT(N,DX,INCX,DY,INCY,C,S)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION C,S
|
DOUBLE PRECISION C,S
|
||||||
|
|
|
||||||
|
|
@ -31,7 +31,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -46,10 +46,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DROTG(DA,DB,C,S)
|
SUBROUTINE DROTG(DA,DB,C,S)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION C,DA,DB,S
|
DOUBLE PRECISION C,DA,DB,S
|
||||||
|
|
|
||||||
|
|
@ -91,17 +91,17 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DROTM(N,DX,INCX,DY,INCY,DPARAM)
|
SUBROUTINE DROTM(N,DX,INCX,DY,INCY,DPARAM)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,INCY,N
|
INTEGER INCX,INCY,N
|
||||||
|
|
|
||||||
|
|
@ -83,17 +83,17 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DROTMG(DD1,DD2,DX1,DY1,DPARAM)
|
SUBROUTINE DROTMG(DD1,DD2,DX1,DY1,DPARAM)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION DD1,DD2,DX1,DY1
|
DOUBLE PRECISION DD1,DD2,DX1,DY1
|
||||||
|
|
|
||||||
|
|
@ -162,7 +162,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -184,10 +184,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DSBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
SUBROUTINE DSBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA,BETA
|
DOUBLE PRECISION ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -36,7 +36,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -53,10 +53,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DSCAL(N,DA,DX,INCX)
|
SUBROUTINE DSCAL(N,DA,DX,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION DA
|
DOUBLE PRECISION DA
|
||||||
|
|
|
||||||
|
|
@ -84,7 +84,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -119,10 +119,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
DOUBLE PRECISION FUNCTION DSDOT(N,SX,INCX,SY,INCY)
|
DOUBLE PRECISION FUNCTION DSDOT(N,SX,INCX,SY,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,INCY,N
|
INTEGER INCX,INCY,N
|
||||||
|
|
|
||||||
|
|
@ -125,7 +125,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -147,10 +147,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DSPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY)
|
SUBROUTINE DSPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA,BETA
|
DOUBLE PRECISION ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -106,7 +106,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -127,10 +127,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DSPR(UPLO,N,ALPHA,X,INCX,AP)
|
SUBROUTINE DSPR(UPLO,N,ALPHA,X,INCX,AP)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA
|
DOUBLE PRECISION ALPHA
|
||||||
|
|
|
||||||
|
|
@ -121,7 +121,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -142,10 +142,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DSPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP)
|
SUBROUTINE DSPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA
|
DOUBLE PRECISION ALPHA
|
||||||
|
|
|
||||||
|
|
@ -35,7 +35,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -51,10 +51,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DSWAP(N,DX,INCX,DY,INCY)
|
SUBROUTINE DSWAP(N,DX,INCX,DY,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,INCY,N
|
INTEGER INCX,INCY,N
|
||||||
|
|
|
||||||
|
|
@ -168,7 +168,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level3
|
*> \ingroup double_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -189,10 +189,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DSYMM(SIDE,UPLO,M,N,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
SUBROUTINE DSYMM(SIDE,UPLO,M,N,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.4.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA,BETA
|
DOUBLE PRECISION ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -130,7 +130,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -152,10 +152,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DSYMV(UPLO,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
SUBROUTINE DSYMV(UPLO,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA,BETA
|
DOUBLE PRECISION ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -111,7 +111,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -132,10 +132,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DSYR(UPLO,N,ALPHA,X,INCX,A,LDA)
|
SUBROUTINE DSYR(UPLO,N,ALPHA,X,INCX,A,LDA)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA
|
DOUBLE PRECISION ALPHA
|
||||||
|
|
|
||||||
|
|
@ -126,7 +126,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -147,10 +147,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DSYR2(UPLO,N,ALPHA,X,INCX,Y,INCY,A,LDA)
|
SUBROUTINE DSYR2(UPLO,N,ALPHA,X,INCX,Y,INCY,A,LDA)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA
|
DOUBLE PRECISION ALPHA
|
||||||
|
|
|
||||||
|
|
@ -170,7 +170,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level3
|
*> \ingroup double_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -192,10 +192,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DSYR2K(UPLO,TRANS,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
SUBROUTINE DSYR2K(UPLO,TRANS,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.4.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA,BETA
|
DOUBLE PRECISION ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -148,7 +148,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level3
|
*> \ingroup double_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -169,10 +169,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DSYRK(UPLO,TRANS,N,K,ALPHA,A,LDA,BETA,C,LDC)
|
SUBROUTINE DSYRK(UPLO,TRANS,N,K,ALPHA,A,LDA,BETA,C,LDC)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.4.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA,BETA
|
DOUBLE PRECISION ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -146,7 +146,7 @@
|
||||||
*> ( 1 + ( n - 1 )*abs( INCX ) ).
|
*> ( 1 + ( n - 1 )*abs( INCX ) ).
|
||||||
*> Before entry, the incremented array X must contain the n
|
*> Before entry, the incremented array X must contain the n
|
||||||
*> element vector x. On exit, X is overwritten with the
|
*> element vector x. On exit, X is overwritten with the
|
||||||
*> tranformed vector x.
|
*> transformed vector x.
|
||||||
*> \endverbatim
|
*> \endverbatim
|
||||||
*>
|
*>
|
||||||
*> \param[in] INCX
|
*> \param[in] INCX
|
||||||
|
|
@ -164,7 +164,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -186,10 +186,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DTBMV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX)
|
SUBROUTINE DTBMV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,K,LDA,N
|
INTEGER INCX,K,LDA,N
|
||||||
|
|
|
||||||
|
|
@ -168,7 +168,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -189,10 +189,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DTBSV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX)
|
SUBROUTINE DTBSV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,K,LDA,N
|
INTEGER INCX,K,LDA,N
|
||||||
|
|
|
||||||
|
|
@ -102,7 +102,7 @@
|
||||||
*> ( 1 + ( n - 1 )*abs( INCX ) ).
|
*> ( 1 + ( n - 1 )*abs( INCX ) ).
|
||||||
*> Before entry, the incremented array X must contain the n
|
*> Before entry, the incremented array X must contain the n
|
||||||
*> element vector x. On exit, X is overwritten with the
|
*> element vector x. On exit, X is overwritten with the
|
||||||
*> tranformed vector x.
|
*> transformed vector x.
|
||||||
*> \endverbatim
|
*> \endverbatim
|
||||||
*>
|
*>
|
||||||
*> \param[in] INCX
|
*> \param[in] INCX
|
||||||
|
|
@ -120,7 +120,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -142,10 +142,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DTPMV(UPLO,TRANS,DIAG,N,AP,X,INCX)
|
SUBROUTINE DTPMV(UPLO,TRANS,DIAG,N,AP,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -123,7 +123,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -144,10 +144,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DTPSV(UPLO,TRANS,DIAG,N,AP,X,INCX)
|
SUBROUTINE DTPSV(UPLO,TRANS,DIAG,N,AP,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -156,7 +156,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level3
|
*> \ingroup double_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -177,10 +177,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DTRMM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB)
|
SUBROUTINE DTRMM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.4.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA
|
DOUBLE PRECISION ALPHA
|
||||||
|
|
|
||||||
|
|
@ -107,7 +107,7 @@
|
||||||
*> ( 1 + ( n - 1 )*abs( INCX ) ).
|
*> ( 1 + ( n - 1 )*abs( INCX ) ).
|
||||||
*> Before entry, the incremented array X must contain the n
|
*> Before entry, the incremented array X must contain the n
|
||||||
*> element vector x. On exit, X is overwritten with the
|
*> element vector x. On exit, X is overwritten with the
|
||||||
*> tranformed vector x.
|
*> transformed vector x.
|
||||||
*> \endverbatim
|
*> \endverbatim
|
||||||
*>
|
*>
|
||||||
*> \param[in] INCX
|
*> \param[in] INCX
|
||||||
|
|
@ -125,7 +125,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level2
|
*> \ingroup double_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -147,10 +147,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DTRMV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX)
|
SUBROUTINE DTRMV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,LDA,N
|
INTEGER INCX,LDA,N
|
||||||
|
|
|
||||||
|
|
@ -159,7 +159,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level3
|
*> \ingroup double_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -181,10 +181,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DTRSM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB)
|
SUBROUTINE DTRSM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.4.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
DOUBLE PRECISION ALPHA
|
DOUBLE PRECISION ALPHA
|
||||||
|
|
|
||||||
|
|
@ -136,17 +136,17 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE DTRSV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX)
|
SUBROUTINE DTRSV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,LDA,N
|
INTEGER INCX,LDA,N
|
||||||
|
|
|
||||||
|
|
@ -35,7 +35,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -52,10 +52,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
DOUBLE PRECISION FUNCTION DZASUM(N,ZX,INCX)
|
DOUBLE PRECISION FUNCTION DZASUM(N,ZX,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.6.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -37,7 +37,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup double_blas_level1
|
*> \ingroup double_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -54,10 +54,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
DOUBLE PRECISION FUNCTION DZNRM2(N,X,INCX)
|
DOUBLE PRECISION FUNCTION DZNRM2(N,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -34,7 +34,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup aux_blas
|
*> \ingroup aux_blas
|
||||||
*
|
*
|
||||||
|
|
@ -51,10 +51,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
INTEGER FUNCTION ICAMAX(N,CX,INCX)
|
INTEGER FUNCTION ICAMAX(N,CX,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.6.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -34,7 +34,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup aux_blas
|
*> \ingroup aux_blas
|
||||||
*
|
*
|
||||||
|
|
@ -51,10 +51,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
INTEGER FUNCTION IDAMAX(N,DX,INCX)
|
INTEGER FUNCTION IDAMAX(N,DX,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.6.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -34,7 +34,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup aux_blas
|
*> \ingroup aux_blas
|
||||||
*
|
*
|
||||||
|
|
@ -51,10 +51,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
INTEGER FUNCTION ISAMAX(N,SX,INCX)
|
INTEGER FUNCTION ISAMAX(N,SX,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.6.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -34,7 +34,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup aux_blas
|
*> \ingroup aux_blas
|
||||||
*
|
*
|
||||||
|
|
@ -51,10 +51,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
INTEGER FUNCTION IZAMAX(N,ZX,INCX)
|
INTEGER FUNCTION IZAMAX(N,ZX,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.6.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -46,7 +46,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup aux_blas
|
*> \ingroup aux_blas
|
||||||
*
|
*
|
||||||
|
|
@ -56,7 +56,7 @@
|
||||||
* -- Reference BLAS level1 routine (version 3.1) --
|
* -- Reference BLAS level1 routine (version 3.1) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
CHARACTER CA,CB
|
CHARACTER CA,CB
|
||||||
|
|
|
||||||
|
|
@ -35,7 +35,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level1
|
*> \ingroup single_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -52,10 +52,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
REAL FUNCTION SASUM(N,SX,INCX)
|
REAL FUNCTION SASUM(N,SX,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -36,7 +36,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level1
|
*> \ingroup single_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -52,10 +52,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE SAXPY(N,SA,SX,INCX,SY,INCY)
|
SUBROUTINE SAXPY(N,SA,SX,INCX,SY,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
REAL SA
|
REAL SA
|
||||||
|
|
|
||||||
|
|
@ -31,17 +31,17 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level1
|
*> \ingroup single_blas_level1
|
||||||
*
|
*
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
REAL FUNCTION SCABS1(Z)
|
REAL FUNCTION SCABS1(Z)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.6.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
COMPLEX Z
|
COMPLEX Z
|
||||||
|
|
|
||||||
|
|
@ -35,7 +35,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level1
|
*> \ingroup single_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -52,10 +52,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
REAL FUNCTION SCASUM(N,CX,INCX)
|
REAL FUNCTION SCASUM(N,CX,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.6.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -37,7 +37,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level1
|
*> \ingroup single_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -54,10 +54,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
REAL FUNCTION SCNRM2(N,X,INCX)
|
REAL FUNCTION SCNRM2(N,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -35,7 +35,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level1
|
*> \ingroup single_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -51,10 +51,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE SCOPY(N,SX,INCX,SY,INCY)
|
SUBROUTINE SCOPY(N,SX,INCX,SY,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,INCY,N
|
INTEGER INCX,INCY,N
|
||||||
|
|
|
||||||
|
|
@ -35,7 +35,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level1
|
*> \ingroup single_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -51,10 +51,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
REAL FUNCTION SDOT(N,SX,INCX,SY,INCY)
|
REAL FUNCTION SDOT(N,SX,INCX,SY,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,INCY,N
|
INTEGER INCX,INCY,N
|
||||||
|
|
|
||||||
|
|
@ -133,17 +133,17 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level1
|
*> \ingroup single_blas_level1
|
||||||
*
|
*
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
REAL FUNCTION SDSDOT(N,SB,SX,INCX,SY,INCY)
|
REAL FUNCTION SDSDOT(N,SB,SX,INCX,SY,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
REAL SB
|
REAL SB
|
||||||
|
|
|
||||||
|
|
@ -163,7 +163,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level2
|
*> \ingroup single_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -185,10 +185,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE SGBMV(TRANS,M,N,KL,KU,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
SUBROUTINE SGBMV(TRANS,M,N,KL,KU,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.6.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
REAL ALPHA,BETA
|
REAL ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -166,7 +166,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level3
|
*> \ingroup single_blas_level3
|
||||||
*
|
*
|
||||||
|
|
@ -187,10 +187,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE SGEMM(TRANSA,TRANSB,M,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
SUBROUTINE SGEMM(TRANSA,TRANSB,M,N,K,ALPHA,A,LDA,B,LDB,BETA,C,LDC)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level3 routine (version 3.6.0) --
|
* -- Reference BLAS level3 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
REAL ALPHA,BETA
|
REAL ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -134,7 +134,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2015
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level2
|
*> \ingroup single_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -156,10 +156,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE SGEMV(TRANS,M,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
SUBROUTINE SGEMV(TRANS,M,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.6.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2015
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
REAL ALPHA,BETA
|
REAL ALPHA,BETA
|
||||||
|
|
|
||||||
|
|
@ -109,7 +109,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level2
|
*> \ingroup single_blas_level2
|
||||||
*
|
*
|
||||||
|
|
@ -130,10 +130,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE SGER(M,N,ALPHA,X,INCX,Y,INCY,A,LDA)
|
SUBROUTINE SGER(M,N,ALPHA,X,INCX,Y,INCY,A,LDA)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level2 routine (version 3.4.0) --
|
* -- Reference BLAS level2 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
REAL ALPHA
|
REAL ALPHA
|
||||||
|
|
|
||||||
|
|
@ -37,7 +37,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level1
|
*> \ingroup single_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -54,10 +54,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
REAL FUNCTION SNRM2(N,X,INCX)
|
REAL FUNCTION SNRM2(N,X,INCX)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,N
|
INTEGER INCX,N
|
||||||
|
|
|
||||||
|
|
@ -35,7 +35,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level1
|
*> \ingroup single_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -51,10 +51,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE SROT(N,SX,INCX,SY,INCY,C,S)
|
SUBROUTINE SROT(N,SX,INCX,SY,INCY,C,S)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
REAL C,S
|
REAL C,S
|
||||||
|
|
|
||||||
|
|
@ -31,7 +31,7 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level1
|
*> \ingroup single_blas_level1
|
||||||
*
|
*
|
||||||
|
|
@ -46,10 +46,10 @@
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE SROTG(SA,SB,C,S)
|
SUBROUTINE SROTG(SA,SB,C,S)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
REAL C,S,SA,SB
|
REAL C,S,SA,SB
|
||||||
|
|
|
||||||
|
|
@ -92,17 +92,17 @@
|
||||||
*> \author Univ. of Colorado Denver
|
*> \author Univ. of Colorado Denver
|
||||||
*> \author NAG Ltd.
|
*> \author NAG Ltd.
|
||||||
*
|
*
|
||||||
*> \date November 2011
|
*> \date December 2016
|
||||||
*
|
*
|
||||||
*> \ingroup single_blas_level1
|
*> \ingroup single_blas_level1
|
||||||
*
|
*
|
||||||
* =====================================================================
|
* =====================================================================
|
||||||
SUBROUTINE SROTM(N,SX,INCX,SY,INCY,SPARAM)
|
SUBROUTINE SROTM(N,SX,INCX,SY,INCY,SPARAM)
|
||||||
*
|
*
|
||||||
* -- Reference BLAS level1 routine (version 3.4.0) --
|
* -- Reference BLAS level1 routine (version 3.7.0) --
|
||||||
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
* -- Reference BLAS is a software package provided by Univ. of Tennessee, --
|
||||||
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
|
||||||
* November 2011
|
* December 2016
|
||||||
*
|
*
|
||||||
* .. Scalar Arguments ..
|
* .. Scalar Arguments ..
|
||||||
INTEGER INCX,INCY,N
|
INTEGER INCX,INCY,N
|
||||||
|
|
|
||||||
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue