clear-unrelated-words ( words affected-words -- )

Vocabulary

help.markup.private

Inputs

words	an object
affected-words	an object

Outputs

None

Definition

USING: sequences sets words ;

IN: help.markup.private

:: clear-unrelated-words ( words affected-words -- )
    affected-words words diff
    [ "related" [ words diff ] change-word-prop ] each ;