OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
c_h3d_update_sph_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_sph_tensor_ (my_real *TT, int *IH3D, int *ITAB, int *NUMSPH, int *IPARTS, my_real *FUNC, int *ID_ELEM, int *CPT_DATATYPE, int *IS_WRITTEN)
void _FCALL C_H3D_UPDATE_SPH_TENSOR (my_real *TT, int *IH3D, int *ITAB, int *NUMSPH, int *IPARTS, my_real *FUNC, int *ID_ELEM, int *CPT_DATATYPE, int *IS_WRITTEN)
void c_h3d_update_sph_tensor__ (my_real *TT, int *IH3D, int *ITAB, int *NUMSPH, int *IPARTS, my_real *FUNC, int *ID_ELEM, int *CPT_DATATYPE, int *IS_WRITTEN)
void c_h3d_update_sph_tensor (my_real *TT, int *IH3D, int *ITAB, int *NUMSPH, int *IPARTS, my_real *FUNC, int *ID_ELEM, int *CPT_DATATYPE, int *IS_WRITTEN)

Macro Definition Documentation

◆ _FCALL [1/2]

#define _FCALL

Definition at line 50 of file c_h3d_update_sph_tensor.cpp.

◆ _FCALL [2/2]

#define _FCALL

Definition at line 50 of file c_h3d_update_sph_tensor.cpp.

Function Documentation

◆ C_H3D_UPDATE_SPH_TENSOR()

void _FCALL C_H3D_UPDATE_SPH_TENSOR ( my_real * TT,
int * IH3D,
int * ITAB,
int * NUMSPH,
int * IPARTS,
my_real * FUNC,
int * ID_ELEM,
int * CPT_DATATYPE,
int * IS_WRITTEN )

Definition at line 137 of file c_h3d_update_sph_tensor.cpp.

139{c_h3d_update_sph_tensor_ (TT,IH3D,ITAB,NUMSPH,IPARTS,FUNC,ID_ELEM,CPT_DATATYPE,IS_WRITTEN);}
void c_h3d_update_sph_tensor_(my_real *TT, int *IH3D, int *ITAB, int *NUMSPH, int *IPARTS, my_real *FUNC, int *ID_ELEM, int *CPT_DATATYPE, int *IS_WRITTEN)
#define FUNC
Definition clamov.c:8

◆ c_h3d_update_sph_tensor()

void c_h3d_update_sph_tensor ( my_real * TT,
int * IH3D,
int * ITAB,
int * NUMSPH,
int * IPARTS,
my_real * FUNC,
int * ID_ELEM,
int * CPT_DATATYPE,
int * IS_WRITTEN )

Definition at line 145 of file c_h3d_update_sph_tensor.cpp.

147{c_h3d_update_sph_tensor_ (TT,IH3D,ITAB,NUMSPH,IPARTS,FUNC,ID_ELEM,CPT_DATATYPE,IS_WRITTEN);}

◆ c_h3d_update_sph_tensor_()

void c_h3d_update_sph_tensor_ ( my_real * TT,
int * IH3D,
int * ITAB,
int * NUMSPH,
int * IPARTS,
my_real * FUNC,
int * ID_ELEM,
int * CPT_DATATYPE,
int * IS_WRITTEN )

Definition at line 79 of file c_h3d_update_sph_tensor.cpp.

81{
82 int i;
83 int offset;
84 H3D_ID elem_id;
85 H3D_ID comp_id;
86//
87 // initialize
88
89 try {
90 // create Subcase (Loadcase)
91 unsigned int max_sims = 10;
92 unsigned int sub_count = 1;
93 float elem_result[6] = { 0.0f, 0.0f, 0.0f, 0.0f, 0.0f, 0.0f };
94
95 // create Result Data sets
96 unsigned int num_corners = 0;
97 unsigned int num_modes = 0;
98 bool complex = false;
99 float value[1] ;
100
101 sim_idx = *IH3D;
102
103 if(*NUMSPH != 0)
104 {
105 rc = Hyper3DDatasetBegin(h3d_file, *NUMSPH, sim_idx, subcase_id, H3D_DS_ELEM,
106 H3D_DS_TENSOR3D, num_corners, num_modes, *CPT_DATATYPE,
108 if( !rc ) throw rc;
109
110 for( i = 0; i < *NUMSPH; i++ )
111 {
112 if( IS_WRITTEN[i] == 1)
113 {
114 elem_id = ID_ELEM[i];
115 elem_result[0] = FUNC[6*i];
116 elem_result[1] = FUNC[6*i+1];
117 elem_result[2] = FUNC[6*i+2];
118 elem_result[3] = FUNC[6*i+3];
119 elem_result[4] = FUNC[6*i+4];
120 elem_result[5] = FUNC[6*i+5];
121 rc = Hyper3DDatasetWrite(h3d_file, elem_id, &elem_result[0]);
122 IS_WRITTEN[i] = 0;
123 }
124 }
126 if( !rc ) throw rc;
127 }
128
129 } // end of try
130
131 catch(...) {
133 }
134
135}
H3DFileInfo * h3d_file
bool rc
H3D_ID comp_id
H3D_SIM_IDX sim_idx
H3D_ID subcase_id
H3D_ID sphcell_poolname_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_sph_tensor__()

void c_h3d_update_sph_tensor__ ( my_real * TT,
int * IH3D,
int * ITAB,
int * NUMSPH,
int * IPARTS,
my_real * FUNC,
int * ID_ELEM,
int * CPT_DATATYPE,
int * IS_WRITTEN )

Definition at line 141 of file c_h3d_update_sph_tensor.cpp.

143{c_h3d_update_sph_tensor_ (TT,IH3D,ITAB,NUMSPH,IPARTS,FUNC,ID_ELEM,CPT_DATATYPE,IS_WRITTEN);}