lab-02-htdf.rkt - DrRacket* File Edit iew Language Racket Insert Iabs Help lab-02-htdf.rkr (def Handin Check Syntax Df Step R RuStop fine ...) HtDF Lab, Problem 1 PROBLEM: Design a function called square? that consumes an image and determines : whether the image's height is the same as the image's width (@problem 1) (@htdf square?)!!UNCOMMENT this line when you start on this function HtDF Lab, Problem 2 PROBLEM: Design a function named underline that consumes an image and produces that image underlined by a black line of the same width. For example, (underline (circle 20 "solid" "green")) :should produce ;(above (circle 20 "solid""green") (@problem 2) (rectangle 40 2 "solid" "black")) : (Chtdf underline)!UNCOMMENT this line when you start on this function lab-02-htdf.rkt- DrRacket* File Edit View Language Racket lab-02-htdf.rkr (define..) Insert Iabs Help SPD Handin Check Syntax P. Step-Run Stop HtDF Lab, Problem 3 PROBLEM: : A (much too) simple scheme for pluralizing words in English is to add an ;s at the end unless the word already ends in s Design a function that consumes a string, and adds s to the end unless : the string already ends in s (@problem 3) : (@htdf pluralize)!!UNCOMMENT this line when you start on this functio HtDF Lab, Problem 4 PROBLEM: Design a function called nth-char-equal? that consumes two strings :and a natural and produces true if the strings both have length greater than n and have the same character at position n. Note, the signature for such a function is: : (esignature String String Natural -Boolean) The tag and template for such a function are: :(template String) :(define (nth-char-equal? s1 s2 n) ::(.. s1 s2 n)) (@problem 4) : (@htdf nth-char-equal?)!! !UNCOMMENT this line when you start on this function