M7R0
I+DIDataInfot+6"F$F$F$C--%'printfG6#QVDIData[Gt]~is~a~list~that~hold~informatio
n~about~the|+F$-F'6#QWDuflo~involutions~in~the~Weyl~group~of~the~simple~Lie|+F$
-F'6#Q0algebra~Gt.~If|+F$-F'6#Q:~~~~~DIDT~:=~DIData[Gt]:|+F$-F'6#Q%and|+F$-F'6#
Q7~~~~~didt~:=~DIDT[i]:|+F$-F'6#Qinthen~represents~the~i^th~Duflo~involution~wh
ich~we'll~call~di|+F$-F'6#QZ~~~~~didt[1]~=~index~of~di~in~the~shortlex~ordering
~of~W|+F$-F'6#Qin~~~~~didt[2]~=~shortlex~reduced~word~in~W~corresponding~to~di|
+F$-F'6#Qho~~~~~didt[3]~=~the~tau~infinity~invariant~of~di~in~its~containing~ri
ght~cell|+F$-F'6#Q"|+F$F$F$F$6#""!F$,
I'DIData7&7%"""Q"eF$&%$tiiG6$""$FM7%""#Q"1F$&FP6$FTFM7%FRQ"2F$&FP6$FTFT7%""'Q$1
21F$&FP6$FMFMF$
