#;105> (trading-post-buy-listings a)
((13424 ((18 . 1526) (11 . 1519) (6 . 1011) (1 . 1000) (1 . 915) (1 . 912) (5 . 911) (1 . 900) (3 . 882) (5 . 836) (1 . 835) (3 . 832) (5 . 819) (4 . 817) (3 . 790) (1 . 439) (1 . 315) (6 . 204) (18 . 185) (13 . 153) (3 . 77))))
#;119> (assoc 13424 (trading-post-buy-listings a))
(13424 ((18 . 1526) (11 . 1519) (6 . 1011) (1 . 1000) (1 . 915) (1 . 912) (5 . 911) (1 . 900) (3 . 882) (5 . 836) (1 . 835) (3 . 832) (5 . 819) (4 . 817) (3 . 790) (1 . 439) (1 . 315) (6 . 204) (18 . 185) (13 . 153) (3 . 77)))
#;124> (cdr (assoc 13424 (trading-post-buy-listings a))) ; why is this in an extra list?
(((18 . 1526) (11 . 1519) (6 . 1011) (1 . 1000) (1 . 915) (1 . 912) (5 . 911) (1 . 900) (3 . 882) (5 . 836) (1 . 835) (3 . 832) (5 . 819) (4 . 817) (3 . 790) (1 . 439) (1 . 315) (6 . 204) (18 . 185) (13 . 153) (3 . 77)))
#;125> (cadr (assoc 13424 (trading-post-buy-listings a)))
((18 . 1526) (11 . 1519) (6 . 1011) (1 . 1000) (1 . 915) (1 . 912) (5 . 911) (1 . 900) (3 . 882) (5 . 836) (1 . 835) (3 . 832) (5 . 819) (4 . 817) (3 . 790) (1 . 439) (1 . 315) (6 . 204) (18 . 185) (13 . 153) (3 . 77))
#;130> (set! b '((1 . ((1 . 2) (3 . 4))) (5 . ((6 . 7) (8 . 9)))))
#;141> b
((1 (1 . 2) (3 . 4)) (5 (6 . 7) (8 . 9)))
#;142> (cassoc 5 b)
((6 . 7) (8 . 9))
#;144> (cassoc 1 b)
((1 . 2) (3 . 4))
#;145> (assoc 1 b)
(1 (1 . 2) (3 . 4))
#;164> (cdr (assoc 1 b))
((1 . 2) (3 . 4))
#;165> (set! a (tp-download-listing (make-trading-post) 13424))
#;166> (trading-post-buy-listings a)
((13424 ((18 . 1526) (11 . 1519) (6 . 1011) (1 . 1000) (1 . 915) (1 . 912) (5 . 911) (1 . 900) (3 . 882) (5 . 836) (1 . 835) (3 . 832) (5 . 819) (4 . 817) (3 . 790) (1 . 439) (1 . 315) (6 . 204) (18 . 185) (13 . 153) (3 . 77))))
#;167> (assoc 13424 (trading-post-buy-listings a))
(13424 ((18 . 1526) (11 . 1519) (6 . 1011) (1 . 1000) (1 . 915) (1 . 912) (5 . 911) (1 . 900) (3 . 882) (5 . 836) (1 . 835) (3 . 832) (5 . 819) (4 . 817) (3 . 790) (1 . 439) (1 . 315) (6 . 204) (18 . 185) (13 . 153) (3 . 77)))
#;168> (cadr (assoc 13424 (trading-post-buy-listings a)))
((18 . 1526) (11 . 1519) (6 . 1011) (1 . 1000) (1 . 915) (1 . 912) (5 . 911) (1 . 900) (3 . 882) (5 . 836) (1 . 835) (3 . 832) (5 . 819) (4 . 817) (3 . 790) (1 . 439) (1 . 315) (6 . 204) (18 . 185) (13 . 153) (3 . 77))
#;169> (cdr (assoc 13424 (trading-post-buy-listings a)))
(((18 . 1526) (11 . 1519) (6 . 1011) (1 . 1000) (1 . 915) (1 . 912) (5 . 911) (1 . 900) (3 . 882) (5 . 836) (1 . 835) (3 . 832) (5 . 819) (4 . 817) (3 . 790) (1 . 439) (1 . 315) (6 . 204) (18 . 185) (13 . 153) (3 . 77)))
#;170>