{VERSION 2 3 "IBM INTEL NT" "2.3" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 }{CSTYLE "" -1 258 "" 1 18 201 0 56 0 0 1 0 0 0 0 0 0 0 }
{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 
0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT 
-1 49 "                                                 " }{TEXT 258 
19 " Help for structure" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 
0 "" {TEXT -1 71 "CALLING SEQUENCE : dynkin[structure_A](<index>,<inde
x>,<index>,<rank>);" }}{PARA 0 "" 0 "" {TEXT -1 52 "dynkin[structure_B
](<index>,<index>,<index>,<rank>);" }}{PARA 0 "" 0 "" {TEXT -1 52 "dyn
kin[structure_C](<index>,<index>,<index>,<rank>);" }}{PARA 0 "" 0 "" 
{TEXT -1 52 "dynkin[structure_D](<index>,<index>,<index>,<rank>);" }}
{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 94 "Here the \+
rank is an integer 1, 2, ... and the index is an integer 1, 2, ..., di
m(Lie algebra)." }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 8 "Example:" }}
{PARA 0 "" 0 "" {TEXT -1 43 "The structure constants for [X3,X4] in A_
2:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "for i from 1 to 8 do\n dynkin
[structure_A](3,4,i,2);\nod:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 34 "I
n other words, [X3,X4]=X5. Check:" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 29 "dynkin[cc](X3,X4):\nevalm(X5):" }}}{EXCHG {PARA 0 "" 
0 "" {TEXT -1 231 "This means that [X3,X4]=X5. Since X4 corresponds to
 the second simple root, the crystal graph of the adjoint representati
on of A2 has a label of a 2 on the edge connecting the vertex associat
ed to X3 to the vertex associated to X5." }}}{PARA 0 "" 0 "" {TEXT -1 
0 "" }}}{MARK "2 0 0" 26 }{VIEWOPTS 1 1 0 1 1 1803 }