Fixed typo in blockThomas.f90