OSchip
/
OpenBLAS
Not watched
1
0
Fork 0
Code
Releases 66 Wiki evaluate Activity
Issues 0 Pull Requests 0 Datasets Model Cloudbrain HPC
You can not select more than 25 topics Topics must start with a chinese character,a letter or number, can include dashes ('-') and can be up to 35 characters long.
3502 Commits
51 Branches
78 MB
0 Download
Tree: 3d1e36d4cb
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '3d1e36d4cb'
${ noResults }
OpenBLAS/lapack-netlib/CBLAS/src/scasumsub.f

scasumsub.f 299 B
Raw Normal View History

added lapack-3.6.0
10 years ago
​
​
​
​
​
​
​
​
​
​
​
​
​
​
 123456789101112131415 
  1. c     scasumsub.f

  2. c

  3. c     The program is a fortran wrapper for scasum.

  4. c     Witten by Keita Teranishi.  2/11/1998

  5. c

  6.       subroutine scasumsub(n,x,incx,asum)

  7. c

  8.       external scasum

  9.       real scasum,asum

  10.       integer n,incx

  11.       complex x(*)

  12. c

  13.       asum=scasum(n,x,incx)

  14.       return

  15.       end

OpenBLAS is an optimized BLAS library based on GotoBLAS2 1.13 BSD version.