CPAN::Groonga

op and bottom cards
my ($t, $b) = $deck->find( 1, -1 );
ok( $deck->running_cuts );
isnt( $deck->find(  1 ), $t );
isnt( $deck->find( -1 ), $b );

# running cuts accepts a parameter
ok( $deck->running_

$deck->get_deck();

$deck->cut();

my @after_cutting = $deck->get_deck();

isnt( $before_cutting[0], $after_cutting[0] );
isnt( $before_cutting[-1], $after_cutting[-1] );

# cutting above a card moves

nd bottom cards
my ($t, $b) = $deck->find( 1, -1 );
ok( $deck->overhand_shuffle );
isnt( $deck->find(  1 ), $t );
isnt( $deck->find( -1 ), $b );

# overhand shuffle accepts a parameter
ok( $deck->over

nd bottom cards

my ($t, $b) = $deck->find( 1, -1 );

ok( $deck->hindu_shuffle );

isnt( $deck->find(  1 ), $t );
isnt( $deck->find( -1 ), $b );

# hindu shuffle accepts a parameter
ok( $deck->hindu_s

and new_deck_order don't share the order of hearts, spades and clubs
for ( 1 .. 26, 40 .. 52 ) {
	isnt( $deck->find( $_ ), $fournier->find( $_ ) );
}

# empty deck doesn't have cards
my $empty_deck = 

order
cmp_ok( $deck->distance( $tenth_from_bottom, $bottom ), '>', 9);

# bottom card has changed
isnt( $before_shuffling[-1], $after_shuffling[-1] );

# deck has the same amount of cards as in the be