Main Page Namespace List Class Hierarchy Alphabetical List Compound List File List Namespace Members Compound Members File Members

fortran_def.h File Reference

#include <cfortran.h>

Include dependency graph for fortran_def.h:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Defines

#define QELEP_ALPHA(A1)   CCALLSFSUB1(QELEP_ALPHA,qelep_alpha,PFLOAT,A1)

#define BANK_ALPHA(A1, A2, A3, A4, A5)   CCALLSFSUB5(BANK_ALPHA,bank_alpha,STRING,PINT,PINT,PINT,PINT,A1,A2,A3,A4,A5)

#define BANK_ROW(A1, A2, A3, A4, A5)   CCALLSFSUB5(BANK_ROW,bank_row,PSTRING,PINT,PINT,PINT,PINT,A1,A2,A3,A4,A5)

#define ALPHA_PARAM(A1)   CCALLSFSUB1(ALPHA_PARAM,alpha_param,PINT,A1)

#define GETKEFOTY(A1, A2)   CCALLSFSUB2(GETKEFOTY,getkefoty,PINT,PINT,A1,A2)

#define GETKEFOLT(A1, A2)   CCALLSFSUB2(GETKEFOLT,getkefolt,PINT,PINT,A1,A2)

#define CHECK_BOS(A1)   CCALLSFSUB1(CHECK_BOS,check_bos,PINT,A1)

#define ABRUEV(A1, A2)   CCALLSFSUB2(ABRUEV,abruev,PINT,PINT,A1,A2)

#define QMEVNT(A1, A2)   CCALLSFSUB2(QMEVNT,qmevnt,PINT,PINT,A1,A2)

#define QMRDSB(A1)   CCALLSFSUB1(QMRDSB,qmrdsb,PINT,A1)

#define ABRSEL(A1, A2, A3)   CCALLSFSUB3(ABRSEL,abrsel,PSTRING,PSTRING,PINT,A1,A2,A3)

#define ABRSEL_GB(A1, A2, A3)   CCALLSFSUB3(ABRSEL_GB,abrsel_gb,PSTRING,PSTRING,PINT,A1,A2,A3)

#define QMREAD()   CCALLSFSUB0(QMREAD,qmread)

#define CALPHA(A1, A2)   CCALLSFSUB2(CALPHA,calpha,PSTRING,PSTRING,A1,A2)

#define AUNPCK(A1, A2, A3)   CCALLSFSUB3(AUNPCK,aunpck,PSTRING,PSTRING,PINT,A1,A2,A3)

#define READ_EVENT2(A1, A2, A3)   CCALLSFSUB3(READ_EVENT2,read_event2,PINT,PINT,PINT,A1,A2,A3)

#define SET_RUNEV(A1, A2)   CCALLSFSUB2(SET_RUNEV,set_runev,PINT,PINT,A1,A2)

#define CLEAN_BOS(A1)   CCALLSFSUB1(CLEAN_BOS,clean_bos,STRING,A1)

#define CLOSE_RUN()   CCALLSFSUB0(CLOSE_RUN,close_run)

#define TIMED(A1)   CCALLSFSUB1(TIMED,timed,PINT,A1)

#define NAMIND(A1)   CCALLSFFUN1(NAMIND,namind,PSTRING,A1)

#define F_QIPBTAG(A1, A2, A3, A4, A5, A6, A7, A8, A9, A10, A11, A12, A13, A14)   CCALLSFSUB14(F_QIPBTAG,f_qipbtag,PINT,PINT,PINT,FLOATV,FLOATV,FLOATV,FLOATV,INTV,FLOATV,INTV,INTV,FLOATV,FLOATV,PFLOAT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14)

#define NMAX   10

#define NMFRF   50

#define NMVFRF   150

#define FCB   COMMON_BLOCK(FCB,fcb)

#define W_YFMVTR()   CCALLSFFUN0(W_YFMVTR,w_yfmvtr)

