% try all characters on TEST.MF using the parameters of an unknown font
if unknown cmbase: input cmbase fi % omit if CMMF can be assumed
mode←setup;

def generate suffix t= enddef;
input z; font←setup;

let echar=endchar;
def endchar= echar; stop "done with char "&decimal charcode&". " enddef;
let iff=always←iff;

input test;
end