[occt.git] / tests / bugs / modalg_7 / bug31460

puts "========"
puts "0031460: Modeling Algorithms - Regression: Revolution not done."
puts "========"
puts ""

circle cir 3 2.9999999999989 0 0 0 -1 -1 0 0 3
trim cir cir 4.71238898038469 6.28318530717959
mkedge e cir

## sector
revol r10 e 0 0 0 1 0 0 10 1

if { [isdraw r10] == 1 } {
  if { [regexp "valid" [checkshape r10]] && [regexp "OK" [bopcheck r10 4]]} {
    puts "OK: valid shape is created"
  } else {
    puts "Error: algorithm created wrong shape"
  }
} else {
  puts "Error: algorithm did not create shape"
}

## full revol
revol r360 e 0 0 0 1 0 0 360 1

if { [isdraw r360] == 1 } {
  if { [regexp "valid" [checkshape r360]] && [regexp "OK" [bopcheck r360 4]]} {
    puts "OK: valid shape is created"
  } else {
    puts "Error: algorithm created wrong shape"
  }
} else {
  puts "Error: algorithm did not create shape"
}
Commit	Line	Data
517ba7aa	1	puts "========"
	2	puts "0031460: Modeling Algorithms - Regression: Revolution not done."
	3	puts "========"
	4	puts ""
	5
	6	circle cir 3 2.9999999999989 0 0 0 -1 -1 0 0 3
	7	trim cir cir 4.71238898038469 6.28318530717959
	8	mkedge e cir
	9
	10	## sector
	11	revol r10 e 0 0 0 1 0 0 10 1
	12
	13	if { [isdraw r10] == 1 } {
	14	if { [regexp "valid" [checkshape r10]] && [regexp "OK" [bopcheck r10 4]]} {
	15	puts "OK: valid shape is created"
	16	} else {
	17	puts "Error: algorithm created wrong shape"
	18	}
	19	} else {
	20	puts "Error: algorithm did not create shape"
	21	}
	22
	23	## full revol
	24	revol r360 e 0 0 0 1 0 0 360 1
	25
	26	if { [isdraw r360] == 1 } {
	27	if { [regexp "valid" [checkshape r360]] && [regexp "OK" [bopcheck r360 4]]} {
	28	puts "OK: valid shape is created"
	29	} else {
	30	puts "Error: algorithm created wrong shape"
	31	}
	32	} else {
	33	puts "Error: algorithm did not create shape"
	34	}