:- module unsat_error. :- interface. :- import_module io. :- typeclass logger(L) where [ pred info(L::in, string::in, io::di, io::uo) is det ]. :- pred create_schedule(L::in, io::di, io::uo) is det. :- implementation. create_schedule(Logger, !IO) :- info(Logger, "Starting schedule creation\n", !IO).