doWhile source
0 -> # !
otherwise val is $ + 1;
$val !
$val -> if <|?($ mod 6 matches <~|=0>)> -> # !
end doWhile
$doWhile !