with Ada.Text_IO;
use Ada.Text_IO;

procedure HELLO is
begin

   Put_Line("Hello, GNAT seems to work.");

end HELLO;