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

#ifndef __ICATHR__
#define __ICATHR__

#include "types.h"

#ifdef __cplusplus
	extern "C" {
#endif

//
//=== Icathr ===========================================================*
//
//----------------------------------------------------------------------*
//                                                                      *
//     Copyright (C) 2003-2019:  CERN & INFN                            *
//     All Rights Reserved.                                             *
//                                                                      *
//     ICArus THResholds and miscellaneous:                             *
//                                                                      *
//     Created on 1 February 1996   by    Alfredo Ferrari & Paola Sala  *
//                                                   Infn - Milan       *
//                                                                      *
//          Dvicwp(i) = drift velocity for the i_th wire plane          *
//          Mricwp(i) = region into which the i_th wire plane must be   *
//                      "confined"                                      *
//          Kficwp(i) = extra flag for the i_th wire plane              *
//             Licvxp = logical flag for printing verteces in the "old" *
//                      way                                             *
//             Licvxm = logical flag for allocating memory for verteces *
//             Licvxp = logical flag for printing tracks                *
//             Lictkm = logical flag for allocating memory for tracks   *
//             Licpmt = logical flag for PMT's output                   *
//             Nicpmt = number of PMT's regions                         *
//          Mricpm(i) = region corresponding to the i_th PMT            *
//                                                                      *
//----------------------------------------------------------------------*
//
//  Drift velocity: 1.5 mm / us
//  Drift axis = +y (drift is along +y)
const double VDRIFT = 0.15E+06;
//  Maximum number of Icarus wire planes:
const int    KDRIFT = 2;
//  Maximum number of Icarus PMT's:
const int    MXICWP = 48;
//
const int    MXICPM = 80;
extern struct {
	double	deltth;
	double	bremth;
	double	entrth;
	double	dvicwp[MXICWP];
	int	nusica;
	int	mtwire;
	int	lunzbi;
	int	lunzbo;
	logical	licvxp;
	logical	licvxm;
	logical	lictkp;
	logical	lictkm;
	logical	lzbrou;
	logical	ljtinp;
	logical	licpmt;
	logical	lnoecl;
	int	nicpmt;
	int	mnoefa;
	int	mnoefb;
	int	mnoefm;
	int	mricwp[MXICWP];
	int	kficwp[MXICWP];
	int	mricpm[MXICPM];
	int	icrrun;
} icathr_;


#ifdef __cplusplus
}
#endif
#endif