polynomials: fix lcm() regression after add4ffc0 and 8fdb54 31/19531/2
Clément DAVID [Fri, 10 Nov 2017 12:55:45 +0000 (13:55 +0100)]
Change-Id: I2bead561d51e737a44189d75bdad61d9006adf48

scilab/modules/polynomials/macros/lcm.sci

index 3ee7e52..b7a5828 100644 (file)
@@ -77,7 +77,7 @@ function [q, fact] = %i_lcm(p)
 
     q = p(1);
     for k = 2:size(p,"*")
-        q = q / %i_gcd([q,p(k)]) * p(k);
+        q = q / gcd([q,p(k)]) * p(k);
     end
     fact = q ./ p;
 endfunction