f1aa2b62 |
1 | |
2 | puts "========================" |
3 | puts " OCC424 " |
4 | puts "(case 1)" |
5 | puts "========================" |
6 | puts "" |
7 | |
8 | restore [locate_data_file CFE_e_lonfzx.rle] E |
9 | nexplode E f |
10 | |
11 | profile cont S E_10 F 50 -100 X 50 Y -100 X -50 |
12 | featdprism E cont E_10 10 1 1 |
13 | |
14 | if [catch {featperform dprism result E_5 E_6 } catch_result] { |
15 | puts "Faulty OCC424 (case 1): function FEATPERFORM works wrongly" |
16 | } else { |
17 | puts "OCC424 OK (case 1): function FEATPERFORM works properly" |
18 | } |
19 | |
58cf74e0 |
20 | checkprops result -s 978236. |
21 | checkshape result |
5747059b |
22 | checkview -display result -2d -path ${imagedir}/${test_image}.png |