dyn_userlib_callback.c File Reference

#include "hardware.inc"
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <math.h>
#include <fcntl.h>
#include <windows.h>
#include <process.h>
#include <io.h>
#include <sys\types.h>
#include <sys/stat.h>

Go to the source code of this file.

Macros
#define	_FCALL

Functions
void	init_callback (void **callback_array)
int	GET_U_NUMTABLE (int *tid)
void	GET_U_TABLE (int *itable, my_real *XX, my_real *YY)
void	GET_U_VTABLE (int *itable, int *nel0, int *ipos, my_real *XX, my_real *YY, my_real *DYDX1)
void	SET_U_SHLPLAS (int *USRNEL, my_real *SIGY, my_real *ETSE)
void	SET_U_SOLPLAS (int *USRNEL, my_real *SIGY, my_real *PLA)
int	GET_U_NUMSENS (int *idsens)
int	GET_U_SENS_ID (int *idsens)
int	SET_U_SENS_VALUE (int *nsens, int *ivar, my_real *var)
int	GET_U_SENS_VALUE (int *nsens, int *ivar, my_real *var)
int	SET_U_SENS_MAXVALUE (int *nsens, int *ivar, my_real *var)
int	GET_U_SENS_FPAR (int *nsens, int *ivar, my_real *var)
int	GET_U_SENS_IPAR (int *nsens, int *ivar, my_real *var)
int	SET_U_SENS_ACTI (int *nsens)
int	GET_U_SENS_ACTI (int *nsens)
my_real	GET_U_SENS (int *usens)
my_real	GET_U_SENS_DELAY (int *usens)
my_real	GET_U_MAT (int *ivar, int *im)
my_real	GET_U_GEO (int *ivar, int *ip)
int	GET_U_PNU (int *ivar, int *ip, int *k)
int	GET_U_MNU (int *ivar, int *ip, int *k)
int	GET_U_PID (int *ip)
int	GET_U_MID (int *im)
int	GET_U_M (int *mid)
int	GET_U_P (int *pid)
int	GET_U_PROC ()
int	GET_U_TASK ()
int	GET_U_FUNC_N (int *ifunc)
my_real	GET_U_FUNC_X (int *ifunc, int *n)
my_real	GET_U_FUNC_Y (int *ifunc, int *n)
my_real	GET_U_FUNC (int *ifunc, my_real *XX, my_real *DERI)
void	GET_V_FUNC (int *ifunc, int *llt, my_real *xx, my_real *dydx, int *jpos)
int	GET_U_NUMFUN (int *idfun)
int	GET_U_FID (int *ifun)
int	GET_U_CYCLE ()
my_real	GET_U_TIME ()
my_real	GET_U_ACCEL (int *nacc, my_real *ax, my_real *ay, my_real *az)
int	GET_U_NUMACC (int *idacc)
int	GET_U_NUMNOD (int *iu)
int	GET_U_NOD_X (int *nod, my_real *x, my_real *y, my_real *z)
int	GET_U_NOD_D (int *nod, my_real *dx, my_real *dy, my_real *dz)
int	GET_U_NOD_V (int *nod, my_real *vx, my_real *vy, my_real *vz)
int	GET_U_NOD_A (int *nod, my_real *ax, my_real *ay, my_real *az)
int	GET_U_SKEW (int *idskw, int *n1, int *n2, int *n3, my_real *vect)
my_real	GET_U_UVAR (int *iel, int *ilayer, int *ivar, int *nuvar)
void	SET_SPRING_ELNUM (int *jft, int *jlt, int *ixr)
int	GET_SPRING_ELNUM (int *iel)
int	SET_U_GEO (int *ivar, my_real *a)
int	SET_U_PNU (int *ivar, int *ip, int *k)
int	RESET_U_GEO (int *ivar, int *ip, my_real *a)
my_real	GET_U_FUNC_DERI (int *ifunc)
int	SET_U_SENS_IPAR (int *ivar, int *var)
int	SET_U_SENS_FPAR (int *ivar, my_real *var)
double	FINTER (int *ifunc, double *XX, int *NPF, double *TF, double *DERI)
void	WRITE_IOUT (char *line, int *len)
void	ARRET (int *mode)
int	SET_U_SENS_DEACTI (int *nsens)
void	GET_TABLE_VALUE (int *itable, my_real *XX, int *xxdim, my_real *YY)
void	GET_VTABLE_VALUE (int *ITABLE, int *NEL0, int *IPOS, my_real *XX, int *XXDIM, my_real *YY, my_real *DYDX1)
void	MAT_SOLID_GET_NOD_X (my_real *USER_X)
void	MAT_SOLID_GET_NOD_V (my_real *USER_V)
void	USERWINDOW_GET_A (double *A_BUF)
void	USERWINDOW_GET_AR (double *AR_BUF)
void	GET_TABLE_VALUE_DYDX (int *ITABLE, double *XX, double *XXDIM, double *YY, double *DXDY)
void	GET_USER_WINDOW_NODES (int *INTERNAL_ID, int *USER_ID)

