From 16973f0c15a4327f8a78b9652f178246895778c1 Mon Sep 17 00:00:00 2001 From: julie Date: Thu, 7 Apr 2011 13:53:54 +0000 Subject: Second and hopefully last pass to homgenize notation for transpose (**T) and conjugate transpose (**H) Corresponds to bug0024 Please take a look and let me know if you find some old notation of transpose. I am going to close bug0024. Julie --- SRC/zpstf2.f | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'SRC/zpstf2.f') diff --git a/SRC/zpstf2.f b/SRC/zpstf2.f index da8c9cd7..568980b7 100644 --- a/SRC/zpstf2.f +++ b/SRC/zpstf2.f @@ -22,8 +22,8 @@ * pivoting of a complex Hermitian positive semidefinite matrix A. * * The factorization has the form -* P' * A * P = U' * U , if UPLO = 'U', -* P' * A * P = L * L', if UPLO = 'L', +* P**T * A * P = U**H * U , if UPLO = 'U', +* P**T * A * P = L * L**H, if UPLO = 'L', * where U is an upper triangular matrix and L is lower triangular, and * P is stored as vector PIV. * @@ -162,7 +162,7 @@ * IF( UPPER ) THEN * -* Compute the Cholesky factorization P' * A * P = U' * U +* Compute the Cholesky factorization P**T * A * P = U**H* U * DO 150 J = 1, N * @@ -234,7 +234,7 @@ * ELSE * -* Compute the Cholesky factorization P' * A * P = L * L' +* Compute the Cholesky factorization P**T * A * P = L * L**H * DO 180 J = 1, N * -- cgit v1.2.3