with Szimulacio.Ontozorendszer.Terv;

package Szimulacio.Ontozorendszer.Csovezetek_Modell is


   type Cso_Allapot_Tipus is (Van_Benne_Viz, Ures);

   type Csovezetek_Modell_Tomb_Index_Tipus is new Ontozorendszer.Terv.Valodi_Reszletpont_Azonosito_Tipus;

   type Csovezetek_Modell_Tomb_Tipus is array(Csovezetek_Modell_Tomb_Index_Tipus) of aliased Cso_Allapot_Tipus;

   type Csovezetek_Modell_Elem_Mutato_Tipus is access all Cso_Allapot_Tipus;


   Csovezetek_Modell : Csovezetek_Modell_Tomb_Tipus := ( others => Ures );                                             -- "gondolhatunk ra ugy mint egy osztott memoriara"


end Szimulacio.Ontozorendszer.Csovezetek_Modell;