Macro Definition Documentation

_FCALL

#define _FCALL

Definition at line 50 of file dyn_userlib_callback.c.

Function Documentation

ARRET()

void ARRET ( int * mode )

extern

FINTER()

double FINTER ( int * ifunc, double * XX, int * NPF, double * TF, double * DERI )

extern

GET_SPRING_ELNUM()

int GET_SPRING_ELNUM ( int * iel )

extern

GET_TABLE_VALUE()

void GET_TABLE_VALUE ( int * itable, my_real * XX, int * xxdim, my_real * YY )

extern

GET_TABLE_VALUE_DYDX()

void GET_TABLE_VALUE_DYDX ( int * ITABLE, double * XX, double * XXDIM, double * YY, double * DXDY )

extern

GET_U_ACCEL()

my_real GET_U_ACCEL ( int * nacc, my_real * ax, my_real * ay, my_real * az )

extern

GET_U_CYCLE()

int GET_U_CYCLE ( )

extern

GET_U_FID()

int GET_U_FID ( int * ifun )

extern

GET_U_FUNC()

my_real GET_U_FUNC ( int * ifunc, my_real * XX, my_real * DERI )

extern

GET_U_FUNC_DERI()

my_real GET_U_FUNC_DERI ( int * ifunc )

extern

GET_U_FUNC_N()

int GET_U_FUNC_N ( int * ifunc )

extern

GET_U_FUNC_X()

my_real GET_U_FUNC_X ( int * ifunc, int * n )

extern

GET_U_FUNC_Y()

my_real GET_U_FUNC_Y ( int * ifunc, int * n )

extern

GET_U_GEO()

my_real GET_U_GEO ( int * ivar, int * ip )

extern

GET_U_M()

int GET_U_M ( int * mid )

extern

GET_U_MAT()

my_real GET_U_MAT ( int * ivar, int * im )

extern

GET_U_MID()

int GET_U_MID ( int * im )

extern

GET_U_MNU()

int GET_U_MNU ( int * ivar, int * ip, int * k )

extern

GET_U_NOD_A()

int GET_U_NOD_A ( int * nod, my_real * ax, my_real * ay, my_real * az )

extern

GET_U_NOD_D()

int GET_U_NOD_D ( int * nod, my_real * dx, my_real * dy, my_real * dz )

extern

GET_U_NOD_V()

int GET_U_NOD_V ( int * nod, my_real * vx, my_real * vy, my_real * vz )

extern

GET_U_NOD_X()

int GET_U_NOD_X ( int * nod, my_real * x, my_real * y, my_real * z )

extern

GET_U_NUMACC()

int GET_U_NUMACC ( int * idacc )

extern

GET_U_NUMFUN()

int GET_U_NUMFUN ( int * idfun )

extern

GET_U_NUMNOD()

int GET_U_NUMNOD ( int * iu )

extern

GET_U_NUMSENS()

int GET_U_NUMSENS ( int * idsens )

extern

GET_U_NUMTABLE()

int GET_U_NUMTABLE ( int * tid )

extern

GET_U_P()

int GET_U_P ( int * pid )

extern

GET_U_PID()

int GET_U_PID ( int * ip )

extern

GET_U_PNU()

int GET_U_PNU ( int * ivar, int * ip, int * k )

extern

GET_U_PROC()

int GET_U_PROC ( )

extern

GET_U_SENS()

my_real GET_U_SENS ( int * usens )

extern

GET_U_SENS_ACTI()

