Plan 9 from Bell Labs’s /usr/web/sources/contrib/steve/root/sys/lib/texmf/metafont/misc/modename.mf
% Usage: mf '\mode=what_ever_mode; \input modename' let myexit = primitive_end_; mode_setup; message "MODENAME = " & mode_name[mode]; fontmaking := 0; myexit;