[occt.git] / tests / prism / end

if { [isdraw result] } {
   regexp {Mass +: +([-0-9.+eE]+)} [sprops result] full m

   #check if result is valid
   puts [checkshape result]
    clear
    smallview
    donly result
    fit
    xwd $imagedir/${test_image}.png
} else {
   puts "Error : The prism cannot be built."
}

# to end a test script
puts "TEST COMPLETED"
Commit	Line	Data
40093367	1	if { [isdraw result] } {
	2	regexp {Mass +: +([-0-9.+eE]+)} [sprops result] full m
	3
	4	#check if result is valid
	5	puts [checkshape result]
	6	clear
	7	smallview
	8	donly result
	9	fit
88f8fc81	10	xwd $imagedir/${test_image}.png
40093367	11	} else {
94a57f1f	12	puts "Error : The prism cannot be built."
40093367	13	}
	14
	15	# to end a test script
	16	puts "TEST COMPLETED"