typos

diff --git a/SRC/csytri2.f b/SRC/csytri2.f
index 9078b54..9d74fe1 100644 (file)
--- a/SRC/csytri2.f
+++ b/SRC/csytri2.f
@@ -21,8 +21,8 @@
 *
 *  CSYTRI2 computes the inverse of a complex symmetric indefinite matrix
 *  A using the factorization A = U*D*U**T or A = L*D*L**T computed by
-*  CSYTRF. CSYTRI2 set the LEADING DIMENSION of the workspace
-*  before calling CSYTRI2X that actually compute the inverse.
+*  CSYTRF. CSYTRI2 sets the LEADING DIMENSION of the workspace
+*  before calling CSYTRI2X that actually computes the inverse.
 *
 *  Arguments
 *  =========

diff --git a/SRC/dsytri2.f b/SRC/dsytri2.f
index c04a0bd..ed32d54 100644 (file)
--- a/SRC/dsytri2.f
+++ b/SRC/dsytri2.f
@@ -21,8 +21,8 @@
 *
 *  DSYTRI2 computes the inverse of a real symmetric indefinite matrix
 *  A using the factorization A = U*D*U**T or A = L*D*L**T computed by
-*  DSYTRF. DSYTRI2 set the LEADING DIMENSION of the workspace
-*  before calling DSYTRI2X that actually compute the inverse.
+*  DSYTRF. DSYTRI2 sets the LEADING DIMENSION of the workspace
+*  before calling DSYTRI2X that actually computes the inverse.
 *
 *  Arguments
 *  =========

diff --git a/SRC/ssytri2.f b/SRC/ssytri2.f
index 776cfc5..21867f4 100644 (file)
--- a/SRC/ssytri2.f
+++ b/SRC/ssytri2.f
@@ -21,8 +21,8 @@
 *
 *  SSYTRI2 computes the inverse of a real symmetric indefinite matrix
 *  A using the factorization A = U*D*U**T or A = L*D*L**T computed by
-*  SSYTRF. SSYTRI2 set the LEADING DIMENSION of the workspace
-*  before calling SSYTRI2X that actually compute the inverse.
+*  SSYTRF. SSYTRI2 sets the LEADING DIMENSION of the workspace
+*  before calling SSYTRI2X that actually computes the inverse.
 *
 *  Arguments
 *  =========

diff --git a/SRC/zsytri2.f b/SRC/zsytri2.f
index 3800617..63fad25 100644 (file)
--- a/SRC/zsytri2.f
+++ b/SRC/zsytri2.f
@@ -21,8 +21,8 @@
 *
 *  ZSYTRI2 computes the inverse of a complex symmetric indefinite matrix
 *  A using the factorization A = U*D*U**T or A = L*D*L**T computed by
-*  ZSYTRF. ZSYTRI2 set the LEADING DIMENSION of the workspace
-*  before calling ZSYTRI2X that actually compute the inverse.
+*  ZSYTRF. ZSYTRI2 sets the LEADING DIMENSION of the workspace
+*  before calling ZSYTRI2X that actually computes the inverse.
 *
 *  Arguments
 *  =========