Fill in the skeleton given for pipe which uses foldl' to get a function pipe :: [(a -> a)] →> (a -> a) such that pipe [f1,...,fn] x (where f1,..., fn are functions!) should return f1(f2(...(fn x))). Again, your task is to fill in the appropriate values for 1. the step function f and 2. the base cas base. Once you have implemented the function, you should get the following behavior: ghci> pipe [] 3 3 ghci> pipe [(\x -> x+x), (\x -> x + 3)] 3 12 ghci> pipe [(\x -> x * 4), (\x -> x + x)] 3 24
Fill in the skeleton given for pipe which uses foldl' to get a function pipe :: [(a -> a)] →> (a -> a) such that pipe [f1,...,fn] x (where f1,..., fn are functions!) should return f1(f2(...(fn x))). Again, your task is to fill in the appropriate values for 1. the step function f and 2. the base cas base. Once you have implemented the function, you should get the following behavior: ghci> pipe [] 3 3 ghci> pipe [(\x -> x+x), (\x -> x + 3)] 3 12 ghci> pipe [(\x -> x * 4), (\x -> x + x)] 3 24
Database System Concepts
7th Edition
ISBN:9780078022159
Author:Abraham Silberschatz Professor, Henry F. Korth, S. Sudarshan
Publisher:Abraham Silberschatz Professor, Henry F. Korth, S. Sudarshan
Chapter1: Introduction
Section: Chapter Questions
Problem 1PE
Related questions
Question
![48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
| `pipe [f1,..., fn] x` should return `f1 (f2(... (fn x)))`
>>> pipe [] 3
3
>>> pipe [(x −> x+x), (\x -> x + 3)] 3
12
>>> pipe [(\x -> x * 4), (\x -> x + x)] 3
24
pipe: [(a -> a)] -> (a -> a)
pipe fs
= foldLeft f base fs
where
f a x = error "TBD: pipe: f"
base = error "TBD: pipe: base"](/v2/_next/image?url=https%3A%2F%2Fcontent.bartleby.com%2Fqna-images%2Fquestion%2Fea002665-0929-4e8d-97c0-a4ab05443d97%2Fe7889ddf-5b87-4a0f-b923-e9ba8c5d085d%2Feekgubg_processed.png&w=3840&q=75)
Transcribed Image Text:48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
| `pipe [f1,..., fn] x` should return `f1 (f2(... (fn x)))`
>>> pipe [] 3
3
>>> pipe [(x −> x+x), (\x -> x + 3)] 3
12
>>> pipe [(\x -> x * 4), (\x -> x + x)] 3
24
pipe: [(a -> a)] -> (a -> a)
pipe fs
= foldLeft f base fs
where
f a x = error "TBD: pipe: f"
base = error "TBD: pipe: base"
![Fill in the skeleton given for pipe which uses foldl' to get a function
pipe :: [(a -> a)] -> (a -> a)
such that pipe [f1,...,fn] x (where f1,..., fn are functions!) should return
f1(f2(...(fn x))) .
Again, your task is to fill in the appropriate values for
1. the step function f and
2. the base case base.
Once you have implemented the function, you should get the following behavior:
ghci pipe [] 3
3
ghci> pipe [(\x −> x+x), (\x −> x + 3)] 3
12
ghci> pipe [(\x -> x * 4), (\x -> x + x)] 3
24
0₁](/v2/_next/image?url=https%3A%2F%2Fcontent.bartleby.com%2Fqna-images%2Fquestion%2Fea002665-0929-4e8d-97c0-a4ab05443d97%2Fe7889ddf-5b87-4a0f-b923-e9ba8c5d085d%2F475rhe_processed.png&w=3840&q=75)
Transcribed Image Text:Fill in the skeleton given for pipe which uses foldl' to get a function
pipe :: [(a -> a)] -> (a -> a)
such that pipe [f1,...,fn] x (where f1,..., fn are functions!) should return
f1(f2(...(fn x))) .
Again, your task is to fill in the appropriate values for
1. the step function f and
2. the base case base.
Once you have implemented the function, you should get the following behavior:
ghci pipe [] 3
3
ghci> pipe [(\x −> x+x), (\x −> x + 3)] 3
12
ghci> pipe [(\x -> x * 4), (\x -> x + x)] 3
24
0₁
Expert Solution

This question has been solved!
Explore an expertly crafted, step-by-step solution for a thorough understanding of key concepts.
This is a popular solution!
Trending now
This is a popular solution!
Step by step
Solved in 4 steps with 2 images

Knowledge Booster
Learn more about
Need a deep-dive on the concept behind this application? Look no further. Learn more about this topic, computer-science and related others by exploring similar questions and additional content below.Recommended textbooks for you

Database System Concepts
Computer Science
ISBN:
9780078022159
Author:
Abraham Silberschatz Professor, Henry F. Korth, S. Sudarshan
Publisher:
McGraw-Hill Education

Starting Out with Python (4th Edition)
Computer Science
ISBN:
9780134444321
Author:
Tony Gaddis
Publisher:
PEARSON

Digital Fundamentals (11th Edition)
Computer Science
ISBN:
9780132737968
Author:
Thomas L. Floyd
Publisher:
PEARSON

Database System Concepts
Computer Science
ISBN:
9780078022159
Author:
Abraham Silberschatz Professor, Henry F. Korth, S. Sudarshan
Publisher:
McGraw-Hill Education

Starting Out with Python (4th Edition)
Computer Science
ISBN:
9780134444321
Author:
Tony Gaddis
Publisher:
PEARSON

Digital Fundamentals (11th Edition)
Computer Science
ISBN:
9780132737968
Author:
Thomas L. Floyd
Publisher:
PEARSON

C How to Program (8th Edition)
Computer Science
ISBN:
9780133976892
Author:
Paul J. Deitel, Harvey Deitel
Publisher:
PEARSON

Database Systems: Design, Implementation, & Manag…
Computer Science
ISBN:
9781337627900
Author:
Carlos Coronel, Steven Morris
Publisher:
Cengage Learning

Programmable Logic Controllers
Computer Science
ISBN:
9780073373843
Author:
Frank D. Petruzella
Publisher:
McGraw-Hill Education