main Program

Variables

Type Attributes Name Initial
type(Random_) :: random
integer(kind=int32), allocatable :: cards(:)
integer(kind=int32) :: i