LAPACK  3.6.0
LAPACK: Linear Algebra PACKage

§ check1()

subroutine check1 ( double precision  SFAC)