kinematic.h

/* kinematic.h */

#ifndef __kinematic_h
#define __kinematic_h

#ifdef __cplusplus
extern "C" {
#endif /* __cplusplus */

  void Fortran(tmell)(double*, double*, double*, int*, int*, int*,
              double*, double*, double*, int*, double*, int*,
              double*, double*, int*, int*, double*);

  void Fortran(gradtu)(double*, double*, double*, int*, int*, int*,
               double*, double*, double*, int*, 
               double*, double*, double*);

  void Fortran(lineapprox)(double*,double*,double*,double*,
               double*,double*,double*,int*,int*,int*);


  void  Fortran(findfb) (int* n, const float trace[],
             float *dt, float* nl, float* sk,
             float* Tglmx, float* Tfbmx, float* Tsl, float* Tfb,
             float* Tzero, float* Afbmx, float* Aglmx);


#ifdef __cplusplus
};
#endif /* __cplusplus */

#endif /* kinematic.h */