(define-library (chibi math prime) (import (scheme base) (scheme inexact) (srfi 27)) (cond-expand ((library (srfi 33)) (import (srfi 33))) (else (import (srfi 60)))) (export prime? nth-prime prime-above prime-below factor perfect? totient aliquot provable-prime? probable-prime? random-prime random-prime-distinct-from coprime? random-coprime modular-inverse modular-expt miller-rabin-composite?) (include "prime.scm"))