#define VFMCB   COMMON_BLOCK(VFMCB,vfmcb)

#define W_YFMVTC()   CCALLSFFUN0(W_YFMVTC,w_yfmvtc)

#define W_YTPAR(A1, A2, A3, A4, A5, A6, A7, A8, A9)   CCALLSFSUB9(W_YTPAR,w_ytpar,PINT,FLOATV,FLOATV,FLOATV,FLOATV,FLOATV,FLOATV,FLOATV,PINT,A1,A2,A3,A4,A5,A6,A7,A8,A9)

#define F_ABCFIT(A1, A2, A3, A4, A5, A6, A7, A8, A9, A10, A11, A12, A13, A14, A15, A16, A17, A18, A19)   CCALLSFSUB19(F_ABCFIT,f_abcfit,INT,INT,FLOATV,FLOATV,FLOATV,FLOATV,INT,FLOATV,FLOATV,FLOATV,INTV,INT,FLOATV,FLOATV,FLOATV,FLOATV,PFLOAT,PINT,PINT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16,A17,A18,A19)

Functions

PROTOCCALLSFSUB1 (QELEP_ALPHA, qelep_alpha, PFLOAT)#define QELEP_ALPHA(A1) PROTOCCALLSFSUB5(BANK_ALPHA, bank_alpha, STRING, PINT, PINT, PINT, PINT)#define BANK_ALPHA(A1, A2, A3, A4, A5) PROTOCCALLSFSUB5(BANK_ROW, bank_row, PSTRING, PINT, PINT, PINT, PINT)#define BANK_ROW(A1, A2, A3, A4, A5) PROTOCCALLSFSUB1(ALPHA_PARAM, alpha_param, PINT)#define ALPHA_PARAM(A1) PROTOCCALLSFSUB2(GETKEFOTY, getkefoty, PINT, PINT)#define GETKEFOTY(A1, A2) PROTOCCALLSFSUB2(GETKEFOLT, getkefolt, PINT, PINT)#define GETKEFOLT(A1, A2) PROTOCCALLSFSUB1(CHECK_BOS, check_bos, PINT)#define CHECK_BOS(A1) PROTOCCALLSFSUB2(ABRUEV, abruev, PINT, PINT)#define ABRUEV(A1, A2) PROTOCCALLSFSUB2(QMEVNT, qmevnt, PINT, PINT)#define QMEVNT(A1, A2) PROTOCCALLSFSUB1(QMRDSB, qmrdsb, PINT)#define QMRDSB(A1) PROTOCCALLSFSUB3(ABRSEL, abrsel, PSTRING, PSTRING, PINT)#define ABRSEL(A1, A2, A3) PROTOCCALLSFSUB3(ABRSEL_GB, abrsel_gb, PSTRING, PSTRING, PINT)#define ABRSEL_GB(A1, A2, A3) PROTOCCALLSFSUB0(QMREAD, qmread)#define QMREAD() PROTOCCALLSFSUB2(CALPHA, calpha, PSTRING, PSTRING)#define CALPHA(A1, A2) PROTOCCALLSFSUB3(AUNPCK, aunpck, PSTRING, PSTRING, PINT)#define AUNPCK(A1, A2, A3) PROTOCCALLSFSUB3(READ_EVENT2, read_event2, PINT, PINT, PINT)#define READ_EVENT2(A1, A2, A3) PROTOCCALLSFSUB2(SET_RUNEV, set_runev, PINT, PINT)#define SET_RUNEV(A1, A2) PROTOCCALLSFSUB1(CLEAN_BOS, clean_bos, STRING)#define CLEAN_BOS(A1) PROTOCCALLSFSUB0(CLOSE_RUN, close_run)#define CLOSE_RUN() PROTOCCALLSFSUB1(TIMED, timed, PINT)#define TIMED(A1) PROTOCCALLSFFUN1(INT, NAMIND, namind, PSTRING)#define NAMIND(A1) PROTOCCALLSFSUB14(F_QIPBTAG, f_qipbtag, PINT, PINT, PINT, FLOATV, FLOATV, FLOATV, FLOATV, INTV, FLOATV, INTV, INTV, FLOATV, FLOATV, PFLOAT)#define F_QIPBTAG(A1, A2, A3, A4, A5, A6, A7, A8, A9, A10, A11, A12, A13, A14)#define NMAX#define NMFRF#define NMVFRF typedef struct

