c_h3d_create_nodal_tensor_datatype.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_create_nodal_tensor_datatype_ (int *cpt_data, char *name, int *size, int *info1, int *info2, char *name1, int *size1, char *comment, int *s_comment)
void _FCALL	C_H3D_CREATE_NODAL_TENSOR_DATATYPE (int *cpt_data, char *name, int *size, int *info1, int *info2, char *name1, int *size1, char *comment, int *s_comment)
void	c_h3d_create_nodal_tensor_datatype__ (int *cpt_data, char *name, int *size, int *info1, int *info2, char *name1, int *size1, char *comment, int *s_comment)
void	c_create_nodal_tensor_datatype (int *cpt_data, char *name, int *size, int *info1, int *info2, char *name1, int *size1, char *comment, int *s_comment)

Macro Definition Documentation

_FCALL [1/2]

#define _FCALL

Definition at line 50 of file c_h3d_create_nodal_tensor_datatype.cpp.

_FCALL [2/2]

#define _FCALL

Definition at line 50 of file c_h3d_create_nodal_tensor_datatype.cpp.

Function Documentation

c_create_nodal_tensor_datatype()

void c_create_nodal_tensor_datatype	(	int *	cpt_data,
		char *	name,
		int *	size,
		int *	info1,
		int *	info2,
		char *	name1,
		int *	size1,
		char *	comment,
		int *	s_comment )

Definition at line 174 of file c_h3d_create_nodal_tensor_datatype.cpp.

{c_h3d_create_nodal_tensor_datatype_ (cpt_data, name, size, info1, info2, name1, size1, comment, s_comment);}

C_H3D_CREATE_NODAL_TENSOR_DATATYPE()

void _FCALL C_H3D_CREATE_NODAL_TENSOR_DATATYPE	(	int *	cpt_data,
		char *	name,
		int *	size,
		int *	info1,
		int *	info2,
		char *	name1,
		int *	size1,
		char *	comment,
		int *	s_comment )

Definition at line 166 of file c_h3d_create_nodal_tensor_datatype.cpp.

{c_h3d_create_nodal_tensor_datatype_ (cpt_data, name, size, info1, info2, name1, size1, comment, s_comment);}

c_h3d_create_nodal_tensor_datatype_()

void c_h3d_create_nodal_tensor_datatype_	(	int *	cpt_data,
		char *	name,
		int *	size,
		int *	info1,
		int *	info2,
		char *	name1,
		int *	size1,
		char *	comment,
		int *	s_comment )

Definition at line 71 of file c_h3d_create_nodal_tensor_datatype.cpp.

{
    char *cname,*cname1,*ccomment;
    int cname_len,cname_len1,ccomment_len;
    int i;
    float node[3]; 
    H3D_ID node_id;
    unsigned int elem_count = 1;
//
    cname_len = *size + 1;
    cname=(char*) malloc(sizeof(char)*cname_len);
    for(i=0;i<*size;i++)  cname[i] = name[i];
    cname[*size]='\0'; 
    
    if (strncmp(cname,"Grid Point Stress",17)==0) tensor_type = H3D_DS_STRESS;
    if (strncmp(cname,"Grid Point Strain",17)==0) tensor_type = H3D_DS_STRAIN;
 
    cname_len1 = *size1 + 1;
    cname1=(char*) malloc(sizeof(char)*cname_len1);
    for(i=0;i<*size1;i++)  cname1[i] = name1[i];
    cname1[*size1]='\0'; 
 
    ccomment_len = *s_comment + 1;
    ccomment=(char*) malloc(sizeof(char)*ccomment_len);
    for(i=0;i<*s_comment;i++)  ccomment[i] = comment[i];
    ccomment[*s_comment]='\0'; 
 
    char * LAYERPOOL = new char [*size1+11];
    H3D_ID layer_pool_id = H3D_NULL_ID;
    if(*info2 != 0)
    {
        sprintf(LAYERPOOL, "%s %d %d" ,cname1,*info1,*info2);
        rc = Hyper3DAddString(h3d_file, LAYERPOOL, &layer_pool_id);
    }
    else
    {
        sprintf(LAYERPOOL, "%s %d" ,cname1,*info1);
        rc = Hyper3DAddString(h3d_file, LAYERPOOL, &layer_pool_id);
    }
 
 
    char edata_type[50];
 
    try {
        // create result data types
        dt_count++;
 
        rc = Hyper3DDatatypeBegin(h3d_file, 1);
        if( !rc ) throw rc;
 
        pool_count = 2;
 
        dt_id++; 
        sprintf(edata_type, cname, H3D_DT_DELIMITER); 
        rc = Hyper3DDatatypeWrite(h3d_file, edata_type, *cpt_data , H3D_DS_TENSOR3D, 
                                    H3D_DS_NODE, pool_count);
        if( !rc ) throw rc;
 
        rc = Hyper3DDatatypeDescriptionWrite(h3d_file, *cpt_data, ccomment);
        if( !rc ) throw rc;
 
        if(*info1 != 0 && *cpt_data != 0)
        {
            rc = Hyper3DDatatypePools(h3d_file, *cpt_data , node_poolname_id, 1, 
                                    &layer_pool_id, has_corners, tensor_type, poisson);
            if( !rc ) throw rc;
 
        }
        else if (*cpt_data != 0)
        {
            rc = Hyper3DDatatypePools(h3d_file, *cpt_data , node_poolname_id, 0, 
                                    layername_ids, has_corners, tensor_type, poisson);
            if( !rc ) throw rc;
 
        }
 
        rc = Hyper3DDatatypeEnd(h3d_file);
        if( !rc ) throw rc;
 
    } // end of try
 
    catch(...) {
        Hyper3DExportClearError(h3d_file);
    }
    delete [] LAYERPOOL;
    free(cname);
    free(cname1);
    free(ccomment);
 
}

c_h3d_create_nodal_tensor_datatype__()

void c_h3d_create_nodal_tensor_datatype__	(	int *	cpt_data,
		char *	name,
		int *	size,
		int *	info1,
		int *	info2,
		char *	name1,
		int *	size1,
		char *	comment,
		int *	s_comment )

Definition at line 170 of file c_h3d_create_nodal_tensor_datatype.cpp.

{c_h3d_create_nodal_tensor_datatype_ (cpt_data, name, size, info1, info2, name1, size1, comment, s_comment);}