# avion_sol.ads

    --
    -- Contrôle de l'avion au sol
    --

    package Avion_Sol is

       -- Fait rouler l'avion en ligne droite jusqu'au point indiqué
       procedure Rouler_Vers (Dest : Character) ;

       -- Lorsque l'avion a obtenu l'autorisation de décollage, cette action parcourt
       -- toute la piste à grande vitesse, mais sans décoller, puis freine en fin de piste.
       -- L'action se termine lorsque l'avion est en fin de piste.
       procedure Parcourir_Piste ;

       -- Stoppe les réacteurs et commande le freinage de l'avion
       procedure Freiner ;

       -- Attend que l'utilisateur appuie sur "entrée"
       procedure Attendre_Entree ;

    end Avion_Sol ;