M: maxlist remove-border ( maxlist -- )
    min>> remove ;