Permutations/Rank of a permutation: Difference between revisions

m
 
Line 463:
return f
.
func[] getpermperm n r .
perm[] = init n
fa = fac n
Line 477:
return r[]
.
func getrankrank n p[] .
perm[] = init n
fa = fac n
Line 496:
proc show . .
for i = 0 to 5
h[] = getpermperm 3 i
print i & " -> " & h[] & " -> " & getrankrank 3 h[]
.
print ""
Line 503:
r = random fac 12 - 1
write r & " -> "
h[] = getpermperm 12 r
write h[]
print " -> " & getrankrank 12 h[]
.
.
2,083

edits