]> OCCT Git - occt-copy.git/commitdiff
0025654: Disable writing pcurves to STEP and IGES by default
authorink <ink@opencascade.com>
Tue, 30 Dec 2014 07:50:21 +0000 (10:50 +0300)
committerink <ink@opencascade.com>
Mon, 23 Mar 2015 06:42:33 +0000 (09:42 +0300)
Changed default value of write.surfacecurve.mode to 0.
Added SplitClosedFaces to XSTEPResource/STEP. This is necessary for correct display of closed surfaces (such as a torus) in applications such as ProEngineer, SolidWorks, Rhinoceros. Tests changed in connection with changing tolerance. In test bugs/iges/bug23018 enabled writing pcurves.

src/Interface/Interface_StaticStandards.cxx
tests/bugs/iges/bug23018
tests/bugs/xde/bug9490
tests/bugs/xde/bug9531
tests/xcaf/end

index 3229e183c915f71b66a84b25698cf520c2bd6221..606e87162c110af66d01e162567838436cef15eb 100644 (file)
@@ -82,7 +82,7 @@ void  Interface_Static::Standards ()
   Interface_Static::Init("XSTEP"  ,"write.surfacecurve.mode", '&',"eval Off");
   Interface_Static::Init("XSTEP"  ,"write.surfacecurve.mode", '&',"eval On");
 //  Interface_Static::Init("XSTEP"  ,"write.surfacecurve.mode", '&',"eval NoAnalytic");
-  Interface_Static::SetIVal ("write.surfacecurve.mode",1);
+  Interface_Static::SetIVal ("write.surfacecurve.mode",0);
 
 //  lastpreci : pour recuperer la derniere valeur codee (cf XSControl)
 //    (0 pour dire : pas codee)
index 1e11bf375d5bcd9d91c59b4f961ac885f93fb3b1..4d241fbe294c1898ecaf30e1ab458632f8391d44 100644 (file)
@@ -7,6 +7,7 @@ puts ""
 #######################################
 
 restore [locate_data_file bug23018_f-ext.brep] f
+param write.surfacecurve.mode 1
 brepiges f ${imagedir}/bug23018_f-ext.igs
 set info [entity 6]
 regexp {Starting +Point +: +\x28([-0-9.+eE]+),([-0-9.+eE]+),([-0-9.+eE]+)\x29} ${info} full x1 y1 z1
index 98dcde01428d7d932dae7e469d64667985ca3317..d2b07ca1bf1358c3b88fc0e698458a1e38bd86bf 100755 (executable)
@@ -33,7 +33,7 @@ if { ${IsOk} == 1} {
    set Tol1 [lindex [split [tolerance OCC9490a] ${aTokList}] 2]
    set Tol2 [lindex [split [tolerance OCC9490b] ${aTokList}] 2]
    set percent_max 0.1
-   set Tolerance_percent [GetPercent ${Tol1} ${Tol2}]
+   set Tolerance_percent [expr abs( ${Tol2})-abs(${Tol1})/abs(${Tol1})*100.]
    puts "Tolerance_percent = ${Tolerance_percent} %"
    if { ${Tolerance_percent}  > ${percent_max} } {
       set IsOk 0
index d6468d909637ed15b0caff3cab8f8e010cdc7bc3..67214b44fd50f95d4711ae4cf2d050ad4a584102 100755 (executable)
@@ -35,7 +35,7 @@ if { ${IsOk} == 1} {
    set Tol1 [lindex [split [tolerance OCC9531a] ${aTokList}] 2]
    set Tol2 [lindex [split [tolerance OCC9531b] ${aTokList}] 2]
    set percent_max 0.1
-   set Tolerance_percent [GetPercent ${Tol1} ${Tol2}]
+   set Tolerance_percent [expr abs( ${Tol2})-abs(${Tol1})/abs(${Tol1})*100.]
    puts "Tolerance_percent = ${Tolerance_percent} %"
    if { ${Tolerance_percent}  > ${percent_max} } {
       set IsOk 0
index 78aebe90ae11c028b176796b327d065a020276a0..e55772d6bad3e2efd7e260427bac4f7fa166c9fb 100644 (file)
@@ -598,7 +598,7 @@ if {[regexp "VOLUME_EXACTLY" $CompareDocumentsMode] || [regexp "ALL" $CompareDoc
        # Perform sewing of resulting shape. If amount of closed shells of resulting shape is not equal to amount of 
        # closed shells of initial shape increace tolerance and perform sewing again
        set nbClosedShells_Second 0
-       set toler 0.00001
+       set toler 0.005
        set IsSewingPerformedCorrectly 0
        XGetOneShape Shape_Second D_Second
        for {set k 0} {$k < 5} {incr k} {