1with SYSTEM;
2WITH array2; use array2;
3
4package array1 is
5
6  procedure Foo (R : RIC_TYPE);
7  procedure Start_Timer (Q : SYSTEM.ADDRESS);
8
9end array1;
10