mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-16 10:08:36 +03:00
License statement text corrected; compiler warnings caused by Bison 2.41 disabled for MSVC; a few other compiler warnings on 54-bit Windows eliminated by appropriate type cast Wrong license statements corrected in several files. Copyright and license statements added in XSD and GLSL files. Copyright year updated in some files. Obsolete documentation files removed from DrawResources.
144 lines
4.2 KiB
Plaintext
144 lines
4.2 KiB
Plaintext
-- Created on: 2000-05-22
|
|
-- Created by: Peter KURNEV
|
|
-- Copyright (c) 2000-2014 OPEN CASCADE SAS
|
|
--
|
|
-- This file is part of Open CASCADE Technology software library.
|
|
--
|
|
-- This library is free software; you can redistribute it and/or modify it under
|
|
-- the terms of the GNU Lesser General Public License version 2.1 as published
|
|
-- by the Free Software Foundation, with special exception defined in the file
|
|
-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
|
-- distribution for complete text of the license and disclaimer of any warranty.
|
|
--
|
|
-- Alternatively, this file may be used under the terms of Open CASCADE
|
|
-- commercial license or contractual agreement.
|
|
|
|
class Root from IntTools
|
|
|
|
---Purpose: The class is to describe the root of
|
|
-- function of one variable for Edge/Edge
|
|
-- and Edge/Surface algorithms.
|
|
|
|
uses
|
|
State from TopAbs
|
|
|
|
---raises
|
|
is
|
|
Create
|
|
returns Root from IntTools ;
|
|
---Purpose:
|
|
--- Empty constructor
|
|
---
|
|
|
|
Create(aRoot: Real from Standard;
|
|
aType: Integer from Standard)
|
|
returns Root from IntTools ;
|
|
---Purpose:
|
|
--- Initializes my by range of parameters
|
|
--- and type of root
|
|
---
|
|
|
|
SetRoot (me:out; aRoot: Real from Standard);
|
|
---Purpose:
|
|
--- Sets the Root's value
|
|
---
|
|
|
|
SetType (me:out; aType: Integer from Standard);
|
|
---Purpose:
|
|
--- Sets the Root's Type
|
|
---
|
|
|
|
SetStateBefore (me:out; aState: State from TopAbs);
|
|
---Purpose:
|
|
--- Set the value of the state before the root
|
|
--- (at t=Root-dt)
|
|
---
|
|
|
|
SetStateAfter (me:out; aState: State from TopAbs);
|
|
---Purpose:
|
|
--- Set the value of the state after the root
|
|
--- (at t=Root-dt)
|
|
---
|
|
|
|
SetLayerHeight (me:out; aHeight:Real from Standard);
|
|
---Purpose:
|
|
--- Not used in Edge/Edge algorithm
|
|
---
|
|
|
|
SetInterval (me:out; t1, t2, f1, f2:Real from Standard);
|
|
---Purpose:
|
|
--- Sets the interval from which the Root was
|
|
--- found [t1,t2] and the corresponding values
|
|
--- of the function on the bounds f(t1), f(t2).
|
|
---
|
|
|
|
Root (me)
|
|
returns Real from Standard;
|
|
---Purpose:
|
|
--- Returns the Root value
|
|
---
|
|
|
|
Type (me)
|
|
returns Integer from Standard;
|
|
---Purpose:
|
|
--- Returns the type of the root
|
|
--- =0 - Simple (was found by bisection method);
|
|
--- =2 - Smart when f1=0, f2!=0 or vice versa
|
|
--- (was found by Fibbonacci method);
|
|
--- =1 - Pure (pure zero for all t [t1,t2] );
|
|
|
|
StateBefore(me)
|
|
returns State from TopAbs;
|
|
---Purpose:
|
|
--- Returns the state before the root
|
|
---
|
|
|
|
StateAfter(me)
|
|
returns State from TopAbs;
|
|
---Purpose:
|
|
--- Returns the state after the root
|
|
---
|
|
|
|
LayerHeight (me)
|
|
returns Real from Standard;
|
|
---Purpose:
|
|
--- Not used in Edge/Edge algorithm
|
|
---
|
|
|
|
IsValid (me)
|
|
returns Boolean from Standard;
|
|
---Purpose:
|
|
--- Returns the validity flag for the root,
|
|
--- True if
|
|
--- myStateBefore==TopAbs_OUT && myStateAfter==TopAbs_IN or
|
|
--- myStateBefore==TopAbs_OUT && myStateAfter==TopAbs_ON or
|
|
--- myStateBefore==TopAbs_ON && myStateAfter==TopAbs_OUT or
|
|
--- myStateBefore==TopAbs_IN && myStateAfter==TopAbs_OUT .
|
|
--- For other cases it returns False.
|
|
---
|
|
|
|
Interval (me; t1:out Real from Standard;
|
|
t2:out Real from Standard;
|
|
f1:out Real from Standard;
|
|
f2:out Real from Standard);
|
|
---Purpose:
|
|
--- Returns the values of interval from which the Root was
|
|
--- found [t1,t2] and the corresponding values
|
|
--- of the function on the bounds f(t1), f(t2).
|
|
---
|
|
|
|
fields
|
|
myRoot: Real from Standard;
|
|
|
|
myType: Integer from Standard;
|
|
|
|
myLayerHeight: Real from Standard;
|
|
myStateBefore: State from TopAbs;
|
|
myStateAfter : State from TopAbs;
|
|
|
|
myt1: Real from Standard;
|
|
myt2: Real from Standard;
|
|
myf1: Real from Standard;
|
|
myf2: Real from Standard;
|
|
end Root;
|