Arc Forumnew | comments | leaders | submitlogin
1 point by thaddeus 5624 days ago | link | parent

Kinda found a way to do it - though it kinda seems strange to have to use this approach.

    (def at-id-val (dat-name at-name)
       (for i 0 (- (len ktable) 1)
         (if (is ((ktable i) 1) at-name)     
               (pr ((dtable dat-name) i)))
       ))

    (def at-val (dat-name at-name)
      (tostring (at-id-val dat-name at-name))
     )
T.