FUNCTION:  partitions[drank] - Dyson rank of a partition
 
CALLING SEQUENCE:  drank(ptn)
 
PARAMETERS:    ptn -  partition  (list of integers)
                   -  
 
SYNOPSIS:  
    drank(ptn) returns the Dyson rank of the partition ptn
                    
EXAMPLES:  
> with(combinat):
> with(partitions):
> ptn4:=partition(4):
> PMAT:=Matrix(5,3):
> for j from 1 to 5 do ptn:=ptn4[j]:
> PMAT[j,1]:=ptn:
> PMAT[j,2]:=drank(ptn):
> PMAT[j,3]:=modp(drank(ptn),5):
> od:
> print(PMAT);
                           [[1, 1, 1, 1]    -3    2]
                           [                       ]
                           [ [1, 1, 2]      -1    4]
                           [                       ]
                           [   [2, 2]        0    0]
                           [                       ]
                           [   [1, 3]        1    1]
                           [                       ]
                           [    [4]          3    3]

DISCUSSION:  We calculate the rank of each partition of 4
             together with the rank mod 5
                    

SEE ALSO: