run-project-euler ( -- )

Vocabulary

project-euler

Inputs

None

Outputs

None

Definition

USING: io kernel prettyprint project-euler.private sequences
vocabs.loader ;

IN: project-euler

: run-project-euler ( -- )
    problem-prompt dup problem-solved? [
        "Answer: " write
        dup number>euler "project-euler." prepend run
        "Source: " write solution-path .
    ] [ drop "That problem has not been solved yet..." print ]
    if ;