tests/bugs/moddata_3/bug25894_2

   1 puts "============"
   2 puts "CR25894"
   3 puts "==========="
   4 puts ""
   5 ###############################################################################
   6 # BRepOffsetAPI_NormalProjection fails to projection an edge on a face
   7 ###############################################################################
   8
   9 restore [locate_data_file bug25894_ProjectionNotFailed.brep] p
  10
  11 explode p
  12
  13 nproject r p_2 p_1
  14 whatis r
  15 set explode_log [explode r]
  16
  17 if { [regexp "r_1" ${explode_log}] != 1 } {
  18     puts "Error : projection an edge on a face works wrongly"
  19 } else {
  20     puts "OK: projection an edge on a face works good"
  21 }