ZDRSCL − 使用實數量 1/a 乘一個 n 維復向量
SUBROUTINE ZDRSCL( |
N, SA, SX, INCX ) |
|||
INTEGER |
INCX, N |
|||
DOUBLE |
PRECISION SA |
|||
COMPLEX*16 |
SX( * ) |
ZDRSCL 使實數量 1/a 與 n 維復向量相乘。只要最終結果 x/a 不會上溢或下溢,那麼這個函數也不會。
N (輸入) 整型
向量 x 的分量個數
SA (輸入) 雙精度
數量 a,用來除 x 的每個分量。SA 必須大於0,否則這個子過程將除以零
SX (輸入/輸出)
16個復數的陣列 (COMPLEX*16
array),dimension
(1+(N-1)*abs(INCX)) The n-element vector x.
INCX (輸入) 整型
向量 SX 連續值間的步進 > 0: SX(1) = X(1) 且 SX(1+(i-1)*INCX) = x(i), 1< i<= n
bbbush <bbbush AT 163 DOT com>
不會翻譯這些非常專業的 manl 文件,看樣子不會繼續了
2003.11.22
http://cmpp.linuxforum.net