declare F F1 {Browse F1 } {Browse {F F1} } {Browse proc {$ B ?Res} Res=F end } {Browse proc {$ B ?Res} Res = B end } {Browse proc {$ B1 ?R1} R1= proc {$ B ?R} R={B1 B} end end } declare F {Browse {fun {$ B} B end F} } declare N {Browse {fun {$ N} N end N} } N=5 declare F1 {Browse fun {$ F} {fun {$ B} {B F1} end F} end } declare F3 F4 F3 = 3 F4 = 7 {Browse F3 = F4}