1with Loop_Optimization7_Pkg; use Loop_Optimization7_Pkg; 2 3package Loop_Optimization7 is 4 5 type Arr is array (1..8) of Rec; 6 7 function Conv (A : Arr) return Arr; 8 9end Loop_Optimization7; 10
1with Loop_Optimization7_Pkg; use Loop_Optimization7_Pkg; 2 3package Loop_Optimization7 is 4 5 type Arr is array (1..8) of Rec; 6 7 function Conv (A : Arr) return Arr; 8 9end Loop_Optimization7; 10