File Coverage

blib/lib/Math/PlanePath/Base/NSEW.pm
Criterion Covered Total %
statement 38 38 100.0
branch n/a
condition n/a
subroutine 13 13 100.0
pod n/a
total 51 51 100.0


line stmt bran cond sub pod time code
1             # Copyright 2014, 2015, 2016, 2017, 2018 Kevin Ryde
2              
3             # This file is part of Math-PlanePath.
4             #
5             # Math-PlanePath is free software; you can redistribute it and/or modify
6             # it under the terms of the GNU General Public License as published by the
7             # Free Software Foundation; either version 3, or (at your option) any later
8             # version.
9             #
10             # Math-PlanePath is distributed in the hope that it will be useful, but
11             # WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
12             # or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
13             # for more details.
14             #
15             # You should have received a copy of the GNU General Public License along
16             # with Math-PlanePath. If not, see .
17              
18              
19             package Math::PlanePath::Base::NSEW;
20 33     33   541 use 5.004;
  33         105  
21 33     33   227 use strict;
  33         63  
  33         825  
22              
23 33     33   169 use vars '$VERSION';
  33         85  
  33         1745  
24             $VERSION = 127;
25              
26 33     33   195 use constant dx_minimum => -1; # NSEW straight only
  33         74  
  33         1892  
27 33     33   198 use constant dx_maximum => 1;
  33         76  
  33         1668  
28 33     33   185 use constant dy_minimum => -1;
  33         209  
  33         1581  
29 33     33   189 use constant dy_maximum => 1;
  33         278  
  33         1590  
30              
31 33     33   359 use constant dsumxy_minimum => -1; # NSEW straight only
  33         82  
  33         1801  
32 33     33   186 use constant dsumxy_maximum => 1;
  33         62  
  33         1565  
33 33     33   192 use constant ddiffxy_minimum => -1;
  33         56  
  33         1508  
34 33     33   185 use constant ddiffxy_maximum => 1;
  33         68  
  33         1618  
35 33     33   195 use constant dir_maximum_dxdy => (0,-1); # South
  33         76  
  33         2091  
36              
37 33         1943 use constant _UNDOCUMENTED__dxdy_list => (1,0, # E
38             0,1, # N
39             -1,0, # W
40 33     33   201 0,-1); # S
  33         80  
41              
42             1;
43             __END__