track.plot(vrml)

class TRACK 
...
plot (plotter: PLOTTER) is
   ...
   do
     ...
     clusters.item(i).plot(plotter) -- for all clusters
     ...
     tracked_particle.plot(plotter) -- for tracked_particle at all superlayer
     ...
   end -- plot
...
end -- class TRACK

class INDET_CLUSTER
... 
plot (plotter: PLOTTER) is
   local
      angles: VECTOR_3
   do
      !!angles.make
      angles.set_xyz (arcsin (s_theta), arcsin (s_tilt), arcsin (s_stereo))
      plotter.cube (size, position, angles, plotter.black (1))
   end -- plot
...
end -- class INDET_CLUSTER

class TRACKED_PARTICLE
...
   plot (plot: PLOTTER) is
      local
         i: INTEGER
      do
         plotter.cylinder (10, 0.0001, position, direction, plotter.white (1))
      end -- plot
...
end -- class TRACKED_PARTICLE