COMMON_BLOCK_DEF (FCB_DEF, FCB)

PROTOCCALLSFFUN0 (INT, W_YFMVTR, w_yfmvtr)#define W_YFMVTR() typedef struct

COMMON_BLOCK_DEF (VFMCB_DEF, VFMCB)

Variables

FCB_DEF

VFMCB_DEF

Define Documentation

#define ABRSEL( A1, A2, A3 ) CCALLSFSUB3(ABRSEL,abrsel,PSTRING,PSTRING,PINT,A1,A2,A3)

#define ABRSEL_GB( A1, A2, A3 ) CCALLSFSUB3(ABRSEL_GB,abrsel_gb,PSTRING,PSTRING,PINT,A1,A2,A3)

#define ABRUEV( A1, A2 ) CCALLSFSUB2(ABRUEV,abruev,PINT,PINT,A1,A2)

#define ALPHA_PARAM( A1 ) CCALLSFSUB1(ALPHA_PARAM,alpha_param,PINT,A1)

Referenced by AlphaBanks::LoadFromBos().

#define AUNPCK( A1, A2, A3 ) CCALLSFSUB3(AUNPCK,aunpck,PSTRING,PSTRING,PINT,A1,A2,A3)

#define BANK_ALPHA( A1, A2, A3, A4, A5 ) CCALLSFSUB5(BANK_ALPHA,bank_alpha,STRING,PINT,PINT,PINT,PINT,A1,A2,A3,A4,A5)

Referenced by BaseAddress(), ClassImp(), AlphaBanks::LoadFromBos(), Ncols(), and Nrows().

#define BANK_ROW( A1, A2, A3, A4, A5 ) CCALLSFSUB5(BANK_ROW,bank_row,PSTRING,PINT,PINT,PINT,PINT,A1,A2,A3,A4,A5)

#define CALPHA( A1, A2 ) CCALLSFSUB2(CALPHA,calpha,PSTRING,PSTRING,A1,A2)

#define CHECK_BOS( A1 ) CCALLSFSUB1(CHECK_BOS,check_bos,PINT,A1)

#define CLEAN_BOS( A1 ) CCALLSFSUB1(CLEAN_BOS,clean_bos,STRING,A1)

#define CLOSE_RUN( ) CCALLSFSUB0(CLOSE_RUN,close_run)

Referenced by AlephEpioExManager::terminate().

#define FCB COMMON_BLOCK(FCB,fcb)

Definition at line 106 of file fortran_def.h.

#define F_ABCFIT( A1, A2, A3, A4, A5, A6, A7, A8, A9, A10, A11, A12, A13, A14, A15, A16, A17, A18, A19 ) CCALLSFSUB19(F_ABCFIT,f_abcfit,INT,INT,FLOATV,FLOATV,FLOATV,FLOATV,INT,FLOATV,FLOATV,FLOATV,INTV,INT,FLOATV,FLOATV,FLOATV,FLOATV,PFLOAT,PINT,PINT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16,A17,A18,A19)

#define F_QIPBTAG( A1, A2, A3, A4, A5, A6, A7, A8, A9, A10, A11, A12, A13, A14 ) CCALLSFSUB14(F_QIPBTAG,f_qipbtag,PINT,PINT,PINT,FLOATV,FLOATV,FLOATV,FLOATV,INTV,FLOATV,INTV,INTV,FLOATV,FLOATV,PFLOAT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14)

