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.
Tree: 49202228d7
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '49202228d7'
${ noResults }
OpenBLAS/lapack-netlib/CBLAS/src/cdotusub.f

16 lines
320 B
Raw Blame History 

  1. c     cdotusub.f

  2. c

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

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

  5. c

  6.       subroutine cdotusub(n,x,incx,y,incy,dotu)

  7. c

  8.       external cdotu

  9.       complex cdotu,dotu

  10.       integer n,incx,incy

  11.       complex x(*),y(*)

  12. c

  13.       dotu=cdotu(n,x,incx,y,incy)

  14.       return

  15.       end