Code Review

Compare your solutions

    #| BEGIN (Введите свое решение) |#
(define (origin-list frame)
  (car frame))

(define (edge1-list frame)
  (cadr frame))

(define (edge2-list frame)
  (caaddr frame))

(define (origin-cons frame)
  (car frame))

(define (edge1-cons frame)
  (cadr frame))

(define (edge2-cons frame)
  (caddr frame))
#| END |#