#!/usr/bin/perl

use lib 'lib';

use Conclave::kPSS;
use Data::Dumper;

my @terms = @ARGV;
my $t = shift;

my $kpss = kpss_create($t);
foreach (@terms) {
  $pkss = kpss_union($kpss, kpss_create($_));
}

print Dumper kpss_flatten($kpss);