tests/bugs/modalg_2/bug21255

   1 puts "============"
   2 puts "OCC21255"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 # Some problems with 3D chamfer construction
   7 #######################################################################
   8
   9 set BugNumber OCC21255
  10
  11 restore [locate_data_file OCC21255-1.brep] ss
  12 explode ss F
  13 explode ss_7 E
  14
  15 vinit
  16 if [catch { chamf result ss ss_7_2 ss_7 5. 5. } ] {
  17   puts "Faulty ${BugNumber} : chamf is wrong"
  18 } else {
  19   checkprops result -s 45382.5
  20   checkshape result
  21
  22   checknbshapes result -vertex 15 -edge 22 -wire 9 -face 9 -shell 1 -solid 1 -compsolid 0 -compound 1 -shape 58
  23
  24   set scale    5.8955238204183011
  25   set proj_X   0.62061613798141479
  26   set proj_Y   -0.6891753077507019
  27   set proj_Z   -0.37399500608444214
  28   set up_X     -0.12894462049007416
  29   set up_Y     -0.56017255783081055
  30   set up_Z     0.81827831268310547
  31   set at_X     -56.828238528324
  32   set at_Y     -19.8089213662065
  33   set at_Z     447.801500039167
  34
  35   vviewparams -scale ${scale} -proj ${proj_X} ${proj_Y} ${proj_Z} -up ${up_X} ${up_Y} ${up_Z} -at ${at_X} ${at_Y} ${at_Z}
  36
  37   checkview -screenshot -3d -path ${imagedir}/${test_image}.png
  38 }