7daf3f0f66214a258364c3a17a180ace020a86a5
[occt.git] / tests / bugs / mesh / bug30008_2
1 puts "======="
2 puts "0030008: BRepMesh does not respect angular deflection in internal area of bspline surface"
3 puts "======="
4 puts ""
5
6 pcylinder cy 100 500
7 bsplinecurve cc 5 4 -494.543457494654 6 500 4 507.372773368102 4 1501.91623086297 6 -500 -798.578274581199 755.284518447357 1 -500 -646.205376770376 627.428476092882 1 -500 -493.832478959552 499.572433738407 1 -500 -341.459581148729 371.716391383932 1 -500 -189.086683337906 243.860349029457 1 -500 -35.5842111132817 115.056481200973 1 -500 -33.7993197286247 114.2995541724 0.957903314642061 -500 -31.778022626919 114.565662984205 0.95790331464206 -500 -30.2498570721059 115.75876223351 1 -500 84.6852511720001 279.903107977019 1 -500 198.774589601206 442.839569245217 1 -500 312.863928030413 605.776030513415 1 -500 426.953266459619 768.712491781612 1 -500 541.042604888826 931.64895304981 1
8 extsurf ss cc 1 0 0 
9
10 mkface ff ss -494.543457494654 1501.91623086297 0 1000
11 halfspace hs ff 0 0 500
12
13 bcut rc cy hs 
14 explode rc f
15 copy rc_1 result
16 tscale result 0 0 0 0.01
17 nurbsconvert result result
18
19 incmesh result 0.15 -a 20
20
21 tricheck result
22 checktrinfo result -tri 193 -nod 147 -defl 0.042090809832482222 -tol_abs_defl 1.0e-7
23
24 vinit
25
26 vdefaults -autoTriang 0
27 vdisplay result
28 vfit
29 vsetdispmode 1
30 vviewparams -scale 335.304 -eye 1.95918 0.124681 5.05411 -at 0.0736354 0.0378839 1.46922 -up -0.748808 0.542534 0.380715 -proj 0.4654 0.0214236 0.884841
31
32 checkview -screenshot -3d -path ${imagedir}/${test_image}.png