#lang racket/gui

(define y 5)

;((λ (x) y) ((λ (x) (x x)) (λ (x) (x x)))) ; ciclează la infinit


; închid omega într-o închidere funcțională
(let ((fOmega (λ () ((λ (x) (x x)) (λ (x) (x x))))))
  ((λ (x) y) fOmega))