FUNCTION: BnPalin2Code - code corresponding to a palindromic permutation

CALLING SEQUENCE:

BnPalin2Code(palin)

BN[BnPalin2Code](palin)

PARAMETERS:

palin = any list denoting a palindromic permutation

SYNOPSIS:

• The BnPalin2Code function calculates the code corresponding to a palindromic permutation. The code belongs to B(n) if the permutation belongs to the symmetric group of degree 2*n.

• Whenever there is a conflict between the function name BnPalin2Code and another name used in the same session, use the long form BN['BnPalin2Code'].

EXAMPLES:

> with(BN):
> BnPalin2Code([4, 2, 6, 1, 5, 3]);
 
                                  [1, 1, 3]