LAPACK  3.6.1
LAPACK: Linear Algebra PACKage
void F77_dscal ( FINT  ,
const double *  ,
double *  ,
FINT   
)