OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
c_h3d_update_shell_tensor.cpp File Reference
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <math.h>
#include <fcntl.h>
#include <sys/resource.h>
#include <sys/types.h>
#include <time.h>
#include <sys/stat.h>
#include <unistd.h>
#include <dlfcn.h>
#include <stdbool.h>
#include "h3dpublic_defs.h"
#include "h3dpublic_export.h"
#include "h3d_values.h"

Go to the source code of this file.

Macros

#define _FCALL
#define _FCALL

Functions

void c_h3d_update_shell_tensor_ (my_real *TT, int *IH3D, int *ITAB, int *NUMNOD, int *IXC, int *NIXC, int *NUMELC, int *IPARTC, int *IXTG, int *NIXTG, int *NUMELTG, int *IPARTTG, my_real *FUNC, int *ID_ELEM, int *CPT_DATATYPE, int *ITY_ELEM, int *NUMELS, int *NUMELQ, int *NUMELT, int *NUMELP, int *NUMELR, int *IS_WRITTEN)
void _FCALL C_H3D_UPDATE_SHELL_TENSOR (my_real *TT, int *IH3D, int *ITAB, int *NUMNOD, int *IXC, int *NIXC, int *NUMELC, int *IPARTC, int *IXTG, int *NIXTG, int *NUMELTG, int *IPARTTG, my_real *FUNC, int *ID_ELEM, int *CPT_DATATYPE, int *ITY_ELEM, int *NUMELS, int *NUMELQ, int *NUMELT, int *NUMELP, int *NUMELR, int *IS_WRITTEN)
void c_h3d_update_shell_tensor__ (my_real *TT, int *IH3D, int *ITAB, int *NUMNOD, int *IXC, int *NIXC, int *NUMELC, int *IPARTC, int *IXTG, int *NIXTG, int *NUMELTG, int *IPARTTG, my_real *FUNC, int *ID_ELEM, int *CPT_DATATYPE, int *ITY_ELEM, int *NUMELS, int *NUMELQ, int *NUMELT, int *NUMELP, int *NUMELR, int *IS_WRITTEN)
void c_h3d_update_shell_tensor (my_real *TT, int *IH3D, int *ITAB, int *NUMNOD, int *IXC, int *NIXC, int *NUMELC, int *IPARTC, int *IXTG, int *NIXTG, int *NUMELTG, int *IPARTTG, my_real *FUNC, int *ID_ELEM, int *CPT_DATATYPE, int *ITY_ELEM, int *NUMELS, int *NUMELQ, int *NUMELT, int *NUMELP, int *NUMELR, int *IS_WRITTEN)

Macro Definition Documentation

◆ _FCALL [1/2]

#define _FCALL

Definition at line 50 of file c_h3d_update_shell_tensor.cpp.

◆ _FCALL [2/2]

#define _FCALL

Definition at line 50 of file c_h3d_update_shell_tensor.cpp.

Function Documentation

◆ C_H3D_UPDATE_SHELL_TENSOR()

void _FCALL C_H3D_UPDATE_SHELL_TENSOR ( my_real * TT,
int * IH3D,
int * ITAB,
int * NUMNOD,
int * IXC,
int * NIXC,
int * NUMELC,
int * IPARTC,
int * IXTG,
int * NIXTG,
int * NUMELTG,
int * IPARTTG,
my_real * FUNC,
int * ID_ELEM,
int * CPT_DATATYPE,
int * ITY_ELEM,
int * NUMELS,
int * NUMELQ,
int * NUMELT,
int * NUMELP,
int * NUMELR,
int * IS_WRITTEN )

Definition at line 164 of file c_h3d_update_shell_tensor.cpp.

