[occt.git] / tests / bugs / vis / bug26056

puts "============"
puts "CR26056"
puts "AIS_LengthDimension can not build dimension for face-edge or edge-face"
puts "============"
puts ""
puts "Tests case of edge-face and face-edge input geometry for dimension"
pload MODELING VISUALIZATION
line aLine 0 -100 0 1 0 0
mkedge anEdge aLine -100 100

plane aPlane 0 0 50 0 0 1
mkface aFace aPlane -100 100 -100 100

line aLine2 0 0 100 1 1 0
mkedge anEdge2 aLine2 -150 150

vinit View1
vclear
vaxo
vdisplay anEdge anEdge2 aFace
vdimension aDim1 -length -shapes anEdge aFace -text 15 3d sh
vdimension aDim2 -length -shapes aFace anEdge2 -text 15 3d sh
vfit

set only_screen 1
Commit	Line	Data
1c078d3b	1	puts "============"
	2	puts "CR26056"
	3	puts "AIS_LengthDimension can not build dimension for face-edge or edge-face"
	4	puts "============"
	5	puts ""
	6	puts "Tests case of edge-face and face-edge input geometry for dimension"
	7	pload MODELING VISUALIZATION
	8	line aLine 0 -100 0 1 0 0
	9	mkedge anEdge aLine -100 100
	10
	11	plane aPlane 0 0 50 0 0 1
	12	mkface aFace aPlane -100 100 -100 100
	13
	14	line aLine2 0 0 100 1 1 0
	15	mkedge anEdge2 aLine2 -150 150
	16
	17	vinit View1
	18	vclear
	19	vaxo
	20	vdisplay anEdge anEdge2 aFace
	21	vdimension aDim1 -length -shapes anEdge aFace -text 15 3d sh
	22	vdimension aDim2 -length -shapes aFace anEdge2 -text 15 3d sh
	23	vfit
	24
	25	set only_screen 1