1 puts "================"
3 puts "================"
5 #######################################################################################
6 # Visualization - add test command for V3d_View::FitAll by view area
7 #######################################################################################
29 vpoint p2 15.0 5.0 0.0
30 vpoint p3 15.0 15.0 0.0
31 vpoint p4 5.0 15.0 0.0
32 vpoint p5 10.0 10.0 0.0
34 vfitarea 4.999 4.999 15.001 15.001
36 # Check area by 1st point
37 vmoveto ${check1_x} ${check1_y}
38 checkcolor ${check1_x} ${check1_y} 0 1 1
41 puts "Error : Fit all by view area is broken."
44 # Check area by 2nd point
45 vmoveto ${check2_x} ${check2_y}
46 checkcolor ${check2_x} ${check2_y} 0 1 1
49 puts "Error : Fit all by view area is broken."
52 # Check area by 3rd point
53 vmoveto ${check3_x} ${check3_y}
54 checkcolor ${check3_x} ${check3_y} 0 1 1
57 puts "Error : Fit all by view area is broken."
60 # Check area by 4th point
61 vmoveto ${check4_x} ${check4_y}
62 checkcolor ${check4_x} ${check4_y} 0 1 1
65 puts "Error : Fit all by view area is broken."
68 # Check area by 5th point
69 vmoveto ${check5_x} ${check5_y}
70 checkcolor ${check5_x} ${check5_y} 0 1 1
73 puts "Error : Fit all by view area is broken."
76 checkview -screenshot -3d -path ${imagedir}/${test_image}.png