Tcl Library Source Code

Changes On Branch tkt-cb043ecc70e0e90bff9-demo
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Changes In Branch tkt-cb043ecc70e0e90bff9-demo Excluding Merge-Ins

This is equivalent to a diff from 78d7722e1e to d345a5a2e5

2017-08-07
23:41
Merged fix for ticket [cb043ecc70e0e90bf]. check-in: c76dc6a3fc user: aku tags: trunk
23:35
Test demonstrating the issue and fix merged check-in: e025eb35d2 user: aku tags: avl-fix-areaPolygon-and-more
23:27
Test demonstrating the problem Closed-Leaf check-in: d345a5a2e5 user: aku tags: tkt-cb043ecc70e0e90bff9-demo
2017-08-06
16:29
fix math::geometry::areaPolygon plus polish the module. check-in: 3cb80496a0 user: avl42 tags: avl-fix-areaPolygon-and-more
2017-06-05
21:22
Sync to trunk. check-in: f736853eec user: aku tags: tkt-997c8b4e67-aku
21:00
Merged fixes for tkt [71deadcf96]. check-in: 78d7722e1e user: aku tags: trunk
20:59
Bump version of "pt::rde::nx" properly. Closed-Leaf check-in: 329f77b79d user: aku tags: pt-nx-fixes
2017-05-30
16:26
Merged fixes for ticket e4cfcc0f96: handling of null by hullde json writer. check-in: bf5f60bebe user: andreask tags: trunk

Changes to modules/math/geometry.test.
516
517
518
519
520
521
522







523
524
525
526
527
528
529
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536







+
+
+
+
+
+
+







} 0
test geometry-16.8 {geometry::rectangleInsidePolygon, hour-glass with rectangle on right side} {
    math::geometry::rectangleInsidePolygon {5 5} {6 6} {2 4 6 9 2 9 5 4}
} 0
test geometry-16.9 {geometry::rectangleInsidePolygon, infinityLine crosses point instead of line segment} {
    math::geometry::rectangleInsidePolygon {5 5} {6 6} {4 4 4 7 7 7 7 4}
} 1



#     - areaPolygon {-10 -10 10 -10 10 10 -10 10}
#       Result: 400



###
###

test geometry-17.0 {point constructor} {
    math::geometry::p 1 4
} {1 4}
612
613
614
615
616
617
618







619
620
621
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635







+
+
+
+
+
+
+



    ::math::geometry::radToDeg [expr {acos(-1.0)}]
} 180.0

test geometry-19.6 {geometry::degToRad} {
    ::math::geometry::degToRad 180.0
} [expr {acos(-1.0)}]

##
# areaPolygon
##

test geometry-20.0 {geometry::areaPolygon} {
    math::geometry::areaPolygon {-10 -10 10 -10 10 10 -10 10}
} 400

###
testsuiteCleanup