167{c_h3d_update_shell_tensor_ (TT,IH3D,ITAB,NUMNOD,IXC,NIXC,NUMELC,IPARTC,IXTG,NIXTG,NUMELTG,IPARTTG,FUNC,ID_ELEM,CPT_DATATYPE,ITY_ELEM,
168 NUMELS,NUMELQ,NUMELT,NUMELP,NUMELR,IS_WRITTEN);}
c_h3d_update_shell_tensor_
void c_h3d_update_shell_tensor_(my_real *TT, int *IH3D, int *ITAB, int *NUMNOD, int *IXC, int *NIXC, int *NUMELC, int *IPARTC, int *IXTG, int *NIXTG, int *NUMELTG, int *IPARTTG, my_real *FUNC, int *ID_ELEM, int *CPT_DATATYPE, int *ITY_ELEM, int *NUMELS, int *NUMELQ, int *NUMELT, int *NUMELP, int *NUMELR, int *IS_WRITTEN)
Definition c_h3d_update_shell_tensor.cpp:79
FUNC
#define FUNC
Definition clamov.c:8

◆ c_h3d_update_shell_tensor()

void c_h3d_update_shell_tensor ( my_real * TT,
int * IH3D,
int * ITAB,
int * NUMNOD,
int * IXC,
int * NIXC,
int * NUMELC,
int * IPARTC,
int * IXTG,
int * NIXTG,
int * NUMELTG,
int * IPARTTG,
my_real * FUNC,
int * ID_ELEM,
int * CPT_DATATYPE,
int * ITY_ELEM,
int * NUMELS,
int * NUMELQ,
int * NUMELT,
int * NUMELP,
int * NUMELR,
int * IS_WRITTEN )

Definition at line 176 of file c_h3d_update_shell_tensor.cpp.

179{c_h3d_update_shell_tensor_ (TT,IH3D,ITAB,NUMNOD,IXC,NIXC,NUMELC,IPARTC,IXTG,NIXTG,NUMELTG,IPARTTG,FUNC,ID_ELEM,CPT_DATATYPE,ITY_ELEM,
180 NUMELS,NUMELQ,NUMELT,NUMELP,NUMELR,IS_WRITTEN);}

◆ c_h3d_update_shell_tensor_()

void c_h3d_update_shell_tensor_ ( my_real * TT,
int * IH3D,
int * ITAB,
int * NUMNOD,
int * IXC,
int * NIXC,
int * NUMELC,
int * IPARTC,
int * IXTG,
int * NIXTG,
int * NUMELTG,
int * IPARTTG,
my_real * FUNC,
int * ID_ELEM,
int * CPT_DATATYPE,
int * ITY_ELEM,
int * NUMELS,
int * NUMELQ,
int * NUMELT,
int * NUMELP,
int * NUMELR,
int * IS_WRITTEN )

Definition at line 79 of file c_h3d_update_shell_tensor.cpp.

