with Raylib;
use  Raylib;

procedure Window is

begin
   Open_Window (1280, 720, "Pandemos Empire" & ASCII.NUL);
   --
   Main_Loop: loop
      exit when Window_Should_Close;
      --
      Begin_Drawing;
      Clear_Background;
      End_Drawing;
   end loop Main_Loop;
   --
   Close_Window;
end Window;