Created isPrime.prolog

DO It!