-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathtask_implementations.ads
More file actions
31 lines (25 loc) · 960 Bytes
/
task_implementations.ads
File metadata and controls
31 lines (25 loc) · 960 Bytes
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
with Ada.Float_Text_IO;
with Ada.Text_IO;
with Angle; use Angle;
with Ada.Real_Time; use Ada.Real_Time;
with Task_Scheduling; use Task_Scheduling;
with Setup; use Setup;
with Shared_Data;
with Meassure_Velocity;
with Meassure_Acceleration;
with Acceptance_Test_Lib; use Acceptance_Test_Lib;
with Exception_Declarations; use Exception_Declarations;
with Type_Lib; use Type_Lib;
with PID_Functionality; use PID_Functionality;
package Task_Implementations is
task Gyroscope_Reader with Priority => 20;
task Accelerometer_Reader with Priority => 19;
task Cascade_Controller with Priority => 18;
task Actuator_Writer with Priority => 17;
private
-- Protected types to store and retrive shared data
Accelerometer_SR : Shared_Data.Sensor_Reading;
Gyroscope_SR : Shared_Data.Sensor_Reading;
Motor_AW : Shared_Data.Actuator_Write;
Recoveryblock_Count_Limit : Constant Integer := 4;
end Task_Implementations;