OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
c_h3d_update_nodal_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_nodal_tensor_ (my_real *TT, int *IH3D, int *ITAB, int *NUMNOD, my_real *FUNC, int *ID_NODE, int *CPT_DATATYPE, int *IS_WRITTEN)
void _FCALL C_H3D_UPDATE_NODAL_TENSOR (my_real *TT, int *IH3D, int *ITAB, int *NUMNOD, my_real *FUNC, int *ID_NODE, int *CPT_DATATYPE, int *IS_WRITTEN)
void c_h3d_update_nodal_tensor__ (my_real *TT, int *IH3D, int *ITAB, int *NUMNOD, my_real *FUNC, int *ID_NODE, int *CPT_DATATYPE, int *IS_WRITTEN)
void c_h3d_update_nodal_tensor (my_real *TT, int *IH3D, int *ITAB, int *NUMNOD, my_real *FUNC, int *ID_NODE, int *CPT_DATATYPE, int *IS_WRITTEN)

Macro Definition Documentation

◆ _FCALL [1/2]

#define _FCALL

Definition at line 50 of file c_h3d_update_nodal_tensor.cpp.

◆ _FCALL [2/2]

#define _FCALL

Definition at line 50 of file c_h3d_update_nodal_tensor.cpp.

Function Documentation

◆ C_H3D_UPDATE_NODAL_TENSOR()

void _FCALL C_H3D_UPDATE_NODAL_TENSOR ( my_real * TT,
int * IH3D,
int * ITAB,
int * NUMNOD,
my_real * FUNC,
int * ID_NODE,
int * CPT_DATATYPE,
int * IS_WRITTEN )

Definition at line 140 of file c_h3d_update_nodal_tensor.cpp.

141{c_h3d_update_nodal_tensor_ (TT,IH3D,ITAB,NUMNOD,FUNC,ID_NODE,CPT_DATATYPE,IS_WRITTEN);}
void c_h3d_update_nodal_tensor_(my_real *TT, int *IH3D, int *ITAB, int *NUMNOD, my_real *FUNC, int *ID_NODE, int *CPT_DATATYPE, int *IS_WRITTEN)
#define FUNC
Definition clamov.c:8

◆ c_h3d_update_nodal_tensor()

void c_h3d_update_nodal_tensor ( my_real * TT,
int * IH3D,
int * ITAB,
int * NUMNOD,
my_real * FUNC,
int * ID_NODE,
int * CPT_DATATYPE,
int * IS_WRITTEN )

Definition at line 146 of file c_h3d_update_nodal_tensor.cpp.

147{c_h3d_update_nodal_tensor_ (TT,IH3D,ITAB,NUMNOD,FUNC,ID_NODE,CPT_DATATYPE,IS_WRITTEN);}

◆ c_h3d_update_nodal_tensor_()

void c_h3d_update_nodal_tensor_ ( my_real * TT,
int * IH3D,
int * ITAB,
int * NUMNOD,
my_real * FUNC,
int * ID_NODE,
int * CPT_DATATYPE,
int * IS_WRITTEN )

Definition at line 81 of file c_h3d_update_nodal_tensor.cpp.

82{
83 int i;
84 int offset;
85 H3D_ID node_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 node_result[6] = { 0.0f, 0.0f, 0.0f, 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
105 rc = Hyper3DDatasetBegin(h3d_file, *NUMNOD, sim_idx, subcase_id, H3D_DS_NODE,
106 H3D_DS_TENSOR3D, num_corners, num_modes, *CPT_DATATYPE,
108 if( !rc ) throw rc;
109
110 offset = 0;
111
112 for( i = 0; i < *NUMNOD; i++ )
113 {
114 if(IS_WRITTEN[i] == 1)
115 {
116 node_id = ID_NODE[i];
117 node_result[0] = FUNC[6*i];
118 node_result[1] = FUNC[6*i+1];
119 node_result[2] = FUNC[6*i+2];
120 node_result[3] = FUNC[6*i+3];
121 node_result[4] = FUNC[6*i+4];
122 node_result[5] = FUNC[6*i+5];
123 rc = Hyper3DDatasetWrite(h3d_file, node_id, &node_result[0]);
124 if( !rc ) throw rc;
125 }
126 }
127
129 if( !rc ) throw rc;
130
131
132
133 } // end of try
134
135 catch(...) {
137 }
138}
H3DFileInfo * h3d_file
H3D_ID node_poolname_id
bool rc
H3D_ID comp_id
H3D_SIM_IDX sim_idx
H3D_ID subcase_id
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
bool Hyper3DExportClearError(H3DFileInfo *h3d_file)
Definition h3d_dl.c:939
bool Hyper3DDatasetEnd(H3DFileInfo *h3d_file)
Definition h3d_dl.c:1400
bool Hyper3DDatasetWrite(H3DFileInfo *h3d_file, H3D_ID id, const float *data)
Definition h3d_dl.c:1372
integer, dimension(:), allocatable offset
Definition rad2r.F:53

◆ c_h3d_update_nodal_tensor__()

void c_h3d_update_nodal_tensor__ ( my_real * TT,
int * IH3D,
int * ITAB,
int * NUMNOD,
my_real * FUNC,
int * ID_NODE,
int * CPT_DATATYPE,
int * IS_WRITTEN )

Definition at line 143 of file c_h3d_update_nodal_tensor.cpp.

144{c_h3d_update_nodal_tensor_ (TT,IH3D,ITAB,NUMNOD,FUNC,ID_NODE,CPT_DATATYPE,IS_WRITTEN);}