cdotcsub.f File Reference

Go to the source code of this file.


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

Function/Subroutine Documentation

◆ cdotcsub()

subroutine cdotcsub ( integer  n,
complex, dimension(*)  x,
integer  incx,
complex, dimension(*)  y,
integer  incy,
complex  dotc 

Definition at line 7 of file cdotcsub.f.

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