### ----------------------------------------------------
### -- Geo::Ellipsoid
### -- Licenses: Artistic-2.0
### -- Authors: Tom Browder <tbrowder@acm.org> (translator Perl 5 to Raku, current maintainer), Jim Gibson (CPAN Perl 5 author, v1.12)
### -- File: t/05-to.t
### ----------------------------------------------------
### -- Chunk 2 of 5
a, 90, 0.0001);

($r, $a) = $e.to(0.000000, 1.000000,0.000000, 179.000000);
is-approx($r, 19814869.3612027, :$rel-tol); # perl 5: delta_ok
is-approx($a, 90, :abs-tol<0.0001>); #delta_within($a, 90, 0.0001);

($r, $a) = $e.to(0.000000, 1.000000,0.000000, 268.000000);
is-approx($r, 10352712.6437744, :$rel-tol); # perl 5: delta_ok
is-approx($a, 270, :abs-tol<0.0001>); #delta_within($a, 270, 0.0001);

($r, $a) = $e.to(0.000000, 1.000000,88.000000, 1.000000);
is-approx($r, 9778578.68718058, :$rel-tol); # perl 5: delta_ok
is-approx($a, 0, :abs-tol<0.0001>); #delta_within($a, 0, 0.0001);

($r, $a) = $e.to(0.000000, 1.000000,88.000000, 90.000000);
is-approx($r, 9998088.45002268, :$rel-tol); # perl 5: delta_ok
is-approx($a, 2.00642371485969, :abs-tol<0.0001>); #delta_within($a, 2.00642371485969, 0.0001);

($r, $a) = $e.to(0.000000, 1.000000,88.000000, 179.000000);
is-approx($r, 10225216.6599337, :$rel-tol); # perl 5: delta_ok
is-approx($a, 0.0700490322014982, :abs-tol<0.0001>); #delta_within($a, 0.0700490322014982, 0.0001);

($r, $a) = $e.to(0.000000, 1.000000,88.000000, 268.000000);
is-approx($r, 10013675.0566307, :$rel-tol); # perl 5: delta_ok
is-approx($a, 357.996044578105, :abs-tol<0.0001>); #delta_within($a, 357.996044578105, 0.0001);

($r, $a) = $e.to(0.000000, 90.000000,-88.000000, 1.000000);
is-approx($r, 9998088.45002268, :$rel-tol); # perl 5: delta_ok
is-approx($a, 182.00642371486, :abs-tol<0.0001>); #delta_within($a, 182.00642371486, 0.0001);

($r, $a) = $e.to(0.000000, 90.000000,-88.000000, 90.000000);
is-approx($r, 9778578.68718058, :$rel-tol); # perl 5: delta_ok
is-approx($a, 180, :abs-tol<0.0001>); #delta_within($a, 180, 0.0001);

($r, $a) = $e.to(0.000000, 90.000000,-88.000000, 179.000000);
is-approx($r, 9998088.45002268, :$rel-tol); # perl 5: delta_ok
is-approx($a, 177.99357628514, :abs-tol<0.0001>); #delta_within($a, 177.99357628514, 0.0001);

($r, $a) = $e.to(0.000000, 90.000000,-88.000000, 268.000000);
is-approx($r, 10225216.6599337, :$rel-tol); # perl 5: delta_ok
is-approx($a, 179.929950967799, :abs-tol<0.0001>); #delta_within($a, 179.929950967799, 0.0001);

($r, $a) = $e.to(0.000000, 90.000000,0.000000, 1.000000);
is-approx($r, 9907434.68060135, :$rel-tol); # perl 5: delta_ok
is-approx($a, 270, :abs-tol<0.0001>); #delta_within($a, 270, 0.0001);

($r, $a) = $e.to(0.000000, 90.000000,0.000000, 90.000000);
is-approx($r, 0, :abs-tol<0.1>); #delta_within($r, 0, 0.1);

($r, $a) = $e.to(0.000000, 90.000000,0.000000, 179.000000);
is-approx($r, 9907434.68060135, :$rel-tol); # perl 5: delta_ok
is-approx($a, 90, :abs-tol<0.0001>); #delta_within($a, 90, 0.0001);

($r, $a) = $e.to(0.000000, 90.000000,0.000000, 268.000000);
is-approx($r, 19814869.3612027, :$rel-tol); # perl 5: delta_ok
is-approx($a, 90, :abs-tol<0.0001>); #delta_within($a, 90, 0.0001);

($r, $a) = $e.to(0.000000, 90.000000,88.000000, 1.000000);
is-approx($r, 9998088.45002268, :$rel-tol); # perl 5: delta_ok
is-approx($a, 357.99357628514, :abs-tol<0.0001>); #delta_within($a, 357.99357628514, 0.0001);

($r, $a) = $e.to(0.000000, 90.000000,88.000000, 90.000000);
is-approx($r, 9778578.68718058, :$rel-tol); # perl 5: delta_ok
is-approx($a, 0, :abs-tol<0.0001>); #delta_within($a, 0, 0.0001);

($r, $a) = $e.to(0.000000, 90.000000,88.000000, 179.000000);
is-approx($r, 9998088.45002268, :$rel-tol); # perl 5: delta_ok
is-approx($a, 2.00642371485969, :abs-tol<0.0001>); #delta_within($a, 2.00642371485969, 0.0001);

($r, $a) = $e.to(0.000000, 90.000000,88.000000, 268.000000);
is-approx($r, 10225216.6599337, :$rel-tol); # perl 5: delta_ok
is-approx($a, 0.0700490322014982, :abs-tol<0.0001>); #delta_within($a, 0.0700490322014982, 0.0001);

($r, $a) = $e.to(0.000000, 179.000000,-88.000000, 1.000000);
is-approx($r, 10225216.6599337, :$rel-tol); # perl 5: delta_ok
is-approx($a, 180.070049032201, :abs-tol<0.0001>); #delta_within($a, 180.070049032201, 0.0001);

($r, $a) = $e.to(0.000000, 179.000000,-88.000000, 90.000000);
is-approx($r, 9998088.45002268, :$rel-tol); # perl 5: delta_ok
is-approx($a, 182.00642371486, :abs-tol<0.0001>); #delta_within($a, 182.00642371486, 0.0001);

($r, $a) = $e.to(0.000000, 179.000000,-88.000000, 179.000000);
is-approx($r, 9778578.68718058, :$rel-tol); # perl 5: delta_ok
is-approx($a, 180, :abs-tol<0.0001>); #delta_within($a, 180, 0.0001);

($r, $a) = $e.to(0.000000, 179.000000,-88.000000, 268.000000);
is-approx($r, 9998088.45002268, :$rel-tol); # perl 5: delta_ok
is-approx($a, 177.99357628514, :abs-tol<0.0001>); #delta_within($a, 177.99357628514, 0.0001);

($r, $a) = $e.to(0.000000, 179.000000,0.000000, 1.000000);
is-approx($r, 19814869.3612027, :$rel-tol); # perl 5: delta_ok
is-approx($a, 270, :abs-tol<0.0001>); #delta_within($a, 270, 0.0001);

($r, $a) = $e.to(0.000000, 179.000000,0.000000, 90.000000);
is-approx($r, 9907434.68060135, :$rel-tol); # perl 5: delta_ok
is-approx($a, 270, :abs-tol<0.0001>); #delta_within($a, 270, 0.0001);

($r, $a) = $e.to(0.000000, 179.000000,0.000000, 179.000000);
is-approx($r, 0, :abs-tol<0.1>); #delta_within($r, 0, 0.1);

($r, $a) = $e.to(0.000000, 179.000000,0.000000, 268.000000);
is-approx($r, 9907434.68060135, :$rel-tol); # perl 5: delta_ok
is-approx($a, 90, :abs-tol<0.0001>); #delta_within($a, 90, 0.0001);

($r, $a) = $e.to(0.000000, 179.000000,88.000000, 1.000000);
is-approx($r, 10225216.6599337, :$rel-tol); # perl 5: delta_ok
is-approx($a, 359.929950967799, :abs-tol<0.0001>); #delta_within($a, 359.929950967799, 0.0001);

($r, $a) = $e.to(0.000000, 179.000000,88.000000, 90.000000);
is-approx($r, 9998088.45002268, :$rel-tol); # perl 5: delta_ok
is-approx($a, 357.99357628514, :abs-tol<0.0001>); #delta_within($a, 357.99357628514, 0.0001);

($r, $a) = $e.to(0.000000, 179.000000,88.000000, 179.000000);
is-approx($r, 9778578.68718058, :$rel-tol); # perl 5: delta_ok
is-approx($a, 0, :abs-tol<0.0001>); #delta_within($a, 0, 0.0001);

($r, $a) = $e.to(0.000000, 179.000000,88.000000, 268.000000);
is-approx($r, 9998088.45002268, :$rel-tol); # perl 5: delta_ok
is-approx($a, 2.00642371485969, :abs-tol<0.0001>); #delta_within($a, 2.00642371485969, 0.0001);

($r, $a) = $e.to(0.000000, 268.000000,-88.000000, 1.000000);
is-approx($r, 10013675.0566307, :$rel-tol); # perl 5: delta_ok
is-approx($a, 177.996044578105, :abs-tol<0.0001>); #delta_within($a, 177.996044578105, 0.0001);

($r, $a) = $e.to(0.000000, 268.000000,-88.000000, 90.000000);
is-approx($r, 10225216.6599337, :$rel-tol); # perl 5: delta_ok
is-approx($a, 180.070049032201, :abs-tol<0.0001>); #delta_within($a, 180.070049032201, 0.0001);

($r, $a) = $e.to(0.000000, 268.000000,-88.000000, 179.000000);
is-approx($r, 9998088.45002268, :$rel-tol); # perl 5: delta_ok
is-approx($a, 182.00642371486, :abs-tol<0.0001>); #delta_within($a, 182.00642371486, 0.0001);

($r, $a) = $e.to(0.000000, 268.000000,-88.000000, 268.000000);
is-approx($r, 9778578.68718058, :$rel-tol); # perl 5: delta_ok
is-approx($a, 180, :abs-tol<0.0001>); #delta_within($a, 180, 0.0001);

($r, $a) = $e.to(0.000000, 268.000000,0.000000, 1.000000);
is-approx($r, 10352712.6437744, :$rel-tol); # perl 5: delta_ok
is-approx($a, 90, :abs-tol<0.0001>); #delta_within($a, 90, 0.0001);

($r, $a) = $e.to(0.000000, 268.000000,0.000000, 90.000000);
is-approx($r, 19814869.3612027, :$rel-tol); # perl 5: delta_ok
is-approx($a, 270, :abs-tol<0.0001>); #delta_within($a, 270, 0.0001);

($r, $a) = $e.to(0.000000, 268.000000,0.000000, 179.000000);
is-approx($r, 9907434.68060135, :$rel-tol); # perl 5: delta_ok
is-approx($a, 270, :abs-tol<0.0001>); #delta_within($a, 270, 0.0001);

($r, $a) = $e.to(0.000000, 268.000000,0.000000, 268.000000);
is-approx($r, 0, :abs-tol<0.1>); #delta_within($r, 0, 0.1);

($r, $a) = $e.to(0.000000, 268.000000,88.000000, 1.000000);
is-approx($r, 10013675.0566307, :$rel-tol); # perl 5: delta_ok
is-approx($a, 2.00395542189512, :abs-tol<0.0001>); #delta_within($a, 2.00395542189512, 0.0001);

($r, $a) = $e.to(0.000000, 268.000000,88.000000, 90.000000);
is-approx($r, 10225216.6599337, :$rel-tol); # perl 5: delta_ok
is-approx($a, 359.929950967799, :abs-tol<0.0001>); #delta_within($a, 359.929950967799, 0.0001);

($r, $a) = $e.to(0.000000, 268.000000,88.000000, 179.000000);
is-approx($r, 9998088.45002268, :$rel-tol); # perl 5: delta_ok
is-approx($a, 357.99357628514, :abs-tol<0.0001>); #delta_within($a, 357.99357628514, 0.0001);

($r, $a) = $e.to(0.000000, 268.000000,88.000000, 268.000000);
is-approx($r, 9778578.68718058, :$rel-tol); # perl 5: delta_ok
is-approx($a, 0, :abs-tol<0.0001>); #delta_within($a, 0, 0.0001);

($r, $a) = $e.to(88.000000, 1.000000,-88.000000, 1.000000);
is-approx($r, 19557157.3743612, :$rel-tol); # perl 5: delta_ok
is-approx($a, 180, :abs-tol<0.0001>); #delta_within($a, 180, 0.0001);

($r, $a) = $e.to(88.000000, 1.000000,-88.000000, 90.000000);
is-approx($r, 19685321.6740635, :$rel-tol); # perl 5: delta_ok
is-approx($a, 135.475142548896, :abs-tol<0.0001>); #delta_within($a, 135.475142548896, 0.0001);

($r, $a) = $e.to(88.000000, 1.000000,-88.000000, 179.000000);
is-approx($r, 19996176.9000454, :$rel-tol); # perl 5: delta_ok
is-approx($a, 90.9888413924734, :abs-tol<0.0001>); #delta_within($a, 90.9888413924734, 0.0001);

($r, $a) = $e.to(88.000000, 1.000000,-88.000000, 268.000000);
is-approx($r, 19696447.0104273, :$rel-tol); # perl 5: delta_ok
is-approx($a, 226.525093703136, :abs-tol<0.0001>); #delta_within($a, 226.525093703136, 0.0001);

($r, $a) = $e.to(88.000000, 1.000000,0.000000, 1.000000);
is-approx($r, 9778578.68718058, :$rel-tol); # perl 5: delta_ok
is-approx($a, 180, :abs-tol<0.0001>); #delta_within($a, 180, 0.0001);

($r, $a) = $e.to(88.000000, 1.000000,0.000000, 90.000000);
is-approx($r, 9998088.45002268, :$rel-tol); # perl 5: delta_ok
is-approx($a, 90.988841392441, :abs-tol<0.0001>); #delta_within($a, 90.988841392441, 0.0001);

($r, $a) = $e.to(88.000000, 1.000000,0.000000, 179.000000);
is-approx($r, 10225216.6599337, :$rel-tol); # perl 5: delta_ok
is-approx($a, 2.00084925741569, :abs-tol<0.0001>); #delta_within($a, 2.00084925741569, 0.0001);

($r, $a) = $e.to(88.000000, 1.000000,0.000000, 268.000000);
is-approx($r, 10013675.0566307, :$rel-tol); # perl 5: delta_ok
is-approx($a, 273.008712433203, :abs-tol<0.0001>); #delta_within($a, 273.008712433203, 0.0001);

($r, $a) = $e.to(88.000000, 1.000000,88.000000, 1.000000);
is-approx($r, 0, :abs-tol<0.1>); #delta_within($r, 0, 0.1);

($r, $a) = $e.to(88.000000, 1.000000,88.000000, 90.000000);
is-approx($r, 313115.736403702, :$rel-tol); # perl 5: delta_ok
is-approx($a, 45.5174540384878, :abs-tol<0.0001>); #delta_within($a, 45.5174540384878, 0.0001);

($r, $a) = $e.to(88.000000, 1.000000,88.000000, 179.000000);
is-approx($r, 446706.010760529, :$rel-tol); # perl 5: delta_ok
is-approx($a, 1.00060941707181, :abs-tol<0.0001>); #delta_within($a, 1.00060941707181, 0.0001);

($r, $a) = $e.to(88.000000, 1.000000,88.000000, 268.000000);
is-approx($r, 324047.278966282, :$rel-tol); # perl 5: delta_ok
is-approx($a, 316.482566859219, :abs-tol<0.0001>); #delta_within($a, 316.482566859219, 0.0001);

($r, $a) = $e.to(88.000000, 90.000000,-88.000000, 1.000000);
is-approx($r, 19685321.6740635, :$rel-tol); # perl 5: delta_ok
is-approx($a, 224.524857451104, :abs-tol<0.0001>); #delta_within($a, 224.524857451104, 0.0001);

($r, $a) = $e.to(88.000000, 90.000000,-88.000000, 90.000000);
is-approx($r, 19557157.3743612, :$rel-tol); # perl 5: delta_ok
is-approx($a, 180, :abs-tol<0.0001>); #delta_within($a, 180, 0.0001);

($r, $a) = $e.to(88.000000, 90.000000,-88.000000, 179