M7R0
I+PIDataInfot+6"F$F$F$C7-%'printfG6#Q`oThe~file~GT_PIData.m~provides~two~critic
al~datums~that~independently|+F$-F'6#Qcoparameterize~the~primitive~ideals~of~Gt
~at~infinitesimal~character~rho.|+F$-F'6#QjoTo~each~primitive~ideal~I~in~U(g),~
there~corresponds~a~unique~Duflo~involution|+F$-F'6#Qeow~in~W~such~that~I~=~ann
ihilator~of~the~simple~highest~weight~module~with|+F$-F'6#QCwith~highest~weight
~-w.rho~+~rho.|+F$-F'6#QhoA~primitive~ideal~I~can~also~be~characterized~by~its~
tau_infinity~invariant.|+F$-F'6#Q$If|+F$-F'6#Q;~~~~~PRDT~:=~PIData[soi]:|+F$-F'
6#Qgothen~PRDT~is~a~list~of~datum~pairs~for~the~primitive~ideals~attached~to~th
e|+F$-F'6#QTsoi^th~special~nilpotent~orbit~of~Gt.~If,~further,|+F$-F'6#Q7~~~~~p
rdt~:=~PRDT[k]:|+F$-F'6#Qcpthen~prdt~holds~data~for~the~k^th~primitive~ideal~at
tached~the~soi^th~special~nilpotent|+F$-F'6#Qaporbit~(here~k~runs~from~1~to~the
~dimension~of~the~corresponding~special~rep~of~W)~and|+F$-F'6#Qfp~~~~~prdt[1]~=
~the~shortlex~reduced~word~expression~for~the~corresponding~Duflo~involution|+F
$-F'6#QP~~~~~prdt[2]~=~the~tau_infinity~invariant~of~I|+F$-F'6#QipSo,~in~fact,~
prdt[1]~and~prdt[2]~actually~independently~prescribe~the~primitive~ideal~indexe
d|+F$-F'6#Q/by~soi~and~k.|+F$-F'6#Qbp(Note:~tau_infinity~invariants~are~certain
~sequences~of~collections~of~tau-invariants.|+F$-F'6#QjpIn~prdt[2],~we~represen
t~tau~invariants~not~directly~as~subsets~of~the~simple~roots~of~Gt,~but|+F$-F'6
#Qbprather~by~their~index~relative~to~a~shortlex~ordering~of~the~power~set~2^(r
ank(Gt)).)|+|+F$-%'RETURNGF$F$F$F$6#""!F$,
I'PIData727#7$Q:1213214321543215432543545F$7#<#"#K7'7$Q912132143215432154325435
4F$7#<#"#F7$Q71213214325432154325435F$7#<#"#G7$Q512132432543215432545F$7#<#"#H7
$Q3123243254321543545F$7#<#"#I7$Q12324325432543545F$7#<#"#J7,7$Q812132432154321
543254354F$7#<#"#=7$Q812321432154321543254354F$7#<#"#?7$Q8123214325432154325435
45F$7#<#"#@7$Q821321432154321543254354F$7#<#"#B7$Q821321432543215432543545F$7#<
#"#C7$Q821324321543215432543545F$7#<#"#D7$Q41213214321543215432F$F\p7$Q61213214
35432154325435F$Fap7$Q6121343543215432543545F$Ffp7$Q6134321543215432543545F$F[q
7,7$Q72132432154321543254354F$7$<#"#7<$F]rF\s7$Q/12143215432154F$7$Fgq<$F]rFcp7
$Q513432154321543254354F$7$F\r<$F_tFbr7$Q11321432154321543F$7$F\r<%FhqFbrFgr7$Q
3132145432154325435F$7$Far<%F]rF\sFhp7$Q3213214321543215432F$7$FfrF`t7$Q5213214
35432154325435F$7$F[s<%F_tFbrFgr7$Q+1213214321F$7$F]pFdt7$Q-121321543215F$7$Fbp
<%FhqFbrF^p7$Q11214543215432545F$7$Fgp<%F_tFhqFbr717$Q512132432154321543254F$7%
Fgq<%"#>F]rFcpF\u7$Q71213243543215432543545F$7%<#Fhv<$FhqFbr<'FhvF]r"#AF\sFcp7$
Q3123243215432154354F$7%F\rF\u<(FhvF]rF_wF\sFcpFhp7$Q11232143543215435F$7%FarF`
u<&FhqFbrFgrFas7$Q512324543215432543545F$7%Far<&FhvF]rF_wF\sFgw7$Q7123432154321
5432543545F$7%<#F_w<$FbrFas<'FhvF]rF_wF\s"#E7$Q12324321543254354F$7%FfrF`tFgw7$
Q/23214354325435F$7%F[s<%FbrFgrFas<&F]rF\sFhpF]q7$Q3232543215432543545F$7%F[sFi
xFax7$Q-213435432545F$7%F`s<$F\sF]qFix7$Q524321543215432543545F$7%F`s<%F_wF\sFb
xFix7$Q73214321543215432543545F$7%<#FbxF`sFey7$Q3121321435432154325F$7%FbpF]w<'
FhvF]rF\sFcpFhp7$Q/12134354321545F$7%Fgp<%FhqFbrFas<(FhvF]rF\sFcpFhpF]q7$Q+1343
543545F$7%F\qF`xFjx767$Q0143215432154354F$7$<#""*Fht7$Q221432154321543254F$7$F^
t<%F[[l"#9F\s7$Q.2134321543254F$7$F^t<%"#8F]rF\s7$Q0213543215432545F$7$<#Fe[lFh
t7$Q43214321543215432543F$7$<#F`[l<$F_t"#:7$Q43214325432154325435F$7$<#F_\l<$F`
[lFas7$Q*121432154F$7$Fgq<'F[[lF_tFhvF]rFcp7$Q,12154321545F$7$F\w<%Fe[lFhqFbr7$
Q,13214321543F$F[u7$Q,13432154354F$7$F\r<&F[[lF_tF`[lFbr7$Q.1321543215435F$7$Fa
r<&F[[lFhvF]rF\s7$Q.1354321543545F$7$Far<&Fe[lF_\lF]rF_w7$Q*132145435F$7$Far<&F
_\lF]rF\sFhp7$Q0143254321543545F$7$F_x<%F[[lFbrFas7$Q.2132143215432F$7$Ffr<&F_t
F`[lF]rF\s7$Q,21321454325F$7$F[sFht7$Q0213215432154325F$7$F[s<'F_tFe[lF_\lFbrFg
r7$Q221432543215432545F$7$F`s<&F_tFe[lF_\lF_w7$Q(1213215F$7$Fbp<%FhqFbrF\s7$Q(1
214545F$7$Fgp<'F[[lF_tFhvFbrFas7,7$Q212132143543215432F$7#<#"#<7$Q2121324325432
15432F$Ffq7$Q212132435432154325F$7#F\w7$Q0123243254321543F$F[r7$Q01232435432154
35F$F`r7$Q.1234354321545F$7#F_x7$Q.2324325432543F$Fer7$Q.2324354325435F$Fjr7$Q,
23435432545F$F_s7$Q*343543545F$7#Fiy767$Q/13214354321543F$7$<#"")<$"#6Fhq7$Q-12
4325432154F$Fiz7$Q12132143543215432F$7$<#F\bl<$FjalF_t7$Q+2432543254F$F^[l7$Q12
132432543215432F$7$F^t<%F\blFe[lF]r7$Q3213243543215432545F$Fh[l7$Q-324325432543
F$F\\l7$Q/32435432543545F$Fb\l7$Q'121321F$7$F^`lF[bl7$Q-121435432154F$7$Fgq<&Fj
alF[[lF_tFhv7$Q)12134321F$7$Fgq<&F_tF_`lFhvF]r7$Q+1213543215F$F[]l7$Q)12324321F
$F[u7$Q/13243254321543F$7$F\r<'FjalF[[lF_tF`[lFbr7$Q11324354321543545F$Fi]l7$Q+
1232543215F$7$Far<'FjalF[[lFhvF]rF\s7$Q/12454321543545F$Fa^l7$Q'232432F$Fe^l7$Q
)23254325F$7$F[s<(F\blF_tFe[lF_\lFbrFgr7$Q-245432543545F$F`_l767$Q0123214354321
543F$Fhal7$Q.1234325432154F$7$Fjz<%"#5F_tFbr7$Q0123454321543545F$7$<#Fjel<$F[[l
Fe[l7$Q.2321435432543F$Fabl7$Q,21343543254F$Fhbl7$Q,23432543254F$7$F^t<&F[[lFe[
lF`[lF\s7$Q*213454325F$Fh[l7$Q.2345432543545F$7$Fi[l<%FjelF_tF_\l7$Q*343254354F
$F\\l7$Q(3245435F$Fb\l7$Q,35432543545F$7$Fc\l<%Fe[lF`[l"#;7$Q.4325432543545F$7$
<#FfglFc\l7$Q.1213435432154F$Fecl7$Q,12134543215F$7$F\w<&FjelFe[lFhqFbr7$Q*1343
54354F$Fadl7$Q,12324543215F$7$Far<&FjalF[[lFhvF\s7$Q(1345435F$7$Far<'FjelFe[lF_
\lF]rF_w7$Q&14545F$7$F_x<&F[[lFfglFbrFas7$Q*232454325F$7$F[s<'F\blF_tFe[lF_\lFb
r7$Q&24545F$F`_l767$Q-321435432543F$7$<#""%F^t7$Q-432543254354F$7$<#""&Fc\l7$Q'
132143F$7$Fial<%FjilF\blFhq7$Q)14354354F$7$Fjz<%F_jlF_tFbr7$Q)12432154F$Fhel7$Q
+1254321545F$F]fl7$Q)21321432F$Fabl7$Q+2143543254F$7$F^t<%FjilF[[lFe[l7$Q'21343
2F$Fhbl7$Q'243254F$7$F^t<'F_jlF[[lFe[lF`[lF\s7$Q)21354325F$Fh[l7$Q)25432545F$F
\gl7$Q)32432543F$7$F]\l<%FjilF_tF_\l7$Q+3254325435F$7$Fc\l<%F_jlFe[lF`[l7$Q%121
4F$Fecl7$Q%1215F$F_hl7$Q%1343F$Fadl7$Q'123215F$Fehl7$Q'135435F$7$Far<(FjilF[[lF
jelFe[lF_\lF]r7$Q%2325F$7$F[s<(FjilF\blF_tFe[lF_\lFbr7,7$Q*321432543F$Fhil7$Q.4
321543254354F$7$F^jl<$""'F_\l7$Q0543215432543545F$7$<#F[^mF^jl7$Q&14354F$Fhel7$
Q(1543545F$F]fl7$Q(2143254F$7$F^t<&FjilF_jlF[[lFe[l7$Q&21325F$7$Fi[l<%F[^mF_tFb
r7$Q*215432545F$F\gl7$Q,32154325435F$7$Fc\l<%FjilF_jlFe[l7$Q$135F$7$FarFa[m7,7$
Q11213243543215432F$7#<#""(7$Q/12324354321543F$7#Fial7$Q-123435432154F$7#Fjz7$Q
+1234543215F$7#F^fl7$Q-232435432543F$7#Fbbl7$Q+2343543254F$7#F^t7$Q)23454325F$7
#Fi[l7$Q)34354354F$7#F]\l7$Q'345435F$7#Fc\l7$Q%4545F$7#Fjgl717$Q021324354321543
2F$7%<#""$Fial<%F[bmFjilF[[l7$Q,32435432543F$7%FiilF^t<'F[bmFjilF_jlF[[lFe[l7$Q
(4354354F$7%F^jlFc\l<&FjilF_jlFe[lF`[l7$Q$121F$7%Fi_mFial<%Fj_mF[[lF\bl7$Q.1324
354321543F$7%FialF\bm<%FjalFjelF_t7$Q&12321F$7%FialFhbmF\cm7$Q,12435432154F$7%F
jzF\cmF`bm7$Q(1234321F$7%FjzF\cm<'Fj_mF[[lF\blFe[lF`[l7$Q*123543215F$7%F^flF_fl
<&FjalFjelF_tF_\l7$Q$232F$7%FbblFcblFfcm7$Q&23432F$7%F^t<&F[[lF\blFe[lF`[lFjcm7
$Q*243543254F$7%F^tF`bmFjcm7$Q(2354325F$7%Fi[lF]gl<)F[bmFjilF_jlF[[lF\blFe[lF`[
l7$Q$343F$7%F]\lF^\l<(FjilF_jlF[[lF\blFe[lF`[l7$Q&35435F$7%Fc\lFdbmF]gl7,7$Q%21
32F$7#Fjam7$Q%3243F$7#Fiil7$Q%4354F$7#F^jl7$Q'543545F$7#F_^m7$Q#13F$F]`m7$Q#14F
$F``m7$Q#15F$Fc`m7$Q#24F$Fi`m7$Q#25F$F\am7$Q#35F$Fbam7'7$Q"1F$7#<#""#7$Q"2F$Fce
m7$Q"3F$Ffem7$Q"4F$Fiem7$Q"5F$F\fm7#7$Q"eF$7#<#"""F$
