with Ada.Strings.Wide_Wide_Unbounded; use Ada.Strings.Wide_Wide_Unbounded;
with TextKonstanten;
with SpeziesDatentypen;
with ForschungenDatentypen;
with StadtDatentypen;
with EinheitenDatentypen;
with TextnummernKonstanten;
package Speziestexte is
pragma Elaborate_Body;
type NameBeschreibungArray is array (SpeziesDatentypen.Spezies_Vorhanden_Enum'Range, TextnummernKonstanten.Beschreibungen'Range) of Unbounded_Wide_Wide_String;
NameBeschreibung : NameBeschreibungArray := (others => (others => TextKonstanten.FehlenderText));
type StädtenamenArray is array (SpeziesDatentypen.Spezies_Vorhanden_Enum'Range, StadtDatentypen.StädtebereichVorhanden'Range) of Unbounded_Wide_Wide_String;
Städtenamen : StädtenamenArray := (others => (others => TextKonstanten.FehlenderText));
type ForschungenArray is array (SpeziesDatentypen.Spezies_Vorhanden_Enum'Range, ForschungenDatentypen.ForschungIDVorhanden'Range, TextnummernKonstanten.Beschreibungen'Range) of Unbounded_Wide_Wide_String;
Forschungen : ForschungenArray := (others => (others => (others => TextKonstanten.FehlenderText)));
type EinheitenArray is array (SpeziesDatentypen.Spezies_Vorhanden_Enum'Range, EinheitenDatentypen.EinheitenIDVorhanden'Range, TextnummernKonstanten.Beschreibungen'Range) of Unbounded_Wide_Wide_String;
Einheiten : EinheitenArray := (others => (others => (others => TextKonstanten.FehlenderText)));
type GebäudeArray is array (SpeziesDatentypen.Spezies_Vorhanden_Enum'Range, StadtDatentypen.GebäudeIDVorhanden'Range, TextnummernKonstanten.Beschreibungen'Range) of Unbounded_Wide_Wide_String;
Gebäude : GebäudeArray := (others => (others => (others => TextKonstanten.FehlenderText)));
end Speziestexte;