Referenced by AlToolBox::TagBjets().

#define GETKEFOLT( A1, A2 ) CCALLSFSUB2(GETKEFOLT,getkefolt,PINT,PINT,A1,A2)

#define GETKEFOTY( A1, A2 ) CCALLSFSUB2(GETKEFOTY,getkefoty,PINT,PINT,A1,A2)

#define NAMIND( A1 ) CCALLSFFUN1(NAMIND,namind,PSTRING,A1)

#define NMAX 10

#define NMFRF 50

#define NMVFRF 150

#define QELEP_ALPHA( A1 ) CCALLSFSUB1(QELEP_ALPHA,qelep_alpha,PFLOAT,A1)

Referenced by AlphaBanks::LoadFromBos().

#define QMEVNT( A1, A2 ) CCALLSFSUB2(QMEVNT,qmevnt,PINT,PINT,A1,A2)

#define QMRDSB( A1 ) CCALLSFSUB1(QMRDSB,qmrdsb,PINT,A1)

#define QMREAD( ) CCALLSFSUB0(QMREAD,qmread)

#define READ_EVENT2( A1, A2, A3 ) CCALLSFSUB3(READ_EVENT2,read_event2,PINT,PINT,PINT,A1,A2,A3)

#define SET_RUNEV( A1, A2 ) CCALLSFSUB2(SET_RUNEV,set_runev,PINT,PINT,A1,A2)

#define TIMED( A1 ) CCALLSFSUB1(TIMED,timed,PINT,A1)

#define VFMCB COMMON_BLOCK(VFMCB,vfmcb)

Definition at line 137 of file fortran_def.h.

#define W_YFMVTC( ) CCALLSFFUN0(W_YFMVTC,w_yfmvtc)

Referenced by w_YFMVTC::getResult().

#define W_YFMVTR( ) CCALLSFFUN0(W_YFMVTR,w_yfmvtr)

Referenced by w_YFMVTR::getResult().

#define W_YTPAR( A1, A2, A3, A4, A5, A6, A7, A8, A9 ) CCALLSFSUB9(W_YTPAR,w_ytpar,PINT,FLOATV,FLOATV,FLOATV,FLOATV,FLOATV,FLOATV,FLOATV,PINT,A1,A2,A3,A4,A5,A6,A7,A8,A9)

Referenced by Helix::w_YTPAR().

Function Documentation

COMMON_BLOCK_DEF ( VFMCB_DEF,

VFMCB )

COMMON_BLOCK_DEF ( FCB_DEF,

FCB )

PROTOCCALLSFFUN0 ( INT,

W_YFMVTR,

w_yfmvtr )

Definition at line 109 of file fortran_def.h.

PROTOCCALLSFSUB1 ( QELEP_ALPHA,

qelep_alpha,

PFLOAT )

Definition at line 16 of file fortran_def.h.

Variable Documentation

FCB_DEF

Definition at line 105 of file fortran_def.h.

VFMCB_DEF

Definition at line 136 of file fortran_def.h.

Generated at Wed Jun 18 17:20:34 2003 for ALPHA++ by

