n-split-lines ( n quot -- )


Vocabulary
benchmark.fasta

Inputs
nan object
quotan object


Outputs
None

Definition
USING: kernel math ;

IN: benchmark.fasta

:: n-split-lines ( n quot -- )
n line-length /mod [ [ line-length quot call ] times ] dip
quot unless-zero ; inline