I want you to express the middle square method with the Racket program.

In the square extraction method, when the number of digits of the generated random number is n, the square of the initial value s is calculated, and that value is regarded as a 2n digit number (the number of digits squared as shown in the example below). If is not enough, 0 is added.) The n numbers in the center are used as the first random number. Next, square this random number and take the n numbers in the center in the same way to make the next random number.

Example: Suppose a 4-digit seed is taken. seed = 4765 Hence, square of seed is = 4765 * 4765 = 22705225 Now, from this 8-digit number, any four digits are extracted (Say, the middle four). So, the new seed value becomes seed = 7052 Now, square of this new seed is = 7052 * 7052 = 49730704 Again, the same set of 4-digits is extracted. So, the new seed value becomes seed = 7307 Example: Suppose a 4-digit seed is taken. seed = 4765 Hence, square of seed is = 4765 * 4765 = 22705225 Now, from this 8-digit number, any four digits are extracted (Say, the middle four). So, the new seed value becomes seed = 7052 Now, square of this new seed is = 7052 * 7052 = 49730704 Again, the same set of 4-digits is extracted. So, the new seed value becomes seed = 7307