Eban numbers: Difference between revisions
Content added Content deleted
m (→{{header|Tailspin}}: syntax update) |
|||
Line 1,823: | Line 1,823: | ||
def number: $; |
def number: $; |
||
$ -> \(<1..> $!\) -> # |
$ -> \(<1..> $!\) -> # |
||
<=0> $number ! |
when <=0> do $number ! |
||
<?($ mod 1000 <=0|=2|=4|=6|30..66?($ mod 10 <=0|=2|=4|=6>)>)> $ ~/ 1000 -> # |
when <?($ mod 1000 <=0|=2|=4|=6|30..66?($ mod 10 <=0|=2|=4|=6>)>)> do $ ~/ 1000 -> # |
||
end isEban |
end isEban |
||
</lang> |
</lang> |