sdsdot Interface
interface
public pure function sdsdot(n, sb, sx, incx, sy, incy)
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | n | |||
| real(kind=wp), | intent(in) | :: | sb | |||
| real(kind=wp), | intent(in) | :: | sx(*) | |||
| integer, | intent(in) | :: | incx | |||
| real(kind=wp), | intent(in) | :: | sy(*) | |||
| integer, | intent(in) | :: | incy |
Return Value real(kind=wp)
Description
Compute the inner product of two vectors with extended precision accumulation.
Returns S.P. result with dot product accumulated in D.P. SDSDOT = SB + sum for I = 0 to N-1 of SX(LX+IINCX)SY(LY+IINCY), where LX = 1 if INCX .GE. 0, else LX = 1+(1-N)INCX, and LY is defined in a similar way using INCY.