82{
83 int i;
84 int offset;
85 H3D_ID elem_id;
86 H3D_ID comp_id;
87//
88 // initialize
89
90 try {
91 // create Subcase (Loadcase)
92 unsigned int max_sims = 10;
93 unsigned int sub_count = 1;
94 float elem_result[3] = { 0.0f, 0.0f, 0.0f};
95
96 // create Result Data sets
97 unsigned int num_corners = 0;
98 unsigned int num_modes = 0;
99 bool complex = false;
100 float value[1] ;
101
102 sim_idx = *IH3D;
103
104 if( *NUMELC != 0 )
105 {
106 rc = Hyper3DDatasetBegin(h3d_file, *NUMELC, sim_idx, subcase_id, H3D_DS_ELEM,
107 H3D_DS_TENSOR2D, num_corners, num_modes, *CPT_DATATYPE,
108 0, sh4n_poolname_id, complex);
109
110 if( !rc ) throw rc;
111 offset = 0;
112
113
114 for( i = 0; i < *NUMELC + *NUMELTG; i++ )
115 {
116 if( ITY_ELEM[i] == 3 && IS_WRITTEN[i] == 1)
117 {
118 elem_id = ID_ELEM[i];
119 elem_result[0] = FUNC[3*i];
120 elem_result[1] = FUNC[3*i+1];
121 elem_result[2] = FUNC[3*i+2];
122 rc = Hyper3DDatasetWrite(h3d_file, elem_id, &elem_result[0]);
123 IS_WRITTEN[i] = 0;
124 }
125 }
126
127 rc = Hyper3DDatasetEnd(h3d_file);
128 if( !rc ) throw rc;
129 }
130
131 if( *NUMELTG != 0 )
132 {
133
134 offset = *NUMELC;
135
136 rc = Hyper3DDatasetBegin(h3d_file, *NUMELTG, sim_idx, subcase_id, H3D_DS_ELEM,
137 H3D_DS_TENSOR2D, num_corners, num_modes, *CPT_DATATYPE,
138 0, sh3n_poolname_id, complex);
139 if( !rc ) throw rc;
140
141 for( i = 0; i < *NUMELC + *NUMELTG; i++ )
142 {
143 if( ITY_ELEM[i] == 7 && IS_WRITTEN[i] == 1)
144 {
145 elem_id = ID_ELEM[i];
146 elem_result[0] = FUNC[3*i];
147 elem_result[1] = FUNC[3*i+1];
148 elem_result[2] = FUNC[3*i+2];
149 rc = Hyper3DDatasetWrite(h3d_file, elem_id, &elem_result[0]);
150 IS_WRITTEN[i] = 0;
151 }
152 }
153 rc = Hyper3DDatasetEnd(h3d_file);
154 if( !rc ) throw rc;
155 }
156
157 } // end of try
158
159 catch(...) {
160 Hyper3DExportClearError(h3d_file);
161 }
162}
h3d_file
H3DFileInfo * h3d_file
Definition c_h3d_open_file.cpp:69
rc
bool rc
Definition c_h3d_open_file.cpp:70
sh4n_poolname_id
H3D_ID sh4n_poolname_id
Definition c_h3d_open_file.cpp:105
sh3n_poolname_id
H3D_ID sh3n_poolname_id
Definition c_h3d_open_file.cpp:106
comp_id
H3D_ID comp_id
Definition c_h3d_open_file.cpp:92
sim_idx
H3D_SIM_IDX sim_idx
Definition c_h3d_open_file.cpp:95
subcase_id
H3D_ID subcase_id
Definition c_h3d_open_file.cpp:71
Hyper3DDatasetBegin
bool Hyper3DDatasetBegin(H3DFileInfo *h3d_file, unsigned int count, H3D_SIM_IDX idx, H3D_ID subcase_id, H3D_DS_TYPE type, H3D_DS_FORMAT format, unsigned int num_corners, unsigned int num_modes, H3D_ID dt_id, int layer_idx, H3D_ID data_poolname_id, bool complex)
Definition h3d_dl.c:1352
Hyper3DExportClearError
bool Hyper3DExportClearError(H3DFileInfo *h3d_file)
Definition h3d_dl.c:939
Hyper3DDatasetEnd
bool Hyper3DDatasetEnd(H3DFileInfo *h3d_file)
Definition h3d_dl.c:1400
Hyper3DDatasetWrite
bool Hyper3DDatasetWrite(H3DFileInfo *h3d_file, H3D_ID id, const float *data)
Definition h3d_dl.c:1372
rad2r_mod::offset
integer, dimension(:), allocatable offset
Definition rad2r.F:53

◆ c_h3d_update_shell_tensor__()

void c_h3d_update_shell_tensor__ ( my_real * TT,
int * IH3D,
int * ITAB,
int * NUMNOD,
int * IXC,
int * NIXC,
int * NUMELC,
int * IPARTC,
int * IXTG,
int * NIXTG,
int * NUMELTG,
int * IPARTTG,
my_real * FUNC,
int * ID_ELEM,
int * CPT_DATATYPE,
int * ITY_ELEM,
int * NUMELS,
int * NUMELQ,
int * NUMELT,
int * NUMELP,
int * NUMELR,
int * IS_WRITTEN )

Definition at line 170 of file c_h3d_update_shell_tensor.cpp.

173{c_h3d_update_shell_tensor_ (TT,IH3D,ITAB,NUMNOD,IXC,NIXC,NUMELC,IPARTC,IXTG,NIXTG,NUMELTG,IPARTTG,FUNC,ID_ELEM,CPT_DATATYPE,ITY_ELEM,
174 NUMELS,NUMELQ,NUMELT,NUMELP,NUMELR,IS_WRITTEN);}