Games::RailRoad::Types - private types for the distribution

  Jerome Quelin

# 
# This file is part of Games-RailRoad
# 
# This software is copyright (c) 2008 by Jerome Quelin.
# 
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
# 
use 5.010;
use strict;
use warnings;

package Games::RailRoad::Types;
BEGIN {
  $Games::RailRoad::Types::VERSION = '1.101330';
}
# ABSTRACT: private types for the distribution

use MooseX::Types -declare => [ qw{ Num_0_1 } ];
use MooseX::Types::Moose qw{ Num };


# -- type definition

subtype Num_0_1,
    as Num,
    where   { $_ >= 0 && $_ <= 1},
    message { 'Num should be between 0 and 1' };

1;

__END__