package Example_Client is

   procedure Send_Test_Message (
                                Username : String;
                                Password : String;
                                Room : String
                               );

end Example_Client;
