Source position: cblas.pas line 618
procedure cblas_zhpr2(
Order: CBLAS_ORDER;
Uplo: CBLAS_UPLO;
N: SInt32;
alpha: UnivPtr;
X: UnivPtr;
incX: SInt32;
Y: UnivPtr;
incY: SInt32;
Ap: UnivPtr
);