0023995: GeomAPI_ExtremaCurveSurface : wrong result between a curve and a plane
[occt.git] / tests / bugs / moddata_3 / bug23995
1 puts "================"
2 puts "OCC23995"
3 puts "================"
4 puts ""
5 #######################################################################
6 # GeomAPI_ExtremaCurveCurve class calculates wrong values
7 #######################################################################
8
9 set BugNumber CR23995
10
11 pload XDE
12
13 ReadStep D [locate_data_file bug23995_AirfoilRhomb_CheckIntersct3d_myRhombicAirfoilIntersect_root.stp]
14
15 XCheckProps D
16
17 XGetShape intCrv D 0:1:1:1
18 explode intCrv
19 mkcurve intCrv intCrv_1
20 plane pl
21
22 extrema intCrv pl
23
24 if { [isdraw ext_1] } {
25    mkedge result ext_1
26    set length 161.647
27 } else {
28    puts "${BugNumber}: invalid result for ext_1"
29 }
30
31 if { [isdraw ext_2] } {
32    mkedge result ext_2
33    set length 161.647
34 } else {
35    puts "${BugNumber}: invalid result for ext_2"
36 }
37
38 if { [isdraw ext_3] } {
39    mkedge result ext_3
40    set length 136.705
41 } else {
42    puts "${BugNumber}: invalid result for ext_3"
43 }
44
45 if { [isdraw ext_4] } {
46    mkedge result ext_4
47    set length 164.153
48 } else {
49    puts "${BugNumber}: invalid result for ext_4"
50 }
51
52 smallview
53 front
54 fit
55 set only_screen_axo 1