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;