Programmer's ROM - The Computer Language Library/programmersrom.iso/ada/piwg/a000102.ada

Text File | 1988-05-03 | 712 b | 49 lines

-- This is a procedure that calls the other half of the timing procedures once

with L000001 ;
with L000002 ;
with L000003 ;
with P000001 ;
with P000002 ;
with P000003 ;
with P000004 ;
with P000005 ;
with P000006 ;
with P000007 ;
with P000010 ;
with P000011 ;
with P000012 ;
with P000013 ;
with T000001 ;
with T000002 ;
with T000003 ;
with T000004 ;
with T000005 ;
with T000006 ;

procedure A000102 is
begin

  L000001 ;
  L000002 ;
  L000003 ;
  P000001 ;
  P000002 ;
  P000003 ;
  P000004 ;
  P000005 ;
  P000006 ;
  P000007 ;
  P000010 ;
  P000011 ;
  P000012 ;
  P000013 ;
  T000001 ;
  T000002 ;
  T000003 ;
  T000004 ;
  T000005 ;
  T000006 ;

end A000102 ;