Source position: cblas.pas line 612
procedure cblas_zher(
Order: CBLAS_ORDER;
Uplo: CBLAS_UPLO;
N: SInt32;
alpha: Float64;
X: UnivPtr;
incX: SInt32;
A: UnivPtr;
lda: SInt32
);