Luhn test of credit card numbers: Difference between revisions
m
→{{header|RPL}}: typo
(Add bruijn) |
m (→{{header|RPL}}: typo) |
||
Line 5,706:
≪ → card
≪ 0 card SIZE 1 '''FOR''' j
card j DUP SUB
'''IF''' j 2 MOD NOT '''THEN '''
2 * 10 MOD LAST / FLOOR + '''END'''
| |||