"Dennis Lee Bieber" <wlfraed@ix.netcom.com> a �crit dans le message de news:kc8fd1-
[...]
>                 for j in 0..integer(Position) loop
>                         put(" ");       --space output across line
>                 end loop;
BTW, this can be written as:
  put ((1..Integer(position)+1 => ' '));