Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- with Datos, Ada.Text_IO;
- use Datos, Ada.Text_IO;
- package IO is
- procedure lecturaT(TR : out Temperatura); -- Sensores de temperatura ST1, ST2, ST3, ST4
- procedure lecturaR(RD : out Radiacion); -- Radiacion SR1
- procedure lecturaC(CD : out Caudal); -- Caudales SC1 y SC2
- procedure escrituraC(CD : Caudal);
- end IO;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement