This question asks you to define a parser for strings. You may use the standardparsing functions (e. g., those in Hutton, Ch. 8, or those inParsing. hs). Youcan also assume that all the character processing operations (as provided in Hut-ton, A. 3) are available to you, as if you hadimport Data. Charat the begin-ning of your program. Write a parser that recognizes stringss1s2s3, . . .wheres1is the uppercasecharacter ofs2. That is to say, strings starting with a capital letter, followed bythat same letter in lowercase form. Here are some examples of how your parser, myParser, should behave onvarious inputs: Main> parse myParser "aA" [] Main> parse myParser "Bbbc" [("Bb", "bc")] Main> parse myParser "Abbc" []