es

es=(i|j|k|m|n)|(SuperPlus[(i|j|k|m|n)])|(SuperPlus[(SuperPlus[(i|j|k|m|n)])])

(Subscript[δ, α:es,β:es]):=If[α===β,1,0];

(Subscript[δ, i,i])

(Subscript[δ, i,(SuperPlus[(SuperPlus[j])])])

(Subscript[δ, (SuperPlus[(SuperPlus[j])]),(SuperPlus[(SuperPlus[j])])])

(Subscript[δ, 3,i])