| 1 | puts "========================" |
| 2 | puts " OCC430 " |
| 3 | puts "========================" |
| 4 | puts "" |
| 5 | ################################################################ |
| 6 | ## Exception when projecting a point on planar surface of linear extrusion oriented along Y axis |
| 7 | ################################################################ |
| 8 | |
| 9 | restore [locate_data_file OCC430.rle] result |
| 10 | |
| 11 | if [catch {proj result 49.86391363636364 440.7894090909091 127.05 } catch_result] { |
| 12 | puts "Faulty OCC430: Projection was made wrongly." |
| 13 | } else { |
| 14 | puts "OK OCC348: function PROJECT works properly" |
| 15 | } |
| 16 | |
| 17 | set 2dviewer 0 |
| 18 | |
| 19 | |