diff options
author | P. J. McDermott <pj@pehjota.net> | 2017-01-05 17:29:26 (EST) |
---|---|---|
committer | P. J. McDermott <pj@pehjota.net> | 2017-01-05 17:29:26 (EST) |
commit | 336a1a26c561f5f328405e59b1126826676823f3 (patch) | |
tree | aa42b23a3727f558889f4b2bd22db6d715678ac5 | |
parent | 95de0f40d6059cc62c7d3fb8295e12a74c128a95 (diff) | |
download | Math-Decimal-FastPP-336a1a26c561f5f328405e59b1126826676823f3.zip Math-Decimal-FastPP-336a1a26c561f5f328405e59b1126826676823f3.tar.gz Math-Decimal-FastPP-336a1a26c561f5f328405e59b1126826676823f3.tar.bz2 |
t/13_drhtz-drhfz.t: Add basic tests with $p=1
-rw-r--r-- | t/13_drhtz-drhfz.t | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/t/13_drhtz-drhfz.t b/t/13_drhtz-drhfz.t index 3cebf7a..fc8ee01 100644 --- a/t/13_drhtz-drhfz.t +++ b/t/13_drhtz-drhfz.t @@ -35,8 +35,12 @@ my $f; # a p r functions [ 23.1 , 0, "23." , \&drhtz, \&drhfz], [ 23.9 , 0, "24." , \&drhtz, \&drhfz], + [ 2.31, 1, "2.3", \&drhtz, \&drhfz], + [ 2.39, 1, "2.4", \&drhtz, \&drhfz], [-23.1 , 0, "-23." , \&drhtz, \&drhfz], [-23.9 , 0, "-24." , \&drhtz, \&drhfz], + [ -2.31, 1, "-2.3", \&drhtz, \&drhfz], + [ -2.39, 1, "-2.4", \&drhtz, \&drhfz], ); @tie_tests = ( [ 23.5 , 0, "23." , \&drhtz ], |