(17 . 9)(17 . 8)
617 ------------------------------------------------------------------------------
618 ------------------------------------------------------------------------------
619
620 with OS; use OS;
621
622 with FZ_Type; use FZ_Type;
623 with OS; use OS;
624 with FFA; use FFA;
625
626
627 package body FFA_RNG is