Adding test cases from grid chl
[occt.git] / tests / bugs / vis / bug215
1
2 puts "========"
3 puts "OCC215"
4 puts "========"
5
6 restore [locate_data_file OCC215.brep] result
7 checkshape result
8
9 tclean result
10 vinit
11 vdisplay result
12 vfit
13
14 set scale    6.29714883567995
15 set center_X 70.7106779835678
16 set center_Y 41.2330922040446
17 set proj_X   0.344812899827957
18 set proj_Y   -0.830477952957153
19 set proj_Z   0.43750473856926
20 set up_X     -0.368759274482727
21 set up_Y     0.308769434690475
22 set up_Z     0.876742839813232
23 set at_X     -5.88607025146484
24 set at_Y     28.6973209381104
25 set at_Z     -12.5332689285278
26
27 QASetViewCharac ${scale} ${center_X} ${center_Y} ${proj_X} ${proj_Y} ${proj_Z} ${up_X} ${up_Y} ${up_Z} ${at_X} ${at_Y} ${at_Z}
28
29 QAGetPixelColor 229 94 1 1 0
30 set only_screen 1