计算两个向量的内积,使用扩展精度累加和结果。返回 D.P. 点积,在 D.P. 中累加,对于 S.P. SX 和 SY SDOT = 从 I = 0 到 N-1 的 SX(LX+I*INCX) * SY(LY+I*INCY) 的总和,其中 LX = 1 如果 INCX >= 0,否则 LX = 1+(1-N)*INCX,LY 的定义方式类似,使用 INCY。
类型 | 意图 | 可选 | 属性 | 名称 | ||
---|---|---|---|---|---|---|
integer(kind=ilp), | intent(in) | :: | n | |||
real(kind=sp), | intent(in) | :: | sx(*) | |||
integer(kind=ilp), | intent(in) | :: | incx | |||
real(kind=sp), | intent(in) | :: | sy(*) | |||
integer(kind=ilp), | intent(in) | :: | incy |
计算两个向量的内积,使用扩展精度累加和结果。返回 D.P. 点积,在 D.P. 中累加,对于 S.P. SX 和 SY DSDOT = 从 I = 0 到 N-1 的 SX(LX+I*INCX) * SY(LY+I*INCY) 的总和,其中 LX = 1 如果 INCX >= 0,否则 LX = 1+(1-N)*INCX,LY 的定义方式类似,使用 INCY。
类型 | 意图 | 可选 | 属性 | 名称 | ||
---|---|---|---|---|---|---|
integer(kind=ilp), | intent(in) | :: | n | |||
real(kind=sp), | intent(in) | :: | sx(*) | |||
integer(kind=ilp), | intent(in) | :: | incx | |||
real(kind=sp), | intent(in) | :: | sy(*) | |||
integer(kind=ilp), | intent(in) | :: | incy |