123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430 |
- // Boost.Geometry
- // Unit Test
- // Copyright (c) 2016-2018, Oracle and/or its affiliates.
- // Contributed and/or modified by Adam Wulkiewicz, on behalf of Oracle
- // Use, modification and distribution is subject to the Boost Software License,
- // Version 1.0. (See accompanying file LICENSE_1_0.txt or copy at
- // http://www.boost.org/LICENSE_1_0.txt)
- #include "segment_intersection_geo.hpp"
- template <typename T>
- void test_geographic()
- {
- typedef bg::model::point<double, 2, bg::cs::geographic<bg::degree> > point_t;
- typedef bg::model::segment<point_t> segment_t;
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(-1 -2, -1 -1)", 'a', "POINT(-1 -1)");
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -2, 1 1)", "SEGMENT(-1 -2, -1 -1)", 'f', "POINT(-1 -2)");
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(1 1, -1 -1)", "SEGMENT(-1 -2, -1 -1)", 't', "POINT(-1 -1)");
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(1 1, -1 -2)", "SEGMENT(-1 -2, -1 -1)", 'a', "POINT(-1 -2)");
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -2, -1 -1)", "SEGMENT(-1 -1, 1 1)", 'a', "POINT(-1 -1)");
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -2, -1 -1)", "SEGMENT(-1 -2, 1 1)", 'f', "POINT(-1 -2)");
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -2, -1 -1)", "SEGMENT(1 1, -1 -1)", 't', "POINT(-1 -1)");
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -2, -1 -1)", "SEGMENT(1 1, -1 -2)", 'a', "POINT(-1 -2)");
- test_strategies<segment_t, point_t>(
- "SEGMENT(-1 -2, -1 2)", "SEGMENT(-2 -2, 2 2)",
- great_elliptic('i', "POINT(-1 -1.000457053724121)"),
- geodesic_vincenty('i', "POINT(-1 -1.000459099991114)"),
- geodesic_andoyer('i', "POINT(-1 -1.000453510849886)"));
- test_strategies<segment_t, point_t>(
- "SEGMENT(-2 -2, 2 2)", "SEGMENT(-1 -2, -1 2)",
- great_elliptic('i', "POINT(-1 -1.000457053724121)"),
- geodesic_vincenty('i', "POINT(-1 -1.000459099991114)"),
- geodesic_andoyer('i', "POINT(-1 -1.000453510849886)"));
- // crossing X
- test_strategies<segment_t, point_t>(
- "SEGMENT(-45 -45, 45 45)", "SEGMENT(-45 45, 45 -45)",
- great_elliptic('i', "POINT(0 0)"),
- geodesic_vincenty('i', "POINT(0.000000001380087204053 -0.0000000000000063611)"),
- geodesic_andoyer('i', "POINT(0 0.0003512140328446071)"));
- test_strategies<segment_t, point_t>(
- "SEGMENT(-45 -45, 45 45)", "SEGMENT(45 -45, -45 45)",
- great_elliptic('i', "POINT(0 0)"),
- geodesic_vincenty('i', "POINT(0.000000001380087204053 -0.0000000000000063611)"),
- geodesic_andoyer('i', "POINT(0 0.0003512140328446071)"));
- test_strategies<segment_t, point_t>(
- "SEGMENT(45 45, -45 -45)", "SEGMENT(-45 45, 45 -45)",
- great_elliptic('i', "POINT(0 0)"),
- geodesic_vincenty('i', "POINT(0.000000001380087204053 -0.0000000000000063611)"),
- geodesic_andoyer('i', "POINT(0 0.0003512140328446071)"));
- test_strategies<segment_t, point_t>(
- "SEGMENT(45 45, -45 -45)", "SEGMENT(45 -45, -45 45)",
- great_elliptic('i', "POINT(0 0)"),
- geodesic_vincenty('i', "POINT(0.000000001380087204053 -0.0000000000000063611)"),
- geodesic_andoyer('i', "POINT(0 0.0003512140328446071)"));
- // crossing X
- test_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(-1 1, 1 -1)",
- great_elliptic('i', "POINT(0 0)"),
- geodesic_vincenty('i', "POINT(0.000000000000000596354 -0.0000000000626626779)"),
- geodesic_andoyer('i', "POINT(-0.000000000000000596354 0.0000055787431347552)"));
- test_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(1 -1, -1 1)",
- great_elliptic('i', "POINT(0 0)"),
- geodesic_vincenty('i', "POINT(0.000000000000000596354 -0.0000000000626626779)"),
- geodesic_andoyer('i', "POINT(-0.000000000000000596354 0.0000055787431347552)"));
- test_strategies<segment_t, point_t>(
- "SEGMENT(1 1, -1 -1)", "SEGMENT(-1 1, 1 -1)",
- great_elliptic('i', "POINT(0 0)"),
- geodesic_vincenty('i', "POINT(0.000000000000000596354 -0.0000000000626626779)"),
- geodesic_andoyer('i', "POINT(-0.000000000000000596354 0.0000055787431347552)"));
- test_strategies<segment_t, point_t>(
- "SEGMENT(1 1, -1 -1)", "SEGMENT(1 -1, -1 1)",
- great_elliptic('i', "POINT(0 0)"),
- geodesic_vincenty('i', "POINT(0.000000000000000596354 -0.0000000000626626779)"),
- geodesic_andoyer('i', "POINT(-0.000000000000000596354 0.0000055787431347552)"));
- // equal
- // //
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-45 -45, 45 45)", "SEGMENT(-45 -45, 45 45)", 'e', "POINT(-45 -45)", "POINT(45 45)", false);
- // //
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-45 -45, 45 45)", "SEGMENT(45 45, -45 -45)", 'e', "POINT(-45 -45)", "POINT(45 45)", true);
- // starting outside s1
- // /
- // |
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(-2 -2, -1 -1)", 'a', "POINT(-1 -1)");
- // /
- // /|
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(-2 -2, 0 0)", 'm', "POINT(0 0)");
- // /|
- // / |
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(-2 -2, 1 1)", 't', "POINT(1 1)");
- // |/
- // /|
- test_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(-2 -2, 2 2)",
- great_elliptic('i', "POINT(0 0)"),
- geodesic_vincenty('i', "POINT(0.00000013628420059 0.00000013624239008)"),
- geodesic_thomas('i', "POINT(-0.00004079969079346 -0.00004078714535240)"),
- geodesic_andoyer('i', "POINT(-0.01217344899138908 -0.01216980051876599)"));
- // ------
- // ------
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(-2 0, -1 0)", 'a', "POINT(-1 0)");
- // ------
- // ------
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(-2 0, 0 0)", 'c', "POINT(-1 0)", "POINT(0 0)", false);
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(0 0, -2 0)", 'c', "POINT(-1 0)", "POINT(0 0)", true);
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(1 0, -1 0)", "SEGMENT(-2 0, 0 0)", 'c', "POINT(0 0)", "POINT(-1 0)", true);
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(1 0, -1 0)", "SEGMENT(0 0, -2 0)", 'c', "POINT(0 0)", "POINT(-1 0)", false);
- // ------
- // ---------
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(-2 0, 1 0)", 'c', "POINT(-1 0)", "POINT(1 0)", false);
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(1 0, -2 0)", 'c', "POINT(-1 0)", "POINT(1 0)", true);
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(1 0, -1 0)", "SEGMENT(-2 0, 1 0)", 'c', "POINT(1 0)", "POINT(-1 0)", true);
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(1 0, -1 0)", "SEGMENT(1 0, -2 0)", 'c', "POINT(1 0)", "POINT(-1 0)", false);
- // ------
- // ------------
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(-2 0, 2 0)", 'c', "POINT(-1 0)", "POINT(1 0)", false);
- // starting at s1
- // /
- // //
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(-1 -1, 0 0)", 'c', "POINT(-1 -1)", "POINT(0 0)", false);
- // //
- // //
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(-1 -1, 1 1)", 'e', "POINT(-1 -1)", "POINT(1 1)", false);
- // | /
- // |/
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(-1 -1, 2 2)", 'f', "POINT(-1 -1)");
- // ------
- // ---
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(-1 0, 0 0)", 'c', "POINT(-1 0)", "POINT(0 0)", false);
- // ------
- // ------
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(-1 0, 1 0)", 'e', "POINT(-1 0)", "POINT(1 0)", false);
- // ------
- // ---------
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(-1 0, 2 0)", 'c', "POINT(-1 0)", "POINT(1 0)", false);
-
- // starting inside
- // //
- // /
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(0 0, 1 1)", 'c', "POINT(0 0)", "POINT(1 1)", false);
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(1 1, 0 0)", 'c', "POINT(0 0)", "POINT(1 1)", true);
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(1 1, -1 -1)", "SEGMENT(0 0, 1 1)", 'c', "POINT(1 1)", "POINT(0 0)", true);
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(1 1, -1 -1)", "SEGMENT(1 1, 0 0)", 'c', "POINT(1 1)", "POINT(0 0)", false);
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(0 0, 1 1)", "SEGMENT(-1 -1, 1 1)", 'c', "POINT(0 0)", "POINT(1 1)", false);
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(1 1, 0 0)", "SEGMENT(-1 -1, 1 1)", 'c', "POINT(1 1)", "POINT(0 0)", true);
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(0 0, 1 1)", "SEGMENT(1 1, -1 -1)", 'c', "POINT(0 0)", "POINT(1 1)", true);
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(1 1, 0 0)", "SEGMENT(1 1, -1 -1)", 'c', "POINT(1 1)", "POINT(0 0)", false);
- // |/
- // /
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(0 0, 2 2)", 's', "POINT(0 0)");
- // ------
- // ---
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(0 0, 1 0)", 'c', "POINT(0 0)", "POINT(1 0)", false);
- // ------
- // ------
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(0 0, 2 0)", 'c', "POINT(0 0)", "POINT(1 0)", false);
-
- // starting at p2
- // |
- // /
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(1 1, 2 2)", 'a', "POINT(1 1)");
- // ------
- // ---
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(1 0, 2 0)", 'a', "POINT(1 0)");
- // disjoint, crossing
- // /
- // |
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(-3 -3, -2 -2)", 'd');
- // |
- // /
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(2 2, 3 3)", 'd');
- // disjoint, collinear
- // ------
- // ------
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(-3 0, -2 0)", 'd');
- // ------
- // ------
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(2 0, 3 0)", 'd');
- // degenerated
- // /
- // *
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(-2 -2, -2 -2)", 'd');
- // /
- // *
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(-1 -1, -1 -1)", '0', "POINT(-1 -1)");
- // /
- // *
- // /
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(0 0, 0 0)", '0', "POINT(0 0)");
- // *
- // /
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(1 1, 1 1)", '0', "POINT(1 1)");
- // *
- // /
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 -1, 1 1)", "SEGMENT(2 2, 2 2)", 'd');
- // similar to above, collinear
- // * ------
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(-2 0, -2 0)", 'd');
- // *------
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(-1 0, -1 0)", '0', "POINT(-1 0)");
- // ---*---
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(0 0, 0 0)", '0', "POINT(0 0)");
- // ------*
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(1 0, 1 0)", '0', "POINT(1 0)");
- // ------ *
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 0, 1 0)", "SEGMENT(2 0, 2 0)", 'd');
- // Northern hemisphere
- // --- ------
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 50, 1 50)", "SEGMENT(-3 50, -2 50)", 'd');
- // ------
- // ---
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 50, 1 50)", "SEGMENT(-2 50, -1 50)", 'a', "POINT(-1 50)");
- // \/
- // /\ (avoid multi-line comment)
- test_strategies<segment_t, point_t>(
- "SEGMENT(-1 50, 1 50)", "SEGMENT(-2 50, 0 50)",
- great_elliptic('i', "POINT(-0.5 50.0032229484023)"),
- geodesic_vincenty('i', "POINT(-0.4999999996073994 50.00323192256208)"),
- geodesic_thomas('i', "POINT(-0.4999999963998482 50.00323192258598)"),
- geodesic_andoyer('i', "POINT(-0.4999990340391772 50.00323192463806)"));
- // ________
- // / _____\ (avoid multi-line comment)
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 50, 1 50)", "SEGMENT(-2 50, 1 50)", 't', "POINT(1 50)");
- // _________
- // / _____ \ (avoid multi-line comment)
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 50, 1 50)", "SEGMENT(-2 50, 2 50)", 'd');
- // ______
- // /___ \ (avoid multi-line comment)
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 50, 1 50)", "SEGMENT(-1 50, 0 50)", 'f', "POINT(-1 50)");
- // ------
- // ------
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 50, 1 50)", "SEGMENT(-1 50, 1 50)", 'e', "POINT(-1 50)", "POINT(1 50)", false);
- // ________
- // /_____ \ (avoid multi-line comment)
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 50, 1 50)", "SEGMENT(-1 50, 2 50)", 'f', "POINT(-1 50)");
- // ______
- // / ___\ (avoid multi-line comment)
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 50, 1 50)", "SEGMENT(0 50, 1 50)", 't', "POINT(1 50)");
- // \/
- // /\ (avoid multi-line comment)
- test_strategies<segment_t, point_t>(
- "SEGMENT(-1 50, 1 50)", "SEGMENT(0 50, 2 50)",
- great_elliptic('i', "POINT(0.5 50.0032229484023)"),
- geodesic_vincenty('i', "POINT(0.4999999996112415 50.00323192256208)"),
- geodesic_thomas('i', "POINT(0.5000000051005989 50.00323192258598)"),
- geodesic_andoyer('i', "POINT(0.5000009655139563 50.00323192463806)"));
- // ------
- // ---
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 50, 1 50)", "SEGMENT(1 50, 2 50)", 'a', "POINT(1 50)");
- // ------ ---
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(-1 50, 1 50)", "SEGMENT(2 50, 3 50)", 'd');
- // ___|
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(0 0, 1 0)", "SEGMENT(1 0, 1 1)", 'a', "POINT(1 0)");
- // ___|
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(1 0, 1 1)", "SEGMENT(0 0, 1 0)", 'a', "POINT(1 0)");
- // |/
- // /|
- test_strategies<segment_t, point_t>(
- "SEGMENT(10 -1, 20 1)", "SEGMENT(12.5 -1, 12.5 1)",
- great_elliptic('i', "POINT(12.5 -0.50051443471392)"),
- geodesic_vincenty('i', "POINT(12.5 -0.5005177749487734)"),
- geodesic_thomas('i', "POINT(12.5 -0.5005177654827411)"),
- geodesic_andoyer('i', "POINT(12.5 -0.500525380045163)"));
- // |/
- // /|
- test_strategies<segment_t, point_t>(
- "SEGMENT(10 -1, 20 1)", "SEGMENT(17.5 -1, 17.5 1)",
- great_elliptic('i', "POINT(17.5 0.50051443471392)"),
- geodesic_vincenty('i', "POINT(17.5 0.5005177748229335)"),
- geodesic_thomas('i', "POINT(17.5 0.5005178030678186)"),
- geodesic_andoyer('i', "POINT(17.5 0.5004949944844279)"));
- // vertical, crossing at the pole or disjoint
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(90 45, -90 60)", "SEGMENT(0 50, 180 70)", 'i', "POINT(0 90)");
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(90 -45, -90 -60)", "SEGMENT(0 -50, 180 -70)", 'i', "POINT(0 -90)");
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(90 45, -90 60)", "SEGMENT(0 -50, 180 -70)", 'd');
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(90 -45, -90 -60)", "SEGMENT(0 50, 180 70)", 'd');
- // vertical touching at the pole
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(90 90, 90 45)", "SEGMENT(0 90, 0 45)", 'f', "POINT(90 90)"); // should probably be (0 90)
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(90 90, 90 45)", "SEGMENT(0 45, 0 90)", 'a', "POINT(90 90)"); // should probably be (0 90)
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(90 45, 90 90)", "SEGMENT(0 90, 0 45)", 'a', "POINT(90 90)"); // should probably be (0 90)
- test_all_strategies<segment_t, point_t>(
- "SEGMENT(90 45, 90 90)", "SEGMENT(0 45, 0 90)", 't', "POINT(90 90)"); // should probably be (0 90)
- // one vertical with endpoint at a pole
- /*test_strategies<segment_t, point_t>(
- "SEGMENT(0 90, 90 0)", "SEGMENT(89 45, 91 45)",
- great_elliptic('i', "POINT(90 45.00436354465514)"),
- geodesic_vincenty('i', "POINT(90.00000000000112 45.00437824795338)"),
- geodesic_thomas('i', "POINT(90.00000000472062 45.00437824797395)"),
- geodesic_andoyer('i', "POINT(89.99999993672924 45.00437824794587)"));
- test_strategies<segment_t, point_t>(
- "SEGMENT(90 0, 0 90)", "SEGMENT(89 45, 91 45)",
- great_elliptic('i', "POINT(90 45.00436354465514)"),
- geodesic_vincenty('i', "POINT(90.00000000000112 45.00437824795338)"),
- geodesic_thomas('i', "POINT(90.00000000472062 45.00437824797395)"),
- geodesic_andoyer('i', "POINT(89.99999993672924 45.00437824794587)"));
- test_strategies<segment_t, point_t>(
- "SEGMENT(0 -90, 90 0)", "SEGMENT(89 -45, 91 -45)",
- great_elliptic('i', "POINT(90 -45.00436354465514)"),
- geodesic_vincenty('i', "POINT(90.00000000000112 -45.00437824795338)"),
- geodesic_thomas('i', "POINT(90.00000000472062 -45.00437824797395)"),
- geodesic_andoyer('i', "POINT(89.99999993672924 -45.00437824794587)"));
- test_strategies<segment_t, point_t>(
- "SEGMENT(90 0, 0 -90)", "SEGMENT(89 -45, 91 -45)",
- great_elliptic('i', "POINT(90 -45.00436354465514)"),
- geodesic_vincenty('i', "POINT(90.00000000000112 -45.00437824795338)"),
- geodesic_thomas('i', "POINT(90.00000000472062 -45.00437824797395)"),
- geodesic_andoyer('i', "POINT(89.99999993672924 -45.00437824794587)"));*/
- }
- template <typename T>
- void test_geographic_radian()
- {
- typedef bg::model::point<T, 2, bg::cs::geographic<bg::radian> > point_t;
- typedef bg::model::segment<point_t> segment_t;
- bg::strategy::intersection::geographic_segments<bg::strategy::vincenty> strategy;
- // https://github.com/boostorg/geometry/issues/470
- point_t p0(0.000000001, 0.000000001);
- point_t p1(0.000000001, 0.000000005);
- point_t p2(0.000000005, 0.000000005);
- segment_t s1(p0, p1);
- segment_t s2(p1, p2);
- test_strategy_one(s1, s1, strategy, 'e', 2, p0, p1);
- test_strategy_one(s2, s2, strategy, 'e', 2, p1, p2);
- }
- int test_main(int, char* [])
- {
- //test_geographic<float>();
- test_geographic<double>();
- test_geographic_radian<double>();
- return 0;
- }
|