How to Async Exit Program in Ada - Code Snippet

-- Task: Async Exit Program
-- Language: Ada

procedure async_exit_program() is begin
    -- Implementation for Async Exit Program
    -- TODO: Implement core logic here
    -- Step 1: Prepare data
    -- Step 2: Process Async Exit Program
    Put_Line("Done");
end;