43#include <sys/resource.h>
55#include "h3dpublic_defs.h"
56#include "h3dpublic_export.h"
60#include "h3d_values.h"
70void c_h3d_create_beams_(
int *ITAB,
int *NUMNOD,
int *IXP,
int *NIXP,
int *NUMELP,
int *IPARTP,
int *IPART,
int *LIPART1,
int *H3D_PART)
75 unsigned int conn[2] ;
79 unsigned int elem_count = 1;
82 char BEAMPOOL[] =
"BEAM";
88 for(i=0;i<*NUMELP;i++)
90 if(H3D_PART[IPARTP[i] - 1] == 1)
92 elem_id = IXP[*NIXP * i + *NIXP-1];
93 conn[0] = IXP[*NIXP * i + 1];
94 conn[1] = IXP[*NIXP * i + 2];
95 comp_id = IPART[*LIPART1 * (IPARTP[i] - 1) + 3];
117void _FCALL C_H3D_CREATE_BEAMS(
int *ITAB,
int *NUMNOD,
int *IXP,
int *NIXP,
int *NUMELP,
int *IPARTP,
int *IPART,
int *LIPART1,
int *H3D_PART)
120void c_h3d_create_beams__ (
int *ITAB,
int *NUMNOD,
int *IXP,
int *NIXP,
int *NUMELP,
int *IPARTP,
int *IPART,
int *LIPART1,
int *H3D_PART)
123void c_h3d_create_beams (
int *ITAB,
int *NUMNOD,
int *IXP,
int *NIXP,
int *NUMELP,
int *IPARTP,
int *IPART,
int *LIPART1,
int *H3D_PART)
void c_h3d_create_beams_(int *ITAB, int *NUMNOD, int *IXP, int *NIXP, int *NUMELP, int *IPARTP, int *IPART, int *LIPART1, int *H3D_PART)
void c_h3d_create_beams(int *ITAB, int *NUMNOD, int *IXP, int *NIXP, int *NUMELP, int *IPARTP, int *IPART, int *LIPART1, int *H3D_PART)
void _FCALL C_H3D_CREATE_BEAMS(int *ITAB, int *NUMNOD, int *IXP, int *NIXP, int *NUMELP, int *IPARTP, int *IPART, int *LIPART1, int *H3D_PART)
void c_h3d_create_beams__(int *ITAB, int *NUMNOD, int *IXP, int *NIXP, int *NUMELP, int *IPARTP, int *IPART, int *LIPART1, int *H3D_PART)
H3D_ID onedelem_poolname_id
bool Hyper3DAddString(H3DFileInfo *h3d_file, const char *const string, H3D_ID *const str_id)
bool Hyper3DExportClearError(H3DFileInfo *h3d_file)
bool Hyper3DElementWrite(H3DFileInfo *h3d_file, H3D_ID id, H3D_ID *connectivity)
bool Hyper3DElementEnd(H3DFileInfo *h3d_file)
bool Hyper3DElementBegin(H3DFileInfo *h3d_file, unsigned int count, H3D_ID poolname_id, H3D_ElementConfig config, H3D_ID parent_id, H3D_ID parent_poolname_id, H3D_ID node_poolname_id)