mirror of
http://172.16.200.102/RESSAC/RESSAC_Use_Case.git
synced 2026-01-05 01:53:57 +01:00
29 lines
517 B
Ada
29 lines
517 B
Ada
with MMS.Input;
|
|
with MMS.F_PT.Output;
|
|
|
|
with Types; use Types;
|
|
|
|
package MMS.F_EL.Input is
|
|
|
|
--------------
|
|
-- From MMS --
|
|
--------------
|
|
|
|
function P return Distance_Type
|
|
renames MMS.Input.P;
|
|
|
|
function P_Dot return Speed_Type
|
|
renames MMS.Input.P_Dot;
|
|
|
|
function Q return Angle_Type
|
|
renames MMS.Input.Q;
|
|
|
|
---------------
|
|
-- From F_PT --
|
|
---------------
|
|
|
|
function Emergency_Landing return Boolean
|
|
renames MMS.F_PT.Output.Emergency_Landing;
|
|
|
|
end MMS.F_EL.Input;
|