LAPACK  3.7.0
LAPACK: Linear Algebra PACKage
void F77_s2chke ( char *  rout)