Define a scheme function (assoc-all keys a-list) where keys is a list of symbols and a-list is an assoc-list. (an assoc-list is a list …) whose elements are two-element lists whose first element is a key and whose second element is the associated value.) assoc-all returns a list of the data associated with elements of keys by a-list. e. g. (assoc-all '(a d c d) '((a apple)(b boy)(c (cat returns (apple dog (cat cow) dog). use map. note that you can't simply use assoc as one of the arguments to map; you need to use a lambda expression.

An external consultant recommends that a plant installs a bank of capacitors for power factor correction. this will reduce the peak electrical demand charges by an average of 93 kw every month. the plant current pays $13 per kw in peak demand charges. the capacitor bank will include 223 kw of fixed capacitors, and 183 of variable capacitors. the fixed capacitors cost $59 per kw, and the variable capacitors will cost $65 per kw. the consultant charges 21% of the equipment costs to install the capacitors. because this project will reduce the demand for the electric utility, they are prepared to provide a one-time rebate of $42 per kw of reduced demand. what is the simple payback period for this project (in years)?