File Coverage

blib/lib/PRANG/Cookbook/Role/Location.pm

Criterion	Covered	Total	%
statement	12	12	100.0
branch			n/a
condition			n/a
subroutine	4	4	100.0
pod			n/a
total	16	16	100.0

package PRANG::Cookbook::Role::Location;
$PRANG::Cookbook::Role::Location::VERSION = '0.21';
use Moose::Role;
use PRANG::Graph;
use Moose::Util::TypeConstraints;
use PRANG::XMLSchema::Types;

subtype 'PRANG::Cookbook::Latitude'
	=> as 'PRANG::XMLSchema::float',
	=> where {
	$_ >= -90.0 and $_ <= 90.0;
	};

subtype 'PRANG::Cookbook::Longitude'
	=> as 'PRANG::XMLSchema::float',
	=> where {
	$_ >= -180.0 and $_ <= 180.0;
	};

has_attr 'latitude' =>
	is => 'rw',
	isa => 'PRANG::Cookbook::Latitude',
	xml_required => 1,
	;

has_attr 'longitude' =>
	is => 'rw',
	isa => 'PRANG::Cookbook::Longitude',
	xml_required => 1,
	;

1;