CTRACE(tfp, "\r *** Set simulated 'Z'");
CTRACE((tfp, "\r *** Set simulated 'Z'"));
PUBLIC void LYFakeZap ARGS1(    BOOL,	set){    if (set && fake_zap < 1) {	CTRACE(tfp, "\r *** Set simulated 'Z'");	if (fake_zap)	    CTRACE(tfp, ", %d pending", fake_zap);	CTRACE(tfp, " ***\n");	fake_zap++;    } else if (!set && fake_zap) {	CTRACE(tfp, "\r *** Unset simulated 'Z'");	CTRACE(tfp, ", %d pending", fake_zap);	CTRACE(tfp, " ***\n");	fake_zap = 0;    }}