RosettaCodeData/Task/Concurrent-computing/Logtalk/concurrent-computing.logtalk

:- object(concurrency).

    :- initialization(output).

    output :-
        threaded((
            write('Enjoy'),
            write('Rosetta'),
            write('Code')
        )).

:- end_object.