home *** CD-ROM | disk | FTP | other *** search
/ Programmer's ROM - The Computer Language Library / programmersrom.iso / ada / piwg / z000241.ada < prev    next >
Encoding:
Text File  |  1988-05-03  |  740 b   |  23 lines
  1. procedure z000241 is
  2.     procedure procedure_1 is
  3.     procedure procedure_2 is
  4.     procedure procedure_3 is
  5.     procedure procedure_4 is
  6.     procedure procedure_5 is
  7.     procedure procedure_6 is
  8.     procedure procedure_7 is
  9.     procedure procedure_8 is
  10.     procedure procedure_9 is
  11.     procedure procedure_10 is begin null; end procedure_10;
  12.         begin procedure_10; end procedure_9;
  13.         begin procedure_9; end procedure_8;
  14.         begin procedure_8; end procedure_7;
  15.         begin procedure_7; end procedure_6;
  16.         begin procedure_6; end procedure_5;
  17.         begin procedure_5; end procedure_4;
  18.         begin procedure_4; end procedure_3;
  19.         begin procedure_3; end procedure_2;
  20.         begin procedure_2; end procedure_1;
  21.     begin procedure_1;
  22. end z000241;
  23.