(bind-func test_assoc_1 (lambda () (let ((dict (list (Pair (String "Andrew") 40) (Pair (String "Alison") 39) (Pair (String "Ben") 30)))) dict)))