File Coverage

blib/lib/Math/Logic/Ternary/TAPI_9.pm
Criterion Covered Total %
statement 12 16 75.0
branch n/a
condition n/a
subroutine 4 5 80.0
pod 0 1 0.0
total 16 22 72.7


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::TAPI_9;
6              
7 1     1   73935 use strict;
  1         2  
  1         26  
8 1     1   5 use warnings;
  1         2  
  1         29  
9 1     1   5 use Carp qw(croak);
  1         2  
  1         43  
10 1     1   793 use Math::BigInt try => 'GMP,Pari';
  1         23180  
  1         6  
11              
12             our $VERSION = '0.004';
13              
14             sub new {
15 0     0 0   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__