Switch to side-by-side view
--- a/EigenLib1.def +++ b/EigenLib1.def @@ -610,7 +610,7 @@ PROCEDURE Reduce1(VAR A,B : ARRAY OF ARRAY OF LONGREAL; VAR dL : ARRAY OF LONGREAL; - dim : CARDINAL; (* n in origianl *) + dim : CARDINAL; (* n in original *) transB : BOOLEAN); (* FALSE instead of dim < 0 *) (*-----------------------------------------------------------------*)