--- a/inst/@galois/roots.m
+++ b/inst/@galois/roots.m
@@ -40,15 +40,15 @@
     print_usage ();
   endif
 
-  if (!isgalois(v))
-    error("roots: argument must be a galois variable");
+  if (!isgalois (v))
+    error ("roots: argument must be a galois variable");
   endif
 
   if (min (size (v)) > 1 || nargin != 1)
     print_usage ();
   endif
 
-  v = reshape (v, 1, length(v));
+  v = reshape (v, 1, length (v));
   m = v.m;
   prim_poly = v.prim_poly;
   n = 2^m - 1;
@@ -57,9 +57,9 @@
   t = 0;
   r = [];
 
-  while ((t <= n)  && (length(poly) > 1))
-    [npoly, nrem] = deconv(poly,gf([1,t],m,prim_poly));
-    if (any(nrem))
+  while ((t <= n)  && (length (poly) > 1))
+    [npoly, nrem] = deconv (poly, gf ([1, t], m, prim_poly));
+    if (any (nrem))
       t = t + 1;
     else
       nr = nr + 1;
@@ -68,6 +68,6 @@
     endif
   endwhile
 
-  r = gf(r,m,prim_poly);
+  r = gf (r, m, prim_poly);
 
 endfunction