Factorizationからn番目のFactorを取り出します (: factorization-nth (-> (Opt Factorization) Natural (Opt Factor))) (define (factorization-nth facz n) (: F (-> Factorization Natural (Opt Factor))) (define (F f n) (cond ((null? f) (None)) ((= …