1. -- 
  2. -- Jan & Uwe R. Zimmer, Australia, July 2011 
  3. -- 
  4.  
  5. with Swarm_Configuration;   use Swarm_Configuration; 
  6. with Swarm_Configurations;  use Swarm_Configurations; pragma Elaborate_All (Swarm_Configurations); 
  7. with Swarm_Structures;      use Swarm_Structures; 
  8. with Swarm_Structures_Base; use Swarm_Structures_Base; 
  9.  
  10. package Swarm_Data is 
  11.  
  12.    -- The Swarm_State is an unprotected, dynamic vector for maximal concurrency. 
  13.    -- Different tasks can update different parts of this vector concurrently. 
  14.    -- Critical operations (like deletions or insertions) 
  15.    -- are handled via the Swarm_Monitor in Swarm_Control. 
  16.    -- 
  17.    Swarm_State :          Swarm_Vectors.Vector    := Swarm_Vectors.Empty_Vector; 
  18.  
  19.    Globes      : constant Energy_Globes_Protected := Default_Protected_Globes (Configuration); 
  20.  
  21. end Swarm_Data;