Source position: cblas.pas line 424
procedure cblas_srotm(
N: SInt32;
var X: Float32;
incX: SInt32;
var Y: Float32;
incY: SInt32;
P: Float32Ptr
);