Listing 1 Common 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;