Luhn test of credit card numbers: Difference between revisions

<syntaxhighlight lang="langur">val .luhntest = fn(.s) {

val .numberst = s2n[0, .s2, 4, 6, 8, 1, 3, 5, 7, 9]

val .oddevennumbers = len(.numbers)s rem-> 2s2n

for[=0] .i of .numbers {

_for += if(.i rem 2 == .oddeven: .numbers[.i]; .t[.numbers[.i]+1])

val .tests = {

for .key ofin .sort(keys(tests)) {

val .pass = .luhntest(.key)

write .key, ": ", .pass

writeln if(.pass == .tests[.key]: ""; " (LUHN TEST FAILED)")

}</syntaxhighlight>