diff scripts/linear-algebra/trace.m @ 2314:949ab8eba8bc

[project @ 1996-07-12 03:58:02 by jwe]
author jwe
date Fri, 12 Jul 1996 03:58:02 +0000
parents 5ca126254d15
children 8b262e771614
line wrap: on
line diff
--- a/scripts/linear-algebra/trace.m
+++ b/scripts/linear-algebra/trace.m
@@ -21,6 +21,8 @@
 ##
 ## Returns the trace (the sum of the diagonal elements) of x.
 
+## Author: jwe
+
 function y = trace (x)
 
   if (nargin != 1)