tests/bugs/modalg_6/bug27383_1

   1 puts "========"
   2 puts "0027383: Modeling - improve handling of regularity on edges"
   3 puts "========"
   4 puts ""
   5 puts "Check regularity setting on edges between same-domain faces after fuse"
   6
   7 # fuse of two boxes
   8 pload MODELING
   9 box b1 10 10 10
  10 box b2 5 5 0 10 10 10
  11 bfuse r b1 b2
  12 explode r f
  13 explode r_7 e
  14 getedgeregularity r_7_3 r_3 r_7 ;# returns C0: regularity is not set at all
  15 encoderegularity r
  16
  17 explode res f
  18 explode res_3 e
  19 explode res_4 e
  20 if { ! [regexp "CN" [getedgeregularity r_7_3 r_3 r_7]] } {
  21   puts "Error: Invalid regularity of the edge, expected CN"
  22 }
  23
  24 # make image in HLR mode as illustration
  25 pload VISUALIZATION
  26 vdisplay r
  27 vfit
  28 vhlr on
  29 vdump ${imagedir}/${test_image}.png