int GET_U_SENS_ACTI ( int * nsens )

extern

GET_U_SENS_DELAY()

my_real GET_U_SENS_DELAY ( int * usens )

extern

GET_U_SENS_FPAR()

int GET_U_SENS_FPAR ( int * nsens, int * ivar, my_real * var )

extern

GET_U_SENS_ID()

int GET_U_SENS_ID ( int * idsens )

extern

GET_U_SENS_IPAR()

int GET_U_SENS_IPAR ( int * nsens, int * ivar, my_real * var )

extern

GET_U_SENS_VALUE()

int GET_U_SENS_VALUE ( int * nsens, int * ivar, my_real * var )

extern

GET_U_SKEW()

int GET_U_SKEW ( int * idskw, int * n1, int * n2, int * n3, my_real * vect )

extern

GET_U_TABLE()

void GET_U_TABLE ( int * itable, my_real * XX, my_real * YY )

extern

GET_U_TASK()

int GET_U_TASK ( )

extern

GET_U_TIME()

my_real GET_U_TIME ( )

extern

GET_U_UVAR()

my_real GET_U_UVAR ( int * iel, int * ilayer, int * ivar, int * nuvar )

extern

GET_U_VTABLE()

void GET_U_VTABLE ( int * itable, int * nel0, int * ipos, my_real * XX, my_real * YY, my_real * DYDX1 )

extern

GET_USER_WINDOW_NODES()

void GET_USER_WINDOW_NODES ( int * INTERNAL_ID, int * USER_ID )

extern

GET_V_FUNC()

void GET_V_FUNC ( int * ifunc, int * llt, my_real * xx, my_real * dydx, int * jpos )

extern

GET_VTABLE_VALUE()

void GET_VTABLE_VALUE ( int * ITABLE, int * NEL0, int * IPOS, my_real * XX, int * XXDIM, my_real * YY, my_real * DYDX1 )

extern

init_callback()

void init_callback

(

void **

callback_array

)

Definition at line 128 of file dyn_userlib_callback.c.

                                          {
 
/* initialize all pointers in an Array */
  callback_array[ 0]= FINTER;
  callback_array[ 1]= GET_U_NUMTABLE;
  callback_array[ 2]= GET_U_TABLE;
  callback_array[ 3]= GET_U_VTABLE;
  callback_array[ 4]= SET_U_SHLPLAS;
  callback_array[ 5]= SET_U_SOLPLAS;
  callback_array[ 8]= GET_U_NUMSENS;
  callback_array[ 9]= GET_U_SENS_ID;
  callback_array[10]= SET_U_SENS_VALUE;
  callback_array[11]= GET_U_SENS_VALUE;
  callback_array[12]= SET_U_SENS_MAXVALUE;
  callback_array[13]= GET_U_SENS_FPAR;
  callback_array[14]= GET_U_SENS_IPAR;
  callback_array[15]= SET_U_SENS_ACTI;
  callback_array[16]= GET_U_SENS_ACTI;
  callback_array[17]= GET_U_SENS;
  callback_array[18]= GET_U_SENS_DELAY;
  callback_array[19]= GET_U_MAT;
  callback_array[20]= GET_U_GEO;
  callback_array[21]= GET_U_PNU;
  callback_array[22]= GET_U_MNU;
  callback_array[23]= GET_U_PID;
  callback_array[24]= GET_U_MID;
  callback_array[25]= GET_U_M;
  callback_array[26]= GET_U_P;
  callback_array[27]= GET_U_PROC;
  callback_array[28]= GET_U_TASK;
  callback_array[29]= GET_U_FUNC_N;
  callback_array[30]= GET_U_FUNC_X;
  callback_array[31]= GET_U_FUNC_Y;
  callback_array[32]= GET_U_FUNC;
  callback_array[33]= GET_V_FUNC ;
  callback_array[34]= GET_U_NUMFUN;
  callback_array[35]= GET_U_FID;
  callback_array[36]= GET_U_CYCLE;
  callback_array[37]= GET_U_TIME;
  callback_array[38]= GET_U_ACCEL;
  callback_array[39]= GET_U_NUMACC;
  callback_array[40]= GET_U_NUMNOD;
  callback_array[41]= GET_U_NOD_X;
  callback_array[42]= GET_U_NOD_D;
  callback_array[43]= GET_U_NOD_V ;
  callback_array[44]= GET_U_NOD_A ;
  callback_array[45]= GET_U_SKEW;
  callback_array[46]= GET_U_UVAR;
  callback_array[47]= SET_SPRING_ELNUM;
  callback_array[48]= GET_SPRING_ELNUM ;
/*  callback_array[49]= SET_U_GEO; STARTER ROUTINE*/
/*  callback_array[50]= SET_U_PNU; STARTER ROUTINE*/
/*  callback_array[51]= RESET_U_GEO; STARTER ROUTINE*/
/*  callback_array[52]= GET_U_FUNC_DERI; STARTER ROUTINE*/
/*  callback_array[53]= SET_U_SENS_IPAR; STARTER ROUTINE*/
/*  callback_array[54]= SET_U_SENS_FPAR; STARTER ROUTINE*/
  callback_array[55]= WRITE_IOUT;
/*callback_array[56]= SET_DD_MAT_WEIGHT; */
/*callback_array[57]=UELT_SPMD_ADDITIONZL_NODE*/
  callback_array[58] = ARRET;
  callback_array[59] = SET_U_SENS_DEACTI;
  callback_array[60] = GET_TABLE_VALUE;
  callback_array[61] = GET_VTABLE_VALUE;
  callback_array[62] = MAT_SOLID_GET_NOD_X;
  callback_array[63] = MAT_SOLID_GET_NOD_V;
  callback_array[64] = USERWINDOW_GET_A;
  callback_array[65] = USERWINDOW_GET_AR;
//  callback_array[66] = RAD_UMAT_INPUT_OPEN;       STARTER ROUTINE
//  callback_array[67] = RAD_UMAT_INPUT_READ;       STARTER ROUTINE
//  callback_array[68] = RAD_UMAT_INPUT_REWIND;     STARTER ROUTINE
//  callback_array[69] = RAD_UMAT_CLOSE_INPUT;      STARTER ROUTINE
  callback_array[71] = GET_TABLE_VALUE_DYDX;
//  callback_array[72] = SET_USER_WINDOW_NODES;     STARTER ROUTINE
  callback_array[73] = GET_USER_WINDOW_NODES;
}

