[occt.git] / tests / v3d / face / G3

# isolines on infinite prism based on spline edge with poles closed to 1.4e+6

if {[info commands testreadiges] == ""} {pload XSDRAW}
testreadiges [locate_data_file bug29356.igs] a

mksurface s a
viso c s 0
dump c
mkedge e c

haxo
donly e
prism r e 0 1 0 Inf
fit
xbounds r

vinit
vdisplay r
visos r 2 3 1
vfit
vzoom 3000

vdump $imagedir/${casename}_zoom.png
Commit	Line	Data
d4efee2b	1	# isolines on infinite prism based on spline edge with poles closed to 1.4e+6
	2
	3	if {[info commands testreadiges] == ""} {pload XSDRAW}
	4	testreadiges [locate_data_file bug29356.igs] a
	5
	6	mksurface s a
	7	viso c s 0
	8	dump c
	9	mkedge e c
	10
	11	haxo
	12	donly e
	13	prism r e 0 1 0 Inf
	14	fit
	15	xbounds r
	16
	17	vinit
	18	vdisplay r
	19	visos r 2 3 1
	20	vfit
	21	vzoom 3000
	22
	23	vdump $imagedir/${casename}_zoom.png