puts "========"
puts "0030100: Modeling Algorithms - ShapeUpgrade_UnifySameDomain is unable to unify faces based on the same toroidal surface"
puts "========"
puts ""

restore [locate_data_file bug30100_faces.brep] f
explode f

if {![regexp "no 3d curves" [bopcurves f_1 f_2]]} {
  puts "Error: Tangent faces are not detected"
}