File Coverage

blib/lib/Math/Logic/Ternary/TAPI27.pm
Criterion Covered Total %
statement 12 16 75.0
branch n/a
condition n/a
subroutine 4 5 80.0
pod 1 1 100.0
total 17 22 77.2


line stmt bran cond sub pod time code
1             # Copyright (c) 2012-2017 Martin Becker, Blaubeuren. All rights reserved.
2             # This package is free software; you can redistribute it and/or modify it
3             # under the same terms as Perl itself.
4              
5             package Math::Logic::Ternary::TAPI27;
6              
7 1     1   584 use strict;
  1         2  
  1         32  
8 1     1   5 use warnings;
  1         3  
  1         58  
9 1     1   7 use Carp qw(croak);
  1         1  
  1         70  
10 1     1   5 use Math::BigInt try => 'GMP,Pari';
  1         2  
  1         10  
11              
12             our $VERSION = '0.004';
13              
14             sub new {
15 0     0 1   my ($class, @trits) = @_;
16 0           croak "$class: class not yet fully implemented";
17 0           return bless [map { $_->Trits } @trits], $class;
  0            
18             }
19              
20             1;
21             __END__