tests/bugs/vis/bug223

   1 puts "========"
   2 puts "OCC223"
   3 puts "========"
   4 puts ""
   5 ######################################################
   6 # Shading is not correct for several overlapped faces, converted to B-Spline representation
   7 ######################################################
   8
   9 restore [locate_data_file OCC223-1.brep] cylinder
  10 checkshape cylinder
  11 restore [locate_data_file OCC223-2.brep] face
  12 checkshape face
  13
  14 set Start_X 140
  15 set Start_Y 40
  16
  17 vinit
  18 tclean cylinder
  19 tclean face
  20
  21 vdisplay cylinder
  22 vdisplay face
  23 vfit
  24
  25 vsetdispmode face 1
  26 vsetcolor face GREEN1
  27
  28 vsetdispmode  cylinder 1
  29 vsetcolor cylinder RED1
  30
  31 set ColorList [vreadpixel ${Start_X} ${Start_Y} rgb]
  32 set R_START_POINT [lindex $ColorList 0]
  33 set G_START_POINT [lindex $ColorList 1]
  34 set B_START_POINT [lindex $ColorList 2]
  35
  36 puts "R_START_POINT=$R_START_POINT ;   G_START_POINT=$G_START_POINT ;   B_START_POINT=$B_START_POINT"
  37
  38 set IsGood 1
  39 for {set count 0} {${count} <= 11} {incr count 1} {
  40     checkcolor $Start_X $Start_Y $R_START_POINT $G_START_POINT $B_START_POINT
  41     if {$stat != 1} {
  42          set IsGood 0
  43     }
  44     incr $Start_X 10
  45     incr $Start_Y 10
  46 }
  47
  48 if {$IsGood == 1} {
  49   puts "\nOCC223 OK\n"
  50 } else {
  51   puts "\nFaulty OCC223\n"
  52 }
  53
  54 checkview -screenshot -3d -path ${imagedir}/${test_image}.png
  55
  56 puts "\n------- Additional Comments From Igor FEOKTISTOV 2002-05-20 12:32 -------\n"
  57
  58 puts "It is not problem of meshing."
  59 puts "It is pure problem of shading geometrically coinciding faces with different"
  60 puts "triangulation. If we create analytical cylinder and box by such way that plane"
  61 puts "faces of cylinder and two faces of box are coinceded, we will have the same"
  62 puts "result: fractional shading of coinciding faces.\n"