%---------------------------------------------------------------------------%
% vim: ts=4 sw=4 et ft=mercury
%---------------------------------------------------------------------------%

:- module nested_module_r.

:- interface.

:- import_module io.

:- pred main(io::di, io::uo) is det.

:- implementation.

:- import_module nested_module_r.sub_nested_module, nested_module_r_2.

:- type t
    --->    c(int).

main(!IO) :-
    main_2(!IO).

:- module nested_module_r.sub_nested_module.

:- interface.

:- import_module io.

:- pred main_2(io::di, io::uo) is det.

:- implementation.

:- import_module nested_module_r_2.

main_2(!IO) :-
    output(c(1), !IO).

:- pred output(t::in, io::di, io::uo) is det.

output(X, !IO) :-
    io.write(X, !IO),
    io.nl(!IO).

:- end_module nested_module_r.sub_nested_module.