Given the following ::= | {+ } | {with { } } | | { } (define-type F1WAE [num (n number?)] [add (Lhs F1WAE?) (rhs F1WAE?)] [with (name symbol?) (named-expr F1WAE?) (body F1WAE?)] [id (name symbol?)] [app (fun-name symbol?) (arg F1WAE?)]) Write a function that triples a number

# Write a function called ex3(n) which# 1. accepts as an input parameter an integer between 1 and 100# 2. Calculates and print the mersenne primes between 1 and this number# See en.wikipedia.org/wiki/Mersenne_prime for details# 3. Invoke ex3(16) to print results