768 {
769 PetscFunctionBegin;
770
771 if(data.getIndices().size()==0) PetscFunctionReturn(0);
772 int nb_gauss_pts = data.getN().size1();
773 int rank = data.getFieldDofs()[0]->getNbOfCoeffs();
774
775
776 if(type == MBVERTEX) {
779
782 for(int gg = 0;gg<nb_gauss_pts;gg++) {
785 }
786
787 int nb=data.getFieldData().size()/2;
790
791 for(int ii=0; ii<nb; ii++){
794 }
795
796
797 }
798
799 for(unsigned int gg = 0; gg<nb_gauss_pts;gg++) {
800 if(type == MBVERTEX) {
802 else {
804
805 if(type == MBVERTEX) {
808 else if(type == MBEDGE && side < 3){
810 else if(type == MBEDGE && side >= 6){
812 else if(type == MBTRI && side == 3){
814 else if(type == MBTRI && side == 4){
816 }
817
818 PetscFunctionReturn(0);
819 }
static PetscErrorCode ierr
ublas::vector< ublas::vector< VectorDouble > > DispAtGaussPts
PetscErrorCode shapeMat(int rank, unsigned int gg, DataForcesAndSurcesCore::EntData &col_data, MatrixDouble &N_mat, int div=1)
ublas::vector< VectorDouble > field_data_nodes