set hpaths [list \ /sample /detector /slits \ /slits/1 /slits/2 /slits/3 /slits/4 ] # Maps devices (eg motors) to hipadaba paths. array set motor_hpath [list \ s1up /slits/1 \ s1lo /slits/1 \ s1le /slits/1 \ s1ri /slits/1 \ s1vg /slits/1 \ s1vo /slits/1 \ s1hg /slits/1 \ s1ho /slits/1 \ s2up /slits/2 \ s2lo /slits/2 \ s2le /slits/2 \ s2ri /slits/2 \ s2vg /slits/2 \ s2vo /slits/2 \ s2hg /slits/2 \ s2ho /slits/2 \ s3up /slits/3 \ s3lo /slits/3 \ s3le /slits/3 \ s3ri /slits/3 \ s3vg /slits/3 \ s3vo /slits/3 \ s3hg /slits/3 \ s3ho /slits/3 \ st3vt /slits/3 \ s4up /slits/4 \ s4lo /slits/4 \ s4le /slits/4 \ s4ri /slits/4 \ s4vg /slits/4 \ s4vo /slits/4 \ s4hg /slits/4 \ s4ho /slits/4 \ st4vt /slits/4 \ say /sample \ sax /sample \ sath /sample \ saphi /sample \ dsyvt /detector \ deyvt /detector ]