Combinatorica`
Combinatorica`

InvolutionQ

InvolutionQ[p]

yields True if permutation p is its own inverse.

Details and Options