2. (From "Programming in Haskell", Section 4.8 "Exercises", Exercise 8) The Luhn algorithm is used to check bank card numbers for simple errors such as mistyping a digit, and proceeds as follows: consider each digit as a separate number; moving left, double every other number from the second last; • subtract 9 from each number that is now greater than 9; add all the resulting numbers together; if the total is divisible by 10, the card number is valid. See also the Wikipedia entry on the Luhn algorithm. Define a function. luhnDouble :: Int -> Int that doubles a digit and subtracts 9 if the result is greater than 9. For example: > luhnDouble 3 6 > luhnDouble 6 3 Using luhnDouble and the integer remainder function mod, define a function luhn Int -> Int -> Int -> Int -> Bool hat decides if a four digit bank card number is valid (according to the Luhn algorithm described above). For example: > luhn 1 784 True > luhn 4 783 False 3. Run the pre-submit script to check for any (compilation) errors before submitting by running in the terminal:

Computer Networking: A Top-Down Approach (7th Edition)
7th Edition
ISBN:9780133594140
Author:James Kurose, Keith Ross
Publisher:James Kurose, Keith Ross
Chapter1: Computer Networks And The Internet
Section: Chapter Questions
Problem R1RQ: What is the difference between a host and an end system? List several different types of end...
icon
Related questions
Question
Please don’t give any spam or same answer I will rate unhelpful
2. (From "Programming in Haskell", Section 4.8 "Exercises", Exercise 8)
The Luhn algorithm is used to check bank card numbers for simple errors such as mistyping a
digit, and proceeds as follows:
consider each digit as a separate number;
• moving left, double every other number from the second last;
• subtract 9 from each number that is now greater than 9;
add all the resulting numbers together;
if the total is divisible by 10, the card number is valid.
See also the Wikipedia entry on the Luhn algorithm.
Define a function
luhnDouble :: Int -> Int
that doubles a digit and subtracts 9 if the result is greater than 9. For example:
> luhnDouble 3
6
> luhnDouble 6
3
Using luhnDouble and the integer remainder function mod, define a function
luhn Int -> Int -> Int -> Int -> Bool
that decides if a four digit bank card number is valid (according to the Luhn algorithm
described above). For example:
> luhn 1 784
True
> luhn 4 783
False
3. Run the pre-submit script to check for any (compilation) errors before submitting by
running in the terminal:
Transcribed Image Text:2. (From "Programming in Haskell", Section 4.8 "Exercises", Exercise 8) The Luhn algorithm is used to check bank card numbers for simple errors such as mistyping a digit, and proceeds as follows: consider each digit as a separate number; • moving left, double every other number from the second last; • subtract 9 from each number that is now greater than 9; add all the resulting numbers together; if the total is divisible by 10, the card number is valid. See also the Wikipedia entry on the Luhn algorithm. Define a function luhnDouble :: Int -> Int that doubles a digit and subtracts 9 if the result is greater than 9. For example: > luhnDouble 3 6 > luhnDouble 6 3 Using luhnDouble and the integer remainder function mod, define a function luhn Int -> Int -> Int -> Int -> Bool that decides if a four digit bank card number is valid (according to the Luhn algorithm described above). For example: > luhn 1 784 True > luhn 4 783 False 3. Run the pre-submit script to check for any (compilation) errors before submitting by running in the terminal:
Expert Solution
trending now

Trending now

This is a popular solution!

steps

Step by step

Solved in 2 steps

Blurred answer
Recommended textbooks for you
Computer Networking: A Top-Down Approach (7th Edi…
Computer Networking: A Top-Down Approach (7th Edi…
Computer Engineering
ISBN:
9780133594140
Author:
James Kurose, Keith Ross
Publisher:
PEARSON
Computer Organization and Design MIPS Edition, Fi…
Computer Organization and Design MIPS Edition, Fi…
Computer Engineering
ISBN:
9780124077263
Author:
David A. Patterson, John L. Hennessy
Publisher:
Elsevier Science
Network+ Guide to Networks (MindTap Course List)
Network+ Guide to Networks (MindTap Course List)
Computer Engineering
ISBN:
9781337569330
Author:
Jill West, Tamara Dean, Jean Andrews
Publisher:
Cengage Learning
Concepts of Database Management
Concepts of Database Management
Computer Engineering
ISBN:
9781337093422
Author:
Joy L. Starks, Philip J. Pratt, Mary Z. Last
Publisher:
Cengage Learning
Prelude to Programming
Prelude to Programming
Computer Engineering
ISBN:
9780133750423
Author:
VENIT, Stewart
Publisher:
Pearson Education
Sc Business Data Communications and Networking, T…
Sc Business Data Communications and Networking, T…
Computer Engineering
ISBN:
9781119368830
Author:
FITZGERALD
Publisher:
WILEY