with Global_Def, Pack_1;
use Global_Def;

procedure A000091 is -- Dhrystone
--------------

begin
    Pack_1.Proc_0;      -- proc_0 is actually the main program, but it is
                        -- part of a package, and a program within a
                        -- package can not be designated as the main
                        -- program for execution. Therefore proc_0 is
                        -- activated by a call from "main".

end A000091;