prescribeddispslipbcneumannrc.h

Go to the documentation of this file.

/*
 *
 *                 #####    #####   ######  ######  ###   ###
 *               ##   ##  ##   ##  ##      ##      ## ### ##
 *              ##   ##  ##   ##  ####    ####    ##  #  ##
 *             ##   ##  ##   ##  ##      ##      ##     ##
 *            ##   ##  ##   ##  ##      ##      ##     ##
 *            #####    #####   ##      ######  ##     ##
 *
 *
 *             OOFEM : Object Oriented Finite Element Code
 *
 *               Copyright (C) 1993 - 2025   Borek Patzak
 *
 *
 *
 *       Czech Technical University, Faculty of Civil Engineering,
 *   Department of Structural Mechanics, 166 29 Prague, Czech Republic
 *
 *  This library is free software; you can redistribute it and/or
 *  modify it under the terms of the GNU Lesser General Public
 *  License as published by the Free Software Foundation; either
 *  version 2.1 of the License, or (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 *  Lesser General Public License for more details.
 *
 *  You should have received a copy of the GNU Lesser General Public
 *  License along with this library; if not, write to the Free Software
 *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
 */
 
#ifndef PRESCRIBEDDISPSLIPBCNEUMANN_H_
#define PRESCRIBEDDISPSLIPBCNEUMANN_H_
 
#include "prescribeddispsliphomogenization.h"
#include "activebc.h"
#include "dynamicinputrecord.h"
 
#include <memory>
 
#define _IFT_PrescribedDispSlipBCNeumannRC_Name   "prescribeddispslipbcneumannrc"
#define _IFT_PrescribedDispSlipBCNeumannRC_ConcreteVolSet "concretevolset"
#define _IFT_PrescribedDispSlipBCNeumannRC_RebarSets "rebarsets"
 
namespace oofem {
class Node;
class Element;
class OOFEM_EXPORT PrescribedDispSlipBCNeumannRC : public ActiveBoundaryCondition, public PrescribedDispSlipHomogenization
{
public:
    PrescribedDispSlipBCNeumannRC(int n, Domain *d);
    virtual ~PrescribedDispSlipBCNeumannRC();
 
    int giveNumberOfInternalDofManagers() override;
    DofManager *giveInternalDofManager(int i) override;
 
    void initializeFrom(InputRecord &ir) override;
    void giveInputRecord(DynamicInputRecord &input) override;
 
    bcType giveType() const override { return UnknownBT; }
 
    void scale(double s) override;
 
    void assembleVector(FloatArray &answer, TimeStep *tStep,
                        CharType type, ValueModeType mode,
                        const UnknownNumberingScheme &s, FloatArray *eNorm=nullptr, void* lock=nullptr) override;
 
    void assemble(SparseMtrx &answer, TimeStep *tStep,
                  CharType type, const UnknownNumberingScheme &r_s, const UnknownNumberingScheme &c_s, 
                  double scale = 1.0, void* lock=nullptr) override;
 
    void giveLocationArrays(std :: vector< IntArray > &rows, std :: vector< IntArray > &cols, CharType type,
                            const UnknownNumberingScheme &r_s, const UnknownNumberingScheme &c_s) override;
 
    const char *giveClassName() const override { return "PrescribedDispSlipBCNeumannRC"; }
    const char *giveInputRecordName() const override { return _IFT_PrescribedDispSlipBCNeumannRC_Name; }
 
    void computeStress(FloatArray &sigma, TimeStep *tStep) override;
    void computeTransferStress(FloatArray &bStress, TimeStep *tStep) override;
    void computeReinfStress(FloatArray &rStress, TimeStep *tStep) override;
 
    void computeTangent(FloatMatrix &tangent, TimeStep *tStep) override;
 
protected:
    bool dispGradON = false; 
    bool slipON = false; 
    bool slipGradON = false; 

    std :: unique_ptr< Node > mpSigmaHom;
    IntArray mSigmaIds;

    std :: unique_ptr< Node > lmTauHom;
    IntArray lmTauIds;

    std :: unique_ptr< Node > lmSigmaSHom;
    IntArray lmSigmaSIds;

    int concreteVolSet=0;
    IntArray rebarSets;
 
    void integrateTangentStress(FloatMatrix &oTangent, Element *e, int iBndIndex);
    void assembleVectorStress(FloatArray &answer, TimeStep *tStep, CharType type, ValueModeType mode, const UnknownNumberingScheme &s, FloatArray *eNorm);
    void assembleOnStress(SparseMtrx &answer, const UnknownNumberingScheme &r_s, const UnknownNumberingScheme &c_s, double scale);
 
    void integrateTangentBStressSteel(FloatMatrix &oTangent, Element *e, const int &rebarSet);
    void integrateTangentBStressConcrete(FloatMatrix &oTangent, Element *e);
    void assembleVectorBStress(FloatArray &answer, TimeStep *tStep, CharType type, ValueModeType mode, const UnknownNumberingScheme &s);
    void assembleOnTransferStress(SparseMtrx &answer, const UnknownNumberingScheme &r_s, const UnknownNumberingScheme &c_s, double scale);
 
    void integrateTangentRStressSteel(FloatMatrix &oTangent, Element *e, const int &rebarSet);
    void integrateTangentRStressConcrete(FloatMatrix &oTangent, Element *e, int iBndIndex);
    void assembleVectorRStress(FloatArray &answer, TimeStep *tStep, CharType type, ValueModeType mode, const UnknownNumberingScheme &s);
    void assembleOnReinfStress(SparseMtrx &answer, const UnknownNumberingScheme &r_s, const UnknownNumberingScheme &c_s, double scale);
 
    void computeWeightMatrix(FloatMatrix &C, const IntArray &reinfSets);
    void computeRebarDyad(FloatMatrix &dyad, const int &reinfSet);
    double computeInterfaceLength(const IntArray &reinfSets);
 
    virtual double domainSize(Domain *d, int set) override;
};
} /* namespace oofem */
 
#endif /* PRESCRIBEDDISPSLIPBCNEUMANN_H_ */