[1]> (load "blackjack.fas") ;; Loading file blackjack.fas ... ;; Loaded file blackjack.fas T [2]> (load "bgen.fas") ;; Loading file bgen.fas ... ;; Loaded file bgen.fas T [3]> (gen-with-mating 10 5 1 4)