/*
 * DO NOT MANUALLY UPDATE THIS FILE.
 * If needed: make cpp_headers
 *
 * fortran2c.py - automatic conversion
 *       mttbjk.inc -> mttbjk.h
 */

#ifndef __MTTBJK__
#define __MTTBJK__

#include "types.h"

#ifdef __cplusplus
	extern "C" {
#endif

//
//=== Mttbjk ===========================================================*
//
//----------------------------------------------------------------------*
//                                                                      *
//     Copyright (C) 2003-2019:  CERN & INFN                            *
//     All Rights Reserved.                                             *
//                                                                      *
//     Created on 20 September 2010 by  Alfredo Ferrari & Alberto Fasso`*
//                                           CERN - EN,       JLAB      *
//                                                                      *
//----------------------------------------------------------------------*
//
const double BETBJK = 0.7181287E+00;
const double BTMTMX = 0.997E+00;
const int    NMTTMX = 40;
//
const double DMTTMX = BTMTMX/40.E+00;

extern struct {
	double	bjkmtt[100][6][4+1];
	double	cmttmx[100][40];
	double	rnrmtt[100][40][4];
	double	acfbjk[4+1];
	double	bmnbjk[100];
	double	sqrtt1;
	double	sqrtt0;
	double	alt1t0;
} mttbjk_;
const int mttbjk_bjkmtt_base = 0;
const int mttbjk_acfbjk_base = 0;

#ifdef __cplusplus
}
#endif
#endif