LAPACK  3.6.0
LAPACK: Linear Algebra PACKage

§ check3()

subroutine check3 ( real  SFAC)