Files
solver/OndselSolver/DistanceConstraintIqcJc.cpp
2024-04-03 08:56:40 +02:00

113 lines
3.9 KiB
C++

/***************************************************************************
* Copyright (c) 2023 Ondsel, Inc. *
* *
* This file is part of OndselSolver. *
* *
* See LICENSE file for details about copyright. *
***************************************************************************/
#include "DistanceConstraintIqcJc.h"
#include "EndFrameqc.h"
#include "CREATE.h"
#include "DistIeqcJec.h"
using namespace MbD;
MbD::DistanceConstraintIqcJc::DistanceConstraintIqcJc(EndFrmsptr frmi, EndFrmsptr frmj) : DistanceConstraintIJ(frmi, frmj)
{
}
void MbD::DistanceConstraintIqcJc::addToJointForceI(FColDsptr col)
{
col->equalSelfPlusFullVectortimes(pGpXI, lam);
}
void MbD::DistanceConstraintIqcJc::addToJointTorqueI(FColDsptr jointTorque)
{
auto cForceT = pGpXI->times(lam);
auto frmIeqc = std::static_pointer_cast<EndFrameqc>(frmI);
auto rIpIeIp = frmIeqc->rpep();
auto pAOIppEI = frmIeqc->pAOppE();
auto aBOIp = frmIeqc->aBOp();
auto fpAOIppEIrIpIeIp = std::make_shared<FullColumn<double>>(4, 0.0);
for (size_t i = 0; i < 4; i++)
{
auto dum = cForceT->timesFullColumn(pAOIppEI->at(i)->timesFullColumn(rIpIeIp));
fpAOIppEIrIpIeIp->atiput(i, dum);
}
auto lampGpE = pGpEI->transpose()->times(lam);
auto c2Torque = aBOIp->timesFullColumn(lampGpE->minusFullColumn(fpAOIppEIrIpIeIp));
jointTorque->equalSelfPlusFullColumntimes(c2Torque, 0.5);
}
void MbD::DistanceConstraintIqcJc::calcPostDynCorrectorIteration()
{
DistanceConstraintIJ::calcPostDynCorrectorIteration();
pGpXI = distIeJe->pvaluepXI();
pGpEI = distIeJe->pvaluepEI();
ppGpXIpXI = distIeJe->ppvaluepXIpXI();
ppGpXIpEI = distIeJe->ppvaluepXIpEI();
ppGpEIpEI = distIeJe->ppvaluepEIpEI();
}
void MbD::DistanceConstraintIqcJc::fillAccICIterError(FColDsptr col)
{
col->atiplusFullVectortimes(iqXI, pGpXI, lam);
col->atiplusFullVectortimes(iqEI, pGpEI, lam);
auto efrmIqc = std::static_pointer_cast<EndFrameqc>(frmI);
auto qXdotI = efrmIqc->qXdot();
auto qEdotI = efrmIqc->qEdot();
auto sum = pGpXI->timesFullColumn(efrmIqc->qXddot());
sum += pGpEI->timesFullColumn(efrmIqc->qEddot());
sum += qXdotI->transposeTimesFullColumn(ppGpXIpXI->timesFullColumn(qXdotI));
sum += 2.0 * (qXdotI->transposeTimesFullColumn(ppGpXIpEI->timesFullColumn(qEdotI)));
sum += qEdotI->transposeTimesFullColumn(ppGpEIpEI->timesFullColumn(qEdotI));
col->atiplusNumber(iG, sum);
}
void MbD::DistanceConstraintIqcJc::fillPosICError(FColDsptr col)
{
DistanceConstraintIJ::fillPosICError(col);
col->atiplusFullVectortimes(iqXI, pGpXI, lam);
col->atiplusFullVectortimes(iqEI, pGpEI, lam);
}
void MbD::DistanceConstraintIqcJc::fillPosICJacob(SpMatDsptr mat)
{
mat->atijplusFullRow(iG, iqXI, pGpXI);
mat->atijplusFullColumn(iqXI, iG, pGpXI->transpose());
mat->atijplusFullRow(iG, iqEI, pGpEI);
mat->atijplusFullColumn(iqEI, iG, pGpEI->transpose());
mat->atijplusFullMatrixtimes(iqXI, iqXI, ppGpXIpXI, lam);
auto ppGpXIpEIlam = ppGpXIpEI->times(lam);
mat->atijplusFullMatrix(iqXI, iqEI, ppGpXIpEIlam);
mat->atijplusTransposeFullMatrix(iqEI, iqXI, ppGpXIpEIlam);
mat->atijplusFullMatrixtimes(iqEI, iqEI, ppGpEIpEI, lam);
}
void MbD::DistanceConstraintIqcJc::fillPosKineJacob(SpMatDsptr mat)
{
mat->atijplusFullRow(iG, iqXI, pGpXI);
mat->atijplusFullRow(iG, iqEI, pGpEI);
}
void MbD::DistanceConstraintIqcJc::fillVelICJacob(SpMatDsptr mat)
{
mat->atijplusFullRow(iG, iqXI, pGpXI);
mat->atijplusFullColumn(iqXI, iG, pGpXI->transpose());
mat->atijplusFullRow(iG, iqEI, pGpEI);
mat->atijplusFullColumn(iqEI, iG, pGpEI->transpose());
}
void MbD::DistanceConstraintIqcJc::init_distIeJe()
{
distIeJe = CREATE<DistIeqcJec>::With(frmI, frmJ);
}
void MbD::DistanceConstraintIqcJc::useEquationNumbers()
{
auto frmIeqc = std::static_pointer_cast<EndFrameqc>(frmI);
iqXI = frmIeqc->iqX();
iqEI = frmIeqc->iqE();
}