.f">  *> [ZIP]</a>  *> <a href="http://www.netlib.org/cgi-bin/netlibfiles.txt?format=txt&filename=/lapack/lapack_routine/sladiv.f">  *> [TXT]</a> *> \endhtmlonly  * *  Definition: *  =========== * *       SUBROUTINE S