[Lapack] Similar problem in xTFSM [was Re: Out of bounds bug in Lapack 4

[Jason Riedy]

> At line 328 of file stfsm.f
> Fortran runtime error: Array reference out of bounds for array 'b', upper 
> bound of dimension 1 exceeded (1 > 0)
I'm not sure how the indexing is *supposed* to work at that
location without reading the entire routine, so if someone who
already has read it could check...

And -fbounds-check should be added to the test builds. ;)

Jason