Code in Haskell Please

Write a function integersqrt that returns the integer square root of a positive integer n. (The integer square root is defined to be the largest integer whose square is less than or equal to n, i.e. the result of integerSqrt 15 is 3 .). integersqrt : : Integer Integer Write a function negateTwoDigits that uses list comprehension to take a list of integers and return a list of integers with all of the two-digit integers negated