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

16 lines
320 B
Raw Blame History 

  1. c     cdotcsub.f

  2. c

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

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

  5. c

  6.       subroutine cdotcsub(n,x,incx,y,incy,dotc)

  7. c

  8.       external cdotc

  9.       complex cdotc,dotc

  10.       integer n,incx,incy

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

  12. c

  13.       dotc=cdotc(n,x,incx,y,incy)

  14.       return

  15.       end