Adding test cases from grid chl
[occt.git] / tests / bugs / modalg / buc60922
1
2 puts "============"
3 puts "BUC60922"
4 puts "============"
5 puts ""
6 #############################
7 ## Exception NumericError in Extrema 
8 #############################
9
10 restore [locate_data_file BUC60907_px1.rle] sh 
11 puts [checkshape sh]
12
13 line l 40 0 5 0 1 0
14 mkedge e l
15 subshape sh F 379
16 mksurface result sh_379
17
18 puts "Info: compute extrema"
19 extrema result l
20
21 puts "Info: compute distmini"
22 distmini r sh e
23
24 mkface result result
25
26 set square 157.932
27 set 2dviewer 0