0027015: Sewing returns invalid shape if some faces are nearly plane cones
[occt.git] / tests / bugs / modalg_2 / bug22196
1 puts "================"
2 puts "OCC22196"
3 puts "================"
4 puts ""
5 #######################################################################################
6 # Problem with putting texture on the bottle.brep shape
7 ######################################################################################
8
9 box b 1 2 3
10 vdisplay b
11 vfit
12 vsetdispmode 1
13 explode b f
14 vdisplay b_2
15 vtexture b_2 [locate_data_file OCC23385-carrelage1.gif]
16 vtexrepeat b_2 3 2
17 set scale    236.95268872530238
18 set proj_X   0.92521193709866123
19 set proj_Y   -0.1940727987718808
20 set proj_Z   -0.32606536189388785
21 set up_X     0.2658610208502189
22 set up_Y     -0.28157324388568683
23 set up_Z     0.92197311561681172
24 set at_X     0.58906967866866666
25 set at_Y     0.98487348454501
26 set at_Z     1.4950272490152485
27 set eye_X    3.7940978443168705
28 set eye_Y    0.31258558886503313
29 set eye_Z    0.36550370223815498
30 vviewparams -scale ${scale} -eye ${eye_X} ${eye_Y} ${eye_Z} -proj ${proj_X} ${proj_Y} ${proj_Z} -up ${up_X} ${up_Y} ${up_Z} -at ${at_X} ${at_Y} ${at_Z}
31
32 checkview -screenshot -3d -path ${imagedir}/${test_image}.png
33
34
35
36
37