tests/bugs/modalg_6/bug27383_1

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