Skip to content

Latest commit

 

History

History
19 lines (14 loc) · 696 Bytes

ex_2_47.md

File metadata and controls

19 lines (14 loc) · 696 Bytes

Упражнение 2.47

Вот два варианта конструкторов для рамок:

(defn make-frame
  [origin edge1 edge2]
  (list origin edge1 edge2))

(defn make-frame
  [origin edge1 edge2]
  (cons origin (cons edge1 edge2)))

К каждому из этих конструкторов добавьте соответствующие селекторы, так, чтобы получить реализацию рамок.

Решение

Code | Test