MAT_SOLID_GET_NOD_V()

void MAT_SOLID_GET_NOD_V ( my_real * USER_V )

extern

MAT_SOLID_GET_NOD_X()

void MAT_SOLID_GET_NOD_X ( my_real * USER_X )

extern

RESET_U_GEO()

int RESET_U_GEO ( int * ivar, int * ip, my_real * a )

extern

SET_SPRING_ELNUM()

void SET_SPRING_ELNUM ( int * jft, int * jlt, int * ixr )

extern

SET_U_GEO()

int SET_U_GEO ( int * ivar, my_real * a )

extern

SET_U_PNU()

int SET_U_PNU ( int * ivar, int * ip, int * k )

extern

SET_U_SENS_ACTI()

int SET_U_SENS_ACTI ( int * nsens )

extern

SET_U_SENS_DEACTI()

int SET_U_SENS_DEACTI ( int * nsens )

extern

SET_U_SENS_FPAR()

int SET_U_SENS_FPAR ( int * ivar, my_real * var )

extern

SET_U_SENS_IPAR()

int SET_U_SENS_IPAR ( int * ivar, int * var )

extern

SET_U_SENS_MAXVALUE()

int SET_U_SENS_MAXVALUE ( int * nsens, int * ivar, my_real * var )

extern

SET_U_SENS_VALUE()

int SET_U_SENS_VALUE ( int * nsens, int * ivar, my_real * var )

extern

SET_U_SHLPLAS()

void SET_U_SHLPLAS ( int * USRNEL, my_real * SIGY, my_real * ETSE )

extern

SET_U_SOLPLAS()

void SET_U_SOLPLAS ( int * USRNEL, my_real * SIGY, my_real * PLA )

extern

USERWINDOW_GET_A()

void USERWINDOW_GET_A ( double * A_BUF )

extern

USERWINDOW_GET_AR()

void USERWINDOW_GET_AR ( double * AR_BUF )

extern

WRITE_IOUT()

void WRITE_IOUT ( char * line, int * len )

extern