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

puts "============="
puts "0030949: Foundation Classes - Dump improvement for OCCT classes"
puts "============="

set px 1
set py 2
set pz 3

vertex vv $px $py $pz
set log [bounding vv -obb -dumpJson]

if {![regexp {"gp_XYZ": \[+([-0-9.+eE]+)\, +([-0-9.+eE]+)\, +([-0-9.+eE]+)} $log full xc yc zc]} {
  puts "Error in DumpJson."
}

checkreal "XC" $xc $px 1.0e-7 0.0
checkreal "YC" $yc $py 1.0e-7 0.0
checkreal "ZC" $zc $pz 1.0e-7 0.0
Commit	Line	Data
0904aa63	1	puts "============="
	2	puts "0030949: Foundation Classes - Dump improvement for OCCT classes"
	3	puts "============="
	4
	5	set px 1
	6	set py 2
	7	set pz 3
	8
	9	vertex vv $px $py $pz
	10	set log [bounding vv -obb -dumpJson]
	11
	12	if {![regexp {"gp_XYZ": \[+([-0-9.+eE]+)\, +([-0-9.+eE]+)\, +([-0-9.+eE]+)} $log full xc yc zc]} {
	13	puts "Error in DumpJson."
	14	}
	15
	16	checkreal "XC" $xc $px 1.0e-7 0.0
	17	checkreal "YC" $yc $py 1.0e-7 0.0
	18	checkreal "ZC" $zc $pz 1.0e-7 0.0