81{
82 int i;
84 H3D_ID elem_id;
86
87
88
89 try {
90
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
96 unsigned int num_corners = 0;
97 unsigned int num_modes = 0;
99 float value[1] ;
100
102
103 if(*NUMSPH != 0)
104 {
106 H3D_DS_TENSOR3D, num_corners, num_modes, *CPT_DATATYPE,
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];
122 IS_WRITTEN[i] = 0;
123 }
124 }
127 }
128
129 }
130
131 catch(...) {
133 }
134
135}
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)
bool Hyper3DExportClearError(H3DFileInfo *h3d_file)
bool Hyper3DDatasetEnd(H3DFileInfo *h3d_file)
bool Hyper3DDatasetWrite(H3DFileInfo *h3d_file, H3D_ID id, const float *data)
integer, dimension(:), allocatable offset