Итак, вот мой код:
(define *graph* (read(open-input-file "starbucks4.sxml")))
(define get-artifacts
(lambda (l)
(member (list 'opm:artifact) l)))
Когда я набираю get-artifacts(*graph*)
, я получаю сообщение об ошибке: procedure application: expected procedure, given:...(the whole of my file contents)
Кто-нибудь видит, что я делаю неправильно?Спасибо, ребята:)
PS: я действительно новичок в Scheme, поэтому, наверное, какой-то глупый синтаксис я забыл!