Jump to content

ISBN13 check digit: Difference between revisions

m
No edit summary
Line 648:
<lang rebol>validISBN?: function [isbn][
currentCheck: to :integer to :string last isbn
isbn: map split chop replace isbn "-" "" ='d -> [to :integer] d
 
s: 0
1,532

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.