with Ada.Text_io; use Ada.Text_io;

procedure dontEverDoThis is

   -- if: Boolean;             -- Reserved word "if" can't be an identifier

   False: Boolean := True;  

   True: Boolean := not False;


   Boolean: Float := 5.5;
   Integer: Float := 5.5;

   -- i: Integer;              -- Integer is no longer a type
   -- b: Boolean;              -- Boolean is no longer a type


begin

   if (1 = 2) = True then
      put_line("Are you sure this is right?");
   end if;

   if (1 = 1) = False then
      put_line("This is really Scary!");
   end if;

   if true /= false then
      put_line("I feel better now!");
   end if;

   false := not (1 = 1);
    
   if true = false then
      put_line("Send me back to ITEC 120!");
   end if;

   if Boolean = Integer then
      put_line("Tell me it ain't so!");
   end if;


end dontEverDoThis;