Increment Array Element

Hi,   Is there any neat way to increment any array element. At the moment I’m doing:     set TempVar $::MyArray($some_index)   incr TempVar   set ::MyArray($some_index) $TempVar   ...