Evaluated proc map2hb_xy {l x y} {lindex [lindex $l $y] $x}