Data update
This commit is contained in:
parent
0df55f9f24
commit
aec8ed51b6
1045 changed files with 18889 additions and 2777 deletions
|
|
@ -1,15 +1,19 @@
|
|||
val .luhntest = f(.s) {
|
||||
val .luhntest = fn(.s) {
|
||||
val .t = [0, 2, 4, 6, 8, 1, 3, 5, 7, 9]
|
||||
val .numbers = s2n .s
|
||||
val .oddeven = len(.numbers) rem 2
|
||||
|
||||
for[=0] .i of .numbers {
|
||||
_for += if(.i rem 2 == .oddeven: .numbers[.i]; .t[.numbers[.i]+1])
|
||||
_for += if .i rem 2 == .oddeven {
|
||||
.numbers[.i]
|
||||
} else {
|
||||
.t[.numbers[.i]+1]
|
||||
}
|
||||
} div 10
|
||||
}
|
||||
|
||||
val .isintest = f(.s) {
|
||||
matching(re/^[A-Z][A-Z][0-9A-Z]{9}[0-9]$/, .s) and
|
||||
val .isintest = fn(.s) {
|
||||
.s -> re/^[A-Z][A-Z][0-9A-Z]{9}[0-9]$/ and
|
||||
.luhntest(join s2n .s)
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue