вы таки будете смеяться, но `UP.` у меня как раз работает как указатель уровня (это проверяется, правильные уровни выбираются). не поверите: удобно. в том числе и для вот таких финтов:
## Код:
```
PROCEDURE A;
VAR n: INTEGER;
   PROCEDURE B;
   VAR n: INTEGER;
   BEGIN n := UP.n; закэшировали, юзаем n без UP
   END B;
BEGIN END A;
```
