my %moves;
$moves{'rook'} = [ [-7,0], [-6,0], [-5,0], [-4,0], [-3,0], [-2,0], [-1,0], [1,0], [2,0], [3,0], [4,0], [5,0], [6,0], [7,0], [0,-7], [0,-6], [0,-5], [0,-4], [0,-3], [0,-2], [0,-1], [0,1], [0,2], [0,3], [0,4], [0,5], [0,6], [0,7] ];


##</code><code>##

my @valid_moves = valid_moves( $type, $position );
is_valid_move( $type, $starting_position, $end_position );