package Morsulus::Catalog::SetOf;

use strict;
use warnings;

use Object::InsideOut qw/ Set::Scalar::Valued /;

{
    my @the_sets :Field :Get('_get_the_set');
    
    sub _init :Init
    {
        my $self = shift;
        my $args = shift;
        my $the_set = Set::Scalar::Valued->new();
        $self->set(\@the_sets, $the_set);
        $self->inherit($the_set, $args);
    }
}

1;