Make Permanent an attribute

gap-system · May 4, 2016 · 766b8ef · 766b8ef
1 parent e6e6633
commit 766b8ef
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 2 deletions.
diff --git a/lib/combinat.gd b/lib/combinat.gd
@@ -1487,7 +1487,7 @@ DeclareGlobalFunction("Bernoulli");
 ##  </ManSection>
 ##  <#/GAPDoc>
 ##
-DeclareGlobalFunction("Permanent");
+DeclareAttribute("Permanent", IsMatrix);
 
 
 #############################################################################

diff --git a/lib/combinat.gi b/lib/combinat.gi
@@ -1344,7 +1344,10 @@ Permanent2 := function ( mat, m, n, r, v, i, sum )
 end;
 MakeReadOnlyGlobal( "Permanent2" );
 
-InstallGlobalFunction(Permanent,function ( mat )
+InstallMethod(Permanent,
+   "for matrices",
+   [ IsMatrix ],
+function ( mat )
     local m, n;
 
     m := Length(mat);