Listing 2 Alternative indenting patterns for Ada if-else and while-loop statements

if expression
then
   statement;
   statement;
   ...
else
   statement;
   statement;
   ...
end if;

while expression
loop
   statement;
   statement;
   ...
end loop;