BURN
case BURN:
type = BURN;
if (Levitation && type != BURN) { /* riv05!a3 */
(oep->engr_type == BURN) ? "burned" : "engraved");
(type == ENGRAVE) ? "engrave" : (type == BURN) ? "burn" : "write");
if (type == BURN)
case BURN: