LAPACK  3.7.0
LAPACK: Linear Algebra PACKage
#define F77_srotmg   F77_GLOBAL(srotmg,SROTMG)