Mercurial > octave-nkf

diff scripts/elfun/lcm.m @ 2325:b5568c31ee2c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1996-07-15 22:20:21 by jwe]
author jwe
date Mon, 15 Jul 1996 22:20:21 +0000
parents 5ca126254d15
children 3723512a827a
line wrap: on
line diff
--- a/scripts/elfun/lcm.m	Mon Jul 15 21:29:24 1996 +0000
+++ b/scripts/elfun/lcm.m	Mon Jul 15 22:20:21 1996 +0000
@@ -34,11 +34,11 @@
       a = [a, (va_arg ())];
     endfor
   endif
-  
+
   if (round (a) != a)
     error ("lcm:  all arguments must be integer");
   endif
-  
+
   if (any (a) == 0)
     l = 0;
   else
@@ -48,6 +48,5 @@
       l = l * a(k+1) / gcd (l, a(k+1));
     endfor
   endif
-    
+
 endfunction
-    
\ No newline at end of file