Integration part of tests of grid chl
[occt.git] / tests / bugs / moddata / bug371
1
2 puts "========================"
3 puts "BUC61034"
4 puts " OCC371 "
5 puts "========================"
6 puts ""
7 #################################################################
8 ##Intersection between two BSplineSurfaces, using IntPatch_Intersection, lead to infinite cycle.
9 #################################################################
10
11 restore [locate_data_file OCC371a.brep] a 
12 restore [locate_data_file OCC371b.brep] b
13
14 mksurface gs1 a
15 mksurface gs2 b
16 trim trgs1 gs1 0.0 1.0 0.9698725179864 1.0
17 trim trgs2 gs2 0.0 1.0 0.24333094700742 0.92374551772989
18
19 #cpulimit 300
20 intersect result trgs1 trgs2
21
22 set 2dviewer 0
23
24