damp.h

Go to the documentation of this file.

/*
%M This header file contains the damping class definition.
%a Joao Luiz Elias Campos.
%d September 16th, 2000.
%r $Id: damp.h,v 1.1 2004/06/22 05:29:58 joaoluiz Exp $
%w (C) COPYRIGHT 2000, Joao Luiz Elias Campos.
   All Rights Reserved
   Duplication of this program or any part thereof without the express
   written consent of the author is prohibited.
*/

#ifndef _DAMP_H
#define _DAMP_H

typedef enum _damptype
{
 AUTO_GLOBAL,
 AUTO_LOCAL,
 RAYLEIGH,
 NumDampTypes
} eDampType;

typedef struct _damp
{
 eDampType  type;
 void      *data;
} sDamp;

typedef struct _dampclass
{
 void (*init)( void );
 void (*new) ( sDamp ** );
 void (*free)( sDamp * );
 void (*read)( sDamp * );
 void (*calc)( sDamp *, int, double, double *, double *, double *, double * );
} sDampClass;

extern sDampClass DampClass[NumDampTypes];

extern sDamp *DampObj;


/*
** ------------------------------------------------------------------------
** Macro definitions:
*/

#define DampInit(type)                          \
        if(DampClass[type].init != 0L)          \
         (*DampClass[type].init)( )

#define DampNew(type,o)                 \
        if(DampClass[type].new != 0L)           \
         (*DampClass[type].new)( o )

#define DampFree(o)                             \
        if(DampClass[o->type].free != 0L)       \
         (*DampClass[o->type].free)( o )

#define DampRead(o)                             \
        if(DampClass[o->type].read != 0L)       \
         (*DampClass[o->type].read)( o )

#define DampCalcCoeff(o,i,t,m,v,a,e)            \
        if(DampClass[o->type].calc != 0L)       \
         (*DampClass[o->type].calc)( o, i, t, m, v, a, e )

/* Public functions
 */
void DampingInit( void );
void DampingFree( void );

#endif

---