Tauola_wrapper.h

00001 #ifndef _TAUOLA_WRAPPER_
00002 #define _TAUOLA_WRAPPER_
00003 /** 
00004   Wrapper for tauola routines calculating tau polarimetric vector HH.
00005   Note that order of input 4-vectors matters and must be prepared
00006   accordingly to choice in FORTRAN version of TAUOLA.
00007   For details see documentation of old TAUOLA fortran.
00008 
00009   Methods available for some decay modes only.
00010 */
00011 
00012 #include "Tauola/f_Variables.h"
00013 
00014 namespace TauSpinner {
00015 
00016 extern "C" {
00017 
00018   void dam4pi_(int *MNUM, float *PT, float *PN, float *PIM1, float *PIM2, float *PIZ, float *PIPL,
00019                float *AMPLIT, float *HH);
00020 
00021   void damppk_(int *MNUM, float *PT, float *PN, float *PIM1, float *PIM2, float *PIPL,
00022                float *AMPLIT, float *HH);
00023 
00024   void dampry_(int *ITDKRC, double *XK0DEC, double *XK, double *XA, double *QP, double *XN,
00025                double *AMPLIT, double *HV);
00026 
00027   void initwk_(int *IDE, int *IDF, double *SVAR);
00028 
00029   double t_born_(int *MODE, double *SVAR, double *COSTHE, double *TA, double *TB);
00030 
00031 }
00032 
00033 } // namespace TauSpinner
00034 #endif