forget ("std printer generator/M", quiet) ;
check off ;

fetch ("minimal fonts routines", archive); 
fetch ("std printer", archive); 
fetch ("eumel printer", archive);
fetch ("elan lister", archive);
fetch ("spool manager", archive);
fetch ("printer/M", archive); 
 
ins ("minimal fonts routines"); 
ins ("std printer"); 
ins ("eumel printer");
ins ("elan lister");
ins ("spool manager");
run ("printer/M");
 
PROC ins (TEXT CONST name): 
  insert (name); 
  forget (name, quiet) 
END PROC ins;