Defines
#define	QELEP_ALPHA(A1) CCALLSFSUB1(QELEP_ALPHA,qelep_alpha,PFLOAT,A1)
#define	BANK_ALPHA(A1, A2, A3, A4, A5) CCALLSFSUB5(BANK_ALPHA,bank_alpha,STRING,PINT,PINT,PINT,PINT,A1,A2,A3,A4,A5)
#define	BANK_ROW(A1, A2, A3, A4, A5) CCALLSFSUB5(BANK_ROW,bank_row,PSTRING,PINT,PINT,PINT,PINT,A1,A2,A3,A4,A5)
#define	ALPHA_PARAM(A1) CCALLSFSUB1(ALPHA_PARAM,alpha_param,PINT,A1)
#define	GETKEFOTY(A1, A2) CCALLSFSUB2(GETKEFOTY,getkefoty,PINT,PINT,A1,A2)
#define	GETKEFOLT(A1, A2) CCALLSFSUB2(GETKEFOLT,getkefolt,PINT,PINT,A1,A2)
#define	CHECK_BOS(A1) CCALLSFSUB1(CHECK_BOS,check_bos,PINT,A1)
#define	ABRUEV(A1, A2) CCALLSFSUB2(ABRUEV,abruev,PINT,PINT,A1,A2)
#define	QMEVNT(A1, A2) CCALLSFSUB2(QMEVNT,qmevnt,PINT,PINT,A1,A2)
#define	QMRDSB(A1) CCALLSFSUB1(QMRDSB,qmrdsb,PINT,A1)
#define	ABRSEL(A1, A2, A3) CCALLSFSUB3(ABRSEL,abrsel,PSTRING,PSTRING,PINT,A1,A2,A3)
#define	ABRSEL_GB(A1, A2, A3) CCALLSFSUB3(ABRSEL_GB,abrsel_gb,PSTRING,PSTRING,PINT,A1,A2,A3)
#define	QMREAD() CCALLSFSUB0(QMREAD,qmread)
#define	CALPHA(A1, A2) CCALLSFSUB2(CALPHA,calpha,PSTRING,PSTRING,A1,A2)
#define	AUNPCK(A1, A2, A3) CCALLSFSUB3(AUNPCK,aunpck,PSTRING,PSTRING,PINT,A1,A2,A3)
#define	READ_EVENT2(A1, A2, A3) CCALLSFSUB3(READ_EVENT2,read_event2,PINT,PINT,PINT,A1,A2,A3)
#define	SET_RUNEV(A1, A2) CCALLSFSUB2(SET_RUNEV,set_runev,PINT,PINT,A1,A2)
#define	CLEAN_BOS(A1) CCALLSFSUB1(CLEAN_BOS,clean_bos,STRING,A1)
#define	CLOSE_RUN() CCALLSFSUB0(CLOSE_RUN,close_run)
#define	TIMED(A1) CCALLSFSUB1(TIMED,timed,PINT,A1)
#define	NAMIND(A1) CCALLSFFUN1(NAMIND,namind,PSTRING,A1)
#define	F_QIPBTAG(A1, A2, A3, A4, A5, A6, A7, A8, A9, A10, A11, A12, A13, A14) CCALLSFSUB14(F_QIPBTAG,f_qipbtag,PINT,PINT,PINT,FLOATV,FLOATV,FLOATV,FLOATV,INTV,FLOATV,INTV,INTV,FLOATV,FLOATV,PFLOAT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14)
#define	NMAX 10
#define	NMFRF 50
#define	NMVFRF 150
#define	FCB COMMON_BLOCK(FCB,fcb)
#define	W_YFMVTR() CCALLSFFUN0(W_YFMVTR,w_yfmvtr)
#define	VFMCB COMMON_BLOCK(VFMCB,vfmcb)
#define	W_YFMVTC() CCALLSFFUN0(W_YFMVTC,w_yfmvtc)
#define	W_YTPAR(A1, A2, A3, A4, A5, A6, A7, A8, A9) CCALLSFSUB9(W_YTPAR,w_ytpar,PINT,FLOATV,FLOATV,FLOATV,FLOATV,FLOATV,FLOATV,FLOATV,PINT,A1,A2,A3,A4,A5,A6,A7,A8,A9)
#define	F_ABCFIT(A1, A2, A3, A4, A5, A6, A7, A8, A9, A10, A11, A12, A13, A14, A15, A16, A17, A18, A19) CCALLSFSUB19(F_ABCFIT,f_abcfit,INT,INT,FLOATV,FLOATV,FLOATV,FLOATV,INT,FLOATV,FLOATV,FLOATV,INTV,INT,FLOATV,FLOATV,FLOATV,FLOATV,PFLOAT,PINT,PINT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16,A17,A18,A19)
Functions
	PROTOCCALLSFSUB1 (QELEP_ALPHA, qelep_alpha, PFLOAT)#define QELEP_ALPHA(A1) PROTOCCALLSFSUB5(BANK_ALPHA, bank_alpha, STRING, PINT, PINT, PINT, PINT)#define BANK_ALPHA(A1, A2, A3, A4, A5) PROTOCCALLSFSUB5(BANK_ROW, bank_row, PSTRING, PINT, PINT, PINT, PINT)#define BANK_ROW(A1, A2, A3, A4, A5) PROTOCCALLSFSUB1(ALPHA_PARAM, alpha_param, PINT)#define ALPHA_PARAM(A1) PROTOCCALLSFSUB2(GETKEFOTY, getkefoty, PINT, PINT)#define GETKEFOTY(A1, A2) PROTOCCALLSFSUB2(GETKEFOLT, getkefolt, PINT, PINT)#define GETKEFOLT(A1, A2) PROTOCCALLSFSUB1(CHECK_BOS, check_bos, PINT)#define CHECK_BOS(A1) PROTOCCALLSFSUB2(ABRUEV, abruev, PINT, PINT)#define ABRUEV(A1, A2) PROTOCCALLSFSUB2(QMEVNT, qmevnt, PINT, PINT)#define QMEVNT(A1, A2) PROTOCCALLSFSUB1(QMRDSB, qmrdsb, PINT)#define QMRDSB(A1) PROTOCCALLSFSUB3(ABRSEL, abrsel, PSTRING, PSTRING, PINT)#define ABRSEL(A1, A2, A3) PROTOCCALLSFSUB3(ABRSEL_GB, abrsel_gb, PSTRING, PSTRING, PINT)#define ABRSEL_GB(A1, A2, A3) PROTOCCALLSFSUB0(QMREAD, qmread)#define QMREAD() PROTOCCALLSFSUB2(CALPHA, calpha, PSTRING, PSTRING)#define CALPHA(A1, A2) PROTOCCALLSFSUB3(AUNPCK, aunpck, PSTRING, PSTRING, PINT)#define AUNPCK(A1, A2, A3) PROTOCCALLSFSUB3(READ_EVENT2, read_event2, PINT, PINT, PINT)#define READ_EVENT2(A1, A2, A3) PROTOCCALLSFSUB2(SET_RUNEV, set_runev, PINT, PINT)#define SET_RUNEV(A1, A2) PROTOCCALLSFSUB1(CLEAN_BOS, clean_bos, STRING)#define CLEAN_BOS(A1) PROTOCCALLSFSUB0(CLOSE_RUN, close_run)#define CLOSE_RUN() PROTOCCALLSFSUB1(TIMED, timed, PINT)#define TIMED(A1) PROTOCCALLSFFUN1(INT, NAMIND, namind, PSTRING)#define NAMIND(A1) PROTOCCALLSFSUB14(F_QIPBTAG, f_qipbtag, PINT, PINT, PINT, FLOATV, FLOATV, FLOATV, FLOATV, INTV, FLOATV, INTV, INTV, FLOATV, FLOATV, PFLOAT)#define F_QIPBTAG(A1, A2, A3, A4, A5, A6, A7, A8, A9, A10, A11, A12, A13, A14)#define NMAX#define NMFRF#define NMVFRF typedef struct
	COMMON_BLOCK_DEF (FCB_DEF, FCB)
	PROTOCCALLSFFUN0 (INT, W_YFMVTR, w_yfmvtr)#define W_YFMVTR() typedef struct
	COMMON_BLOCK_DEF (VFMCB_DEF, VFMCB)
Variables
	FCB_DEF
	VFMCB_DEF