ordered-words-main ( -- )

Vocabulary

rosetta-code.ordered-words

Inputs

None

Outputs

None

Definition

USING: io sequences sequences.extras ;

IN: rosetta-code.ordered-words

: ordered-words-main ( -- )
    word-list [ ordered-word? ] filter all-longest
    [ print ] each ;