You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
27 lines
715 B
27 lines
715 B
3 years ago
|
(ns lucians-luscious-lasagna)
|
||
|
|
|
||
|
|
(def expected-time
|
||
|
|
40
|
||
|
|
)
|
||
|
|
|
||
|
|
(defn remaining-time
|
||
|
|
"Takes the actual time in minutes the lasagna has been in the oven,
|
||
|
|
and returns how many minutes the lasagna still has to remain in the oven."
|
||
|
|
[actual-time]
|
||
|
|
(- expected-time actual-time)
|
||
|
|
)
|
||
|
|
|
||
|
|
(defn prep-time
|
||
|
|
"Takes the number of layers added to the lasagna,
|
||
|
|
and returns how many minutes you spent preparing the lasagna"
|
||
|
|
[num-layers]
|
||
|
|
(* 2 num-layers)
|
||
|
|
)
|
||
|
|
|
||
|
|
(defn total-time
|
||
|
|
"Takes the number of layers of lasagna and the actual time in minutes it has been in the oven.
|
||
|
|
Returns how many minutes in total you've worked on cooking the lasagna"
|
||
|
|
[num-layers actual-time]
|
||
|
|
(+ (prep-time num-layers) actual-time)
|
||
|
|
)
|