1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-04 18:06:22 +03:00
ski 5747059b21 0026833: Create command checkview containing all viewer types
Created command checkview for displaying shapes.
2016-02-05 11:14:37 +03:00

35 lines
833 B
Plaintext
Executable File

pload QAcommands
puts "============"
puts "OCC20766"
puts "============"
puts ""
#######################################################################
# Intersection of cone with plane in apex point crashes
#######################################################################
set BugNumber OCC20766
OCC20766 plane 1 0 0 3522.4299999999998
set x -3522.4299999999998
set y 2540
set z -1461.4300000000001
set dx 5449.7857099692965
set dy 0
set dz 5537.6938973109054
set PI180 0.017453292519943295
set semi-angle [expr 0.46689346637921703 / ${PI180}]
set radius 0.
cone c ${x} ${y} ${z} ${dx} ${dy} ${dz} ${semi-angle} ${radius}
if [catch { intersect result plane c } ] {
puts "Faulty ${BugNumber} : intersect is wrong"
} else {
puts "OK ${BugNumber}"
}
checkview -display result -2d -path ${imagedir}/${test_image}.png