1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-05 18:16:23 +03:00
occt/tests/bugs/modalg_2/bug424_1
ski a8676008f7 Adding of testing cases from subgroups 937 940 and 941 of CHL group
Splitting of subgroups bugs/modalg and bugs/moddata to optimise time of testing
Correction of end file in group v3d
Small correction of test case
2013-02-08 15:16:15 +04:00

22 lines
492 B
Plaintext
Executable File

puts "========================"
puts " OCC424 "
puts "(case 1)"
puts "========================"
puts ""
restore [locate_data_file CFE_e_lonfzx.rle] E
nexplode E f
profile cont S E_10 F 50 -100 X 50 Y -100 X -50
featdprism E cont E_10 10 1 1
if [catch {featperform dprism result E_5 E_6 } catch_result] {
puts "Faulty OCC424 (case 1): function FEATPERFORM works wrongly"
} else {
puts "OCC424 OK (case 1): function FEATPERFORM works properly"
}
set square 978236.
set 2dviewer 0