1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-10 18:51:21 +03:00
occt/src/GeomFill/GeomFill_Coons.cxx
dpasukhi a5a7b3185b Coding - Apply .clang-format formatting #286
Update empty method guards to new style with regex (see PR).
Used clang-format 18.1.8.
New actions to validate code formatting is added.
Update .clang-format with disabling of include sorting.
  It is temporary changes, then include will be sorted.
Apply formatting for /src and /tools folder.
The files with .hxx,.cxx,.lxx,.h,.pxx,.hpp,*.cpp extensions.
2025-01-26 00:43:57 +00:00

201 lines
6.6 KiB
C++

// Created on: 1993-09-29
// Created by: Bruno DUMORTIER
// Copyright (c) 1993-1999 Matra Datavision
// Copyright (c) 1999-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.
#include <BSplCLib.hxx>
#include <GeomFill_Coons.hxx>
#include <PLib.hxx>
#include <TColgp_HArray2OfPnt.hxx>
#include <TColStd_HArray2OfReal.hxx>
//=================================================================================================
GeomFill_Coons::GeomFill_Coons() {}
//=================================================================================================
GeomFill_Coons::GeomFill_Coons(const TColgp_Array1OfPnt& P1,
const TColgp_Array1OfPnt& P2,
const TColgp_Array1OfPnt& P3,
const TColgp_Array1OfPnt& P4)
{
Init(P1, P2, P3, P4);
}
//=================================================================================================
GeomFill_Coons::GeomFill_Coons(const TColgp_Array1OfPnt& P1,
const TColgp_Array1OfPnt& P2,
const TColgp_Array1OfPnt& P3,
const TColgp_Array1OfPnt& P4,
const TColStd_Array1OfReal& W1,
const TColStd_Array1OfReal& W2,
const TColStd_Array1OfReal& W3,
const TColStd_Array1OfReal& W4)
{
Init(P1, P2, P3, P4, W1, W2, W3, W4);
}
//=================================================================================================
void GeomFill_Coons::Init(const TColgp_Array1OfPnt& P1,
const TColgp_Array1OfPnt& P2,
const TColgp_Array1OfPnt& P3,
const TColgp_Array1OfPnt& P4)
{
Standard_DomainError_Raise_if(P1.Length() != P3.Length() || P2.Length() != P4.Length(), " ");
Standard_Integer NPolU = P1.Length();
Standard_Integer NPolV = P2.Length();
IsRational = Standard_False;
myPoles = new TColgp_HArray2OfPnt(1, NPolU, 1, NPolV);
// The boundaries are not modified
Standard_Integer i, j, k;
for (i = 1; i <= NPolU; i++)
{
myPoles->SetValue(i, 1, P1(i));
myPoles->SetValue(i, NPolV, P3(i));
}
for (i = 1; i <= NPolV; i++)
{
myPoles->SetValue(1, i, P2(i));
myPoles->SetValue(NPolU, i, P4(i));
}
// Calcul des coefficients multiplicateurs
TColgp_Array1OfPnt Coef(1, 4);
TColgp_Array1OfPnt Pole(1, 4);
TColgp_Array1OfPnt CoefU(1, NPolU);
TColgp_Array1OfPnt CoefV(1, NPolV);
Coef(4) = gp_Pnt(2., -2., 0.);
Coef(3) = gp_Pnt(-3., 3., 0.);
Coef(2) = gp_Pnt(0., 0., 0.);
Coef(1) = gp_Pnt(1., 0., 0.);
PLib::CoefficientsPoles(Coef, PLib::NoWeights(), Pole, PLib::NoWeights());
if (NPolU > 4)
{
BSplCLib::IncreaseDegree(NPolU - 1, Pole, BSplCLib::NoWeights(), CoefU, BSplCLib::NoWeights());
}
else
{
CoefU = Pole;
}
if (NPolV > 4)
{
BSplCLib::IncreaseDegree(NPolV - 1, Pole, BSplCLib::NoWeights(), CoefV, BSplCLib::NoWeights());
}
else
{
CoefV = Pole;
}
TColStd_Array1OfReal FU(2, NPolU - 1);
TColStd_Array1OfReal GU(2, NPolU - 1);
TColStd_Array1OfReal FV(2, NPolV - 1);
TColStd_Array1OfReal GV(2, NPolV - 1);
Standard_Real Dummy;
for (i = 2; i < NPolU; i++)
{
CoefU(i).Coord(FU(i), GU(i), Dummy);
}
for (i = 2; i < NPolV; i++)
{
CoefV(i).Coord(FV(i), GV(i), Dummy);
}
// Clacul des poles interieurs
gp_Pnt P;
for (j = 2; j < NPolV; j++)
{
for (i = 2; i < NPolU; i++)
{
for (k = 1; k <= 3; k++)
{
P.SetCoord(
k,
FV(j) * (myPoles->Value(i, 1)).Coord(k) + GV(j) * (myPoles->Value(i, NPolV)).Coord(k)
+ FU(i) * (myPoles->Value(1, j)).Coord(k) + GU(i) * (myPoles->Value(NPolU, j)).Coord(k)
- FU(i) * FV(j) * (myPoles->Value(1, 1)).Coord(k)
- FU(i) * GV(j) * (myPoles->Value(1, NPolV)).Coord(k)
- GU(i) * FV(j) * (myPoles->Value(NPolU, 1)).Coord(k)
- GU(i) * GV(j) * (myPoles->Value(NPolU, NPolV)).Coord(k));
}
myPoles->SetValue(i, j, P);
}
}
}
//=================================================================================================
void GeomFill_Coons::Init(const TColgp_Array1OfPnt& P1,
const TColgp_Array1OfPnt& P2,
const TColgp_Array1OfPnt& P3,
const TColgp_Array1OfPnt& P4,
const TColStd_Array1OfReal& W1,
const TColStd_Array1OfReal& W2,
const TColStd_Array1OfReal& W3,
const TColStd_Array1OfReal& W4)
{
Standard_DomainError_Raise_if(W1.Length() != W3.Length() || W2.Length() != W4.Length(), " ");
Standard_DomainError_Raise_if(W1.Length() != P1.Length() || W2.Length() != P2.Length()
|| W3.Length() != P3.Length() || W4.Length() != P4.Length(),
" ");
Init(P1, P2, P3, P4);
IsRational = Standard_True;
Standard_Integer NPolU = W1.Length();
Standard_Integer NPolV = W2.Length();
// #ifdef OCCT_DEBUG
Standard_Real NU = NPolU - 1;
Standard_Real NV = NPolV - 1;
// #endif
myWeights = new TColStd_HArray2OfReal(1, NPolU, 1, NPolV);
// The boundaries are not modified
Standard_Integer i, j;
for (i = 1; i <= NPolU; i++)
{
myWeights->SetValue(i, 1, W1(i));
myWeights->SetValue(i, NPolV, W3(i));
}
Standard_Real PU, PU1, PV, PV1;
for (j = 2; j <= NPolV - 1; j++)
{
PV = (j - 1) / NV;
PV1 = 1 - PV;
myWeights->SetValue(1, j, W4(j));
myWeights->SetValue(NPolU, j, W2(j));
for (i = 2; i <= NPolU - 1; i++)
{
PU = (i - 1) / NU;
PU1 = 1 - PU;
// Standard_Real W = 0.5 * ( PV1 * W1(i) + PV * W3(i) +
// PU * W2(j) + PU1 * W4(j) );
Standard_Real W =
PV1 * W1(i) + PV * W3(i) + PU * W2(j) + PU1 * W4(j)
- (PU1 * PV1 * W1(1) + PU * PV1 * W2(1) + PU * PV * W3(NPolU) + PU1 * PV * W4(NPolV));
myWeights->SetValue(i, j, W);
}
}
}