$ grep "(def get" arc.arc
  (def get (index) [_ index])

  arc> (ssexpand '.a)
  (get a)
  arc> (ssexpand '!b)
  (get (quote b))
  arc> (= bleh (map [obj num _] (range 1 5)))
  (#hash((num . 1)) #hash((num . 2)) #hash((num . 3)) #hash((num . 4)) #hash((num . 5)))
  arc> (map !num bleh)
  (1 2 3 4 5)
  arc> (let b 'num (map .b bleh))
  (1 2 3 4 5)