lib/Graph/GEXF/Role/Position.pm


1
2
3
4
5
6
7
8
9
10
11
12
13
14

package Graph::GEXF::Role::Position;

use Moose::Role;

for (qw/x y z/) {
    has $_ => (
        is      => 'rw',
        isa     => 'Num',
        lazy    => 1,
        default => '0.0',
    );
}

1;