--- a/EigenLib2.def
+++ b/EigenLib2.def
@@ -301,7 +301,7 @@
           (*            on exit : the hessenberg part of array a is altered *)
           (*   n        the order of the given matrix                       *)
           (*   lambda : the given real eigenvalue of the upper hessenberg   *)
-          (*             matrix                                             *)
+          (*            matrix                                              *)
           (*   v      : the calculated eigenvector is delivered in v[1:n]   *)
           (*   Norm   : a norm of the given matrix                          *)
           (*   Toler  : the tolerance used for the eigenvector. The inverse *)
@@ -312,21 +312,21 @@
           (*            If Resid remains  larger than Norm*Tol during       *)
           (*            MaxIt iterations, the value MaxIt+1 is delivered    *)
           (*   Resid  : on exit the euclidian norm of the residue vector of *)
-          (*               the calculated eigenvector                       *)
+          (*            the calculated eigenvector                          *)
           (*                                                                *)
           (* Source: NUMAL Numerical Algol library (Stichting CWI)          *)
           (*----------------------------------------------------------------*)
 
 PROCEDURE ComVecHes(VAR a      : MATRIX;
-                         n      : INTEGER;
-                         lambda : LONGREAL;
-                         mu     : LONGREAL;
-                     VAR u,v    : VEKTOR;
-                         Norm   : LONGREAL;  (* em[1]       *)
-                         Toler  : LONGREAL;  (* em[6] = -10 *)
-                         MaxIt  : INTEGER;   (* em[8] =   5 *)
-                     VAR Iter   : INTEGER;   (* em[9]       *)
-                     VAR Resid  : LONGREAL); (* em[7]       *)
+                        n      : INTEGER;
+                        lambda : LONGREAL;
+                        mu     : LONGREAL;
+                    VAR u,v    : VEKTOR;
+                        Norm   : LONGREAL;  (* em[1]       *)
+                        Toler  : LONGREAL;  (* em[6] = -10 *)
+                        MaxIt  : INTEGER;   (* em[8] =   5 *)
+                    VAR Iter   : INTEGER;   (* em[9]       *)
+                    VAR Resid  : LONGREAL); (* em[7]       *)
 
           (*----------------------------------------------------------------*)
           (* ComVecHes calculates  an eigenvector corresponding to a given  *)