Warning, /include/opencascade/FairCurve_BattenLaw.lxx is written in an unsupported language. File is not indexed.
0001 // Created on: 1996-02-01
0002 // Created by: Philippe MANGIN
0003 // Copyright (c) 1996-1999 Matra Datavision
0004 // Copyright (c) 1999-2014 OPEN CASCADE SAS
0005 //
0006 // This file is part of Open CASCADE Technology software library.
0007 //
0008 // This library is free software; you can redistribute it and/or modify it under
0009 // the terms of the GNU Lesser General Public License version 2.1 as published
0010 // by the Free Software Foundation, with special exception defined in the file
0011 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
0012 // distribution for complete text of the license and disclaimer of any warranty.
0013 //
0014 // Alternatively, this file may be used under the terms of Open CASCADE
0015 // commercial license or contractual agreement.
0016
0017 inline void FairCurve_BattenLaw::SetSliding(const Standard_Real Sliding)
0018 {
0019 LengthSliding = Sliding;
0020 }
0021
0022 inline void FairCurve_BattenLaw::SetHeigth(const Standard_Real Heigth)
0023 {
0024 MiddleHeigth = Heigth;
0025 }
0026
0027 inline void FairCurve_BattenLaw::SetSlope(const Standard_Real Slope)
0028 {
0029 GeometricSlope = Slope;
0030 }
0031 inline Standard_Boolean FairCurve_BattenLaw::Value(const Standard_Real T, Standard_Real& THeigth)
0032 {
0033 THeigth = MiddleHeigth + (T - 0.5)*GeometricSlope*LengthSliding;
0034 return (THeigth > 0);
0035 }
