mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-21 10:13:43 +03:00
34dd4990ed
Modifications: 1.Test cases 2. locate_data_file from DrawResources/TestCommands.tcl Fix for mesh end Adjusting testing cases for current state of master using new organization of data files
22 lines
409 B
Plaintext
22 lines
409 B
Plaintext
# Original bug : cts20358
|
|
# Date : 17Juillet98
|
|
|
|
restore [locate_data_file CFE900_cts20gap.rle] base
|
|
restore [locate_data_file cts20358b.rle] cont
|
|
|
|
explode base face
|
|
copy base_15 ffrom
|
|
copy base_17 funtil
|
|
|
|
## creation des faces infinies support
|
|
mksurface p15 base_15
|
|
mkface f15 p15
|
|
mksurface p17 base_17
|
|
mkface f17 p17
|
|
|
|
featprism base cont cont 0 0 -1 0 1
|
|
featperform prism result f15 f17
|
|
|
|
|
|
set square 1105.82
|