aUCBLogo Demos and Tests / testscope2

be testscope2
   be p b
      a=b
      pr a
   end
   local [a b]
   a=15
   p2 17
   pr a
end

be p2 b
   local [c]
   c=18
   testscope2::p b
end