package data_types is
   type caudal is new Float range 0.0 .. 700.0;
   type temperatura is new Float range 0.0 .. 200.0;
end data_types;