add prime in racket