[ MegaExam obj; print "^", (a) obj, ": "; <Examine obj>; ]; [ MegaLookSub; <Look>; LoopOverScope(MegaExam); ]; Verb meta "megalook" * -> MegaLook;