#279 Get the elements adjacent to the selected element

Get the elements adjacent to element 12

*createmark elements 1 12
*findmark elements 1 1 1 elements 0 2
set elementIDs [hm_getmark elements 2]
puts $elementIDs

5 6 9 10 11 25 33 35