LAPACK  3.7.0
LAPACK: Linear Algebra PACKage
#define F77_srot   F77_GLOBAL(srot,SROT)