%%HP: T(3)A(D)F(.);
\<< 1. 4.
  FOR n 'MDAT' n GET
n
    IF 3. \=/
    THEN OBJ\-> DROP
    END
  NEXT
\>>