Interface for qBeta module object

Origin: LIB

AgentSystem: obj  

   %visible Containers.Set,QBETA,StringLib

   Point:and: value

      print: 

   random: 

      out R: var integer

   World: 

      -- The world is two dimensional and divided into a grid of patches 

      BasicAgent: 

         -- The world is made up of agents

         -- Agents are beings that can follow instructions

         print:< 

      Agent: BasicAgent

         pos: var Point:and

         print:< 

      Turtle: Agent

         pen: obj 

            down: 

            up: 

            color: var char

            draw: 

         fd: 

         rt: 

         lt: 

         neighbors4: 

            out N: ref PatchSet

            print:< 

      Patch: Agent

         pDum: var integer

      Link: BasicAgent

         T1: ref Turtle

         T2: ref Turtle

      TurtleSet: Set

         ask: 

            current: ref Elm

            cond:< 

               out V: var Boolean

      PatchSet: Set

         dum: var integer

      turtles: obj TurtleSet

      tick: 

      clear_all: 

      create_turtles: 

      Observer: obj Agent

         dum: var integer

         go: