blas,lapack: clean up docs and comments

Apply (with manual curation after the fact):
* s/^T/U+1d40/g
* s/^H/U+1d34/g
* s/, {2,3}if / $1/g

Some additional manual editing of odd formatting.

lapack/testlapack/dlatbs.go

@@ -105,7 +105,7 @@ func dlatbsTest(t *testing.T, impl Dlatbser, rnd *rand.Rand, kind int, uplo blas
 }
 
 // dlatbsResidual returns the residual for the solution to a scaled triangular
-// system of equations  A*x = s*b  or  A^T*x = s*b  when A is an n×n triangular
+// system of equations  A*x = s*b  or  Aᵀ*x = s*b  when A is an n×n triangular
 // band matrix with kd super- or sub-diagonals. The residual is computed as
 //  norm( op(A)*x - scale*b ) / ( norm(op(A)) * norm(x) ).
 //