### ----------------------------------------------------
### -- 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/09-bearing.t
### ----------------------------------------------------
### -- Chunk 3 of 7
 #delta_within($azp, 357.99357628514, 0.1);

$azs = $e_sym.bearing(0.000000,268.000000,88.000000,179.000000);
is-approx($azs, -2.00642371485969, :abs-tol<0.1>); #delta_within($azs, -2.00642371485969, 0.1);

$azs = $e_sym.bearing(0.000000,268.000000,88.000000,268.000000);
is-approx($azs, 0, :abs-tol<0.1>); #delta_within($azs, 0, 0.1);

$azp = $e_pos.bearing(88.000000,1.000000,-88.000000,1.000000);
is-approx($azp, 180, :abs-tol<0.1>); #delta_within($azp, 180, 0.1);

$azp = $e_pos.bearing(88.000000,1.000000,-88.000000,90.000000);
is-approx($azp, 135.475142548896, :abs-tol<0.1>); #delta_within($azp, 135.475142548896, 0.1);

$azs = $e_sym.bearing(88.000000,1.000000,-88.000000,90.000000);
is-approx($azs, 135.475142548896, :abs-tol<0.1>); #delta_within($azs, 135.475142548896, 0.1);

$azp = $e_pos.bearing(88.000000,1.000000,-88.000000,179.000000);
is-approx($azp, 90.9888413924734, :abs-tol<0.1>); #delta_within($azp, 90.9888413924734, 0.1);

$azs = $e_sym.bearing(88.000000,1.000000,-88.000000,179.000000);
is-approx($azs, 90.9888413924734, :abs-tol<0.1>); #delta_within($azs, 90.9888413924734, 0.1);

$azp = $e_pos.bearing(88.000000,1.000000,-88.000000,268.000000);
is-approx($azp, 226.525093703136, :abs-tol<0.1>); #delta_within($azp, 226.525093703136, 0.1);

$azs = $e_sym.bearing(88.000000,1.000000,-88.000000,268.000000);
is-approx($azs, -133.474906296864, :abs-tol<0.1>); #delta_within($azs, -133.474906296864, 0.1);

$azp = $e_pos.bearing(88.000000,1.000000,0.000000,1.000000);
is-approx($azp, 180, :abs-tol<0.1>); #delta_within($azp, 180, 0.1);

$azp = $e_pos.bearing(88.000000,1.000000,0.000000,90.000000);
is-approx($azp, 90.988841392441, :abs-tol<0.1>); #delta_within($azp, 90.988841392441, 0.1);

$azs = $e_sym.bearing(88.000000,1.000000,0.000000,90.000000);
is-approx($azs, 90.988841392441, :abs-tol<0.1>); #delta_within($azs, 90.988841392441, 0.1);

$azp = $e_pos.bearing(88.000000,1.000000,0.000000,179.000000);
is-approx($azp, 2.00084925741569, :abs-tol<0.1>); #delta_within($azp, 2.00084925741569, 0.1);

$azs = $e_sym.bearing(88.000000,1.000000,0.000000,179.000000);
is-approx($azs, 2.00084925741569, :abs-tol<0.1>); #delta_within($azs, 2.00084925741569, 0.1);

$azp = $e_pos.bearing(88.000000,1.000000,0.000000,268.000000);
is-approx($azp, 273.008712433203, :abs-tol<0.1>); #delta_within($azp, 273.008712433203, 0.1);

$azs = $e_sym.bearing(88.000000,1.000000,0.000000,268.000000);
is-approx($azs, -86.9912875667967, :abs-tol<0.1>); #delta_within($azs, -86.9912875667967, 0.1);

$azp = $e_pos.bearing(88.000000,1.000000,88.000000,90.000000);
is-approx($azp, 45.5174540384878, :abs-tol<0.1>); #delta_within($azp, 45.5174540384878, 0.1);

$azs = $e_sym.bearing(88.000000,1.000000,88.000000,90.000000);
is-approx($azs, 45.5174540384878, :abs-tol<0.1>); #delta_within($azs, 45.5174540384878, 0.1);

$azp = $e_pos.bearing(88.000000,1.000000,88.000000,179.000000);
is-approx($azp, 1.00060941707181, :abs-tol<0.1>); #delta_within($azp, 1.00060941707181, 0.1);

$azs = $e_sym.bearing(88.000000,1.000000,88.000000,179.000000);
is-approx($azs, 1.00060941707181, :abs-tol<0.1>); #delta_within($azs, 1.00060941707181, 0.1);

$azp = $e_pos.bearing(88.000000,1.000000,88.000000,268.000000);
is-approx($azp, 316.482566859219, :abs-tol<0.1>); #delta_within($azp, 316.482566859219, 0.1);

$azs = $e_sym.bearing(88.000000,1.000000,88.000000,268.000000);
is-approx($azs, -43.5174331407808, :abs-tol<0.1>); #delta_within($azs, -43.5174331407808, 0.1);

$azp = $e_pos.bearing(88.000000,90.000000,-88.000000,1.000000);
is-approx($azp, 224.524857451104, :abs-tol<0.1>); #delta_within($azp, 224.524857451104, 0.1);

$azs = $e_sym.bearing(88.000000,90.000000,-88.000000,1.000000);
is-approx($azs, -135.475142548896, :abs-tol<0.1>); #delta_within($azs, -135.475142548896, 0.1);

$azp = $e_pos.bearing(88.000000,90.000000,-88.000000,90.000000);
is-approx($azp, 180, :abs-tol<0.1>); #delta_within($azp, 180, 0.1);

$azp = $e_pos.bearing(88.000000,90.000000,-88.000000,179.000000);
is-approx($azp, 135.475142548896, :abs-tol<0.1>); #delta_within($azp, 135.475142548896, 0.1);

$azs = $e_sym.bearing(88.000000,90.000000,-88.000000,179.000000);
is-approx($azs, 135.475142548896, :abs-tol<0.1>); #delta_within($azs, 135.475142548896, 0.1);

$azp = $e_pos.bearing(88.000000,90.000000,-88.000000,268.000000);
is-approx($azp, 90.9888413924734, :abs-tol<0.1>); #delta_within($azp, 90.9888413924734, 0.1);

$azs = $e_sym.bearing(88.000000,90.000000,-88.000000,268.000000);
is-approx($azs, 90.9888413924734, :abs-tol<0.1>); #delta_within($azs, 90.9888413924734, 0.1);

$azp = $e_pos.bearing(88.000000,90.000000,0.000000,1.000000);
is-approx($azp, 269.011158607559, :abs-tol<0.1>); #delta_within($azp, 269.011158607559, 0.1);

$azs = $e_sym.bearing(88.000000,90.000000,0.000000,1.000000);
is-approx($azs, -90.988841392441, :abs-tol<0.1>); #delta_within($azs, -90.988841392441, 0.1);

$azp = $e_pos.bearing(88.000000,90.000000,0.000000,90.000000);
is-approx($azp, 180, :abs-tol<0.1>); #delta_within($azp, 180, 0.1);

$azp = $e_pos.bearing(88.000000,90.000000,0.000000,179.000000);
is-approx($azp, 90.988841392441, :abs-tol<0.1>); #delta_within($azp, 90.988841392441, 0.1);

$azs = $e_sym.bearing(88.000000,90.000000,0.000000,179.000000);
is-approx($azs, 90.988841392441, :abs-tol<0.1>); #delta_within($azs, 90.988841392441, 0.1);

$azp = $e_pos.bearing(88.000000,90.000000,0.000000,268.000000);
is-approx($azp, 2.00084925741569, :abs-tol<0.1>); #delta_within($azp, 2.00084925741569, 0.1);

$azs = $e_sym.bearing(88.000000,90.000000,0.000000,268.000000);
is-approx($azs, 2.00084925741569, :abs-tol<0.1>); #delta_within($azs, 2.00084925741569, 0.1);

$azp = $e_pos.bearing(88.000000,90.000000,88.000000,1.000000);
is-approx($azp, 314.482545961512, :abs-tol<0.1>); #delta_within($azp, 314.482545961512, 0.1);

$azs = $e_sym.bearing(88.000000,90.000000,88.000000,1.000000);
is-approx($azs, -45.5174540384878, :abs-tol<0.1>); #delta_within($azs, -45.5174540384878, 0.1);

$azp = $e_pos.bearing(88.000000,90.000000,88.000000,179.000000);
is-approx($azp, 45.5174540384878, :abs-tol<0.1>); #delta_within($azp, 45.5174540384878, 0.1);

$azs = $e_sym.bearing(88.000000,90.000000,88.000000,179.000000);
is-approx($azs, 45.5174540384878, :abs-tol<0.1>); #delta_within($azs, 45.5174540384878, 0.1);

$azp = $e_pos.bearing(88.000000,90.000000,88.000000,268.000000);
is-approx($azp, 1.00060941707181, :abs-tol<0.1>); #delta_within($azp, 1.00060941707181, 0.1);

$azs = $e_sym.bearing(88.000000,90.000000,88.000000,268.000000);
is-approx($azs, 1.00060941707181, :abs-tol<0.1>); #delta_within($azs, 1.00060941707181, 0.1);

$azp = $e_pos.bearing(88.000000,179.000000,-88.000000,1.000000);
is-approx($azp, 269.011158607527, :abs-tol<0.1>); #delta_within($azp, 269.011158607527, 0.1);

$azs = $e_sym.bearing(88.000000,179.000000,-88.000000,1.000000);
is-approx($azs, -90.9888413924734, :abs-tol<0.1>); #delta_within($azs, -90.9888413924734, 0.1);

$azp = $e_pos.bearing(88.000000,179.000000,-88.000000,90.000000);
is-approx($azp, 224.524857451104, :abs-tol<0.1>); #delta_within($azp, 224.524857451104, 0.1);

$azs = $e_sym.bearing(88.000000,179.000000,-88.000000,90.000000);
is-approx($azs, -135.475142548896, :abs-tol<0.1>); #delta_within($azs, -135.475142548896, 0.1);

$azp = $e_pos.bearing(88.000000,179.000000,-88.000000,179.000000);
is-approx($azp, 180, :abs-tol<0.1>); #delta_within($azp, 180, 0.1);

$azp = $e_pos.bearing(88.000000,179.000000,-88.000000,268.000000);
is-approx($azp, 135.475142548896, :abs-tol<0.1>); #delta_within($azp, 135.475142548896, 0.1);

$azs = $e_sym.bearing(88.000000,179.000000,-88.000000,268.000000);
is-approx($azs, 135.475142548896, :abs-tol<0.1>); #delta_within($azs, 135.475142548896, 0.1);

$azp = $e_pos.bearing(88.000000,179.000000,0.000000,1.000000);
is-approx($azp, 357.999150742584, :abs-tol<0.1>); #delta_within($azp, 357.999150742584, 0.1);

$azs = $e_sym.bearing(88.000000,179.000000,0.000000,1.000000);
is-approx($azs, -2.00084925741568, :abs-tol<0.1>); #delta_within($azs, -2.00084925741568, 0.1);

$azp = $e_pos.bearing(88.000000,179.000000,0.000000,90.000000);
is-approx($azp, 269.011158607559, :abs-tol<0.1>); #delta_within($azp, 269.011158607559, 0.1);

$azs = $e_sym.bearing(88.000000,179.000000,0.000000,90.000000);
is-approx($azs, -90.988841392441, :abs-tol<0.1>); #delta_within($azs, -90.988841392441, 0.1);

$azp = $e_pos.bearing(88.000000,179.000000,0.000000,179.000000);
is-approx($azp, 180, :abs-tol<0.1>); #delta_within($azp, 180, 0.1);

$azp = $e_pos.bearing(88.000000,179.000000,0.000000,268.000000);
is-approx($azp, 90.988841392441, :abs-tol<0.1>); #delta_within($azp, 90.988841392441, 0.1);

$azs = $e_sym.bearing(88.000000,179.000000,0.000000,268.000000);
is-approx($azs, 90.988841392441, :abs-tol<0.1>); #delta_within($azs, 90.988841392441, 0.1);

$azp = $e_pos.bearing(88.000000,179.000000,88.000000,1.000000);
is-approx($azp, 358.999390582928, :abs-tol<0.1>); #delta_within($azp, 358.999390582928, 0.1);

$azs = $e_sym.bearing(88.000000,179.000000,88.000000,1.000000);
is-approx($azs, -1.00060941707181, :abs-tol<0.1>); #delta_within($azs, -1.00060941707181, 0.1);

$azp = $e_pos.bearing(88.000000,179.000000,88.000000,90.000000);
is-approx($azp, 314.482545961512, :abs-tol<0.1>); #delta_within($azp, 314.482545961512, 0.1);

$azs = $e_sym.bearing(88.000000,179.000000,88.000000,90.000000);
is-approx($azs, -45.5174540384878, :abs-tol<0.1>); #delta_within($azs, -45.5174540384878, 0.1);

$azp = $e_pos.bearing(88.000000,179.000000,88.000000,268.000000);
is-approx($azp, 45.5174540384878, :abs-tol<0.1>); #delta_within($azp, 45.5174540384878, 0.1);

$azs = $e_sym.bearing(88.000000,179.000000,88.000000,268.000000);
is-approx($azs, 45.5174540384878, :abs-tol<0.1>); #delta_within($azs, 45.5174540384878, 0.1);

$azp = $e_pos.bearing(88.000000,268.000000,-88.000000,1.000000);
is-approx($azp, 133.474906296864, :abs-tol<0.1>); #delta_within($azp, 133.474906296864, 0.1);

$azs = $e_sym.bearing(88.000000,268.000000,-88.000000,1.000000);
is-approx($azs, 133.474906296864, :abs-tol<0.1>); #delta_within($azs, 133.474906296864, 0.1);

$azp = $e_pos.bearing(88.000000,268.000000,-88.000000,90.000000);
is-approx($azp, 269.011158607527, :abs-tol<0.1>); #delta_within($azp, 269.011158607527, 0.1);

$azs = $e_sym.bearing(88.000000,268.000000,-88.000000,90.000000);
is-approx($azs, -90.9888413924734, :abs-tol<0.1>); #delta_within($azs, -90.9888413924734, 0.1);

$azp = $e_pos.bearing(88.000000,268.000000,-88.000000,179.000000);
is-approx($azp, 224.524857451104, :abs-tol<0.1>); #delta_within($azp, 224.524857451104, 0.1);

$azs = $e_sym.bearing(88.000000,268.000000,-88.000000,179.000000);
is-approx($azs, -135.475142548896, :abs-tol<0.1>); #delta_within($azs, -135.475142548896, 0.1);

$azp = $e_pos.bearing(88.000000,268.000000,-88.000000,268.000000);
is-approx($azp, 180, :abs-tol<0.1>); #delta_within($azp, 180, 0.1);

$azp = $e_pos.bearing(88.000000,268.000000,0.000000,1.000000);
is-approx($azp, 86.9912875667967, :abs-tol<0.1>); #delta_within($azp, 86.9912875667967, 0.1);

$azs = $e_sym.bearing(88.000000,268.000000,0.000000,1.000000);
is-approx($azs, 86.9912875667967, :abs-tol<0.1>); #delta_within($azs, 86.9912875667967, 0.1);

$azp = $e_pos.bearing(88.000000,268.000000,0.000000,90.000000);
is-approx($azp, 357.999150742584, :abs-tol<0.1>); #delta_within($azp, 357.999150742584, 0.1);

$azs = $e_sym.bearing(88.000