aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2024-03-06 22:25:12 -08:00
parent ed705008a8
commit 0df55f9f24
2196 changed files with 32999 additions and 3075 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Task/ISBN13-check-digit/AppleScript/isbn13-check-digit-1.applescript
View file

@ -27,7 +27,7 @@ on run
end |λ|
end script
map(test, {"978-1734314502", "978-1734314509", ¬
map(test, {"978-0596528126", "978-0596528120", ¬
"978-1788399081", "978-1788399083"})
end run

2
Task/ISBN13-check-digit/AppleScript/isbn13-check-digit-2.applescript
View file

@ -26,7 +26,7 @@ end validateISBN13
-- Test:
set output to {}
set verdicts to {"bad", "good"}
repeat with thisISBN13 in {"978-1734314502", "978-1734314509", "978-1788399081", "978-1788399083"}
repeat with thisISBN13 in {"978-0596528126", "978-0596528120", "978-1788399081", "978-1788399083"}
set isValid to validateISBN13(thisISBN13)
set end of output to thisISBN13 & ": " & item ((isValid as integer) + 1) of verdicts
end repeat