RosettaCodeData/Task/Morse-code/Ada/morse-code-3.ada

with Morse;            use Morse;
procedure Morse_Tx is
begin
   Morsebeep (Convert ("Science sans Conscience"));
end Morse_Tx;