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

16 lines
326 B
Raw Blame History 

  1. c     sdsdotsub.f

  2. c

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

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

  5. c

  6.       subroutine sdsdotsub(n,sb,x,incx,y,incy,dot)

  7. c

  8.       external sdsdot

  9.       real sb,sdsdot,dot

  10.       integer n,incx,incy

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

  12. c

  13.       dot=sdsdot(n,sb,x,incx,y,incy)

  14.       return

  15.       end