История изменений

(define a 1)
(define b 2)
(define c 1)
(register-depends-inc a b 1);; a зависит от b если b изменилось a инкрементируется на еденицу автоматом
(register-depends-dec c b 1);; с зависит от b но уменьшается если изменилось b
(set! b 1) ;; задаём новое значение (и тут магически где то как то меняются a и с) ну или через (register-depends-update) какой нибудь
(display a b c) ;; вывод 2 1 0 

;; тоже самое для событий тоесть есть разные эвенты
;; двинул мышкой эвент, тыкнул мышкой эвент (как пример)
;; тоесть мы регистрируем эвенты и зависимости друг от друга
;; если случилось A  то вызвать B  и так далее как каскад
;; или более живой пример у меня происходит загрузка чего либо
;; и у меня есть окно говорящее "всё аебок я грузнулозь нормально" 
;; я диалоговое это окно просто описываю и всё, затем регистрирую эвент окончания загрузки на вывод окна с сообщением
;; так же как и пример выше и всё мне не надо париться и описывать логику оно само  обработает, ну вот как то так

(define a 1)
(define b 2)
(define c 1)
(register-depends-inc a b 1);; a зависит от b если b изменилось a инкрементируется на еденицу автоматом
(register-depends-dec c b 1);; с зависит от b но уменьшается если изменилось b
(set! b 1) ;; задаём новое значение (и тут магически где то как то меняются a и с) ну или через (register-depends-update) какой нибудь
(display a b c) ;; вывод 2 1 0 

;; тоже самое для событий тоесть есть разные эвенты
;; двинул мышкой эвент, тыкнул мышкой эвент (как пример)
;; тоесть мы регистрируем эвенты и зависимости друг от друга
;; если случилось A  то вызвать B  и так далее как каскад
;; или более живой пример у меня происходит загрузка чего либо
;; и у меня есть окно говорящее "всё аебок я грузнулозь нормально" 
;; я диалоговое это окно просто описываю и всё, затем регистрирую эвент окончания загрузки на вывод окна с сообщением
;; так же как и пример выше и всё мне не надо париться и описывать логику оно само  обработает, ну вот как то так
[//code]