MODULE m0; IMPORT FIO; IMPORT m1; CONST err = FIO.ErrorOutput; BEGIN FIO.WrStr( err, 'm0' ); FIO.WrLn( err ); END m0.