let
find_in_top sgn =
find_implicit_input sgn
Locations
.
Zone
.top