--  Programmed by Jedidiah Barber
--  Released into the public domain


with

    Ada.Text_IO,
    Here_I_Am;


procedure Where_Mod is
begin

    Ada.Text_IO.Put_Line (Here_I_Am.Module);

end Where_Mod;