12 PTRTYPE lcclucreate() ;
13 int lccludelete( PTRTYPE clu ) ;
15 int lccluid( PTRTYPE clu ) ;
16 int lcclugettype( PTRTYPE clu ) ;
19 float lcclugetenergy( PTRTYPE clu ) ;
20 float lcclugetenergyerr( PTRTYPE clu ) ;
21 int lcclugetposition( PTRTYPE clu,
float* pos ) ;
22 int lcclugetpositionerror( PTRTYPE clu,
float* poserr ) ;
23 float lcclugetitheta( PTRTYPE clu ) ;
24 float lcclugetiphi( PTRTYPE clu ) ;
25 int lcclugetdirectionerror( PTRTYPE clu,
float* direrr ) ;
30 PTRTYPE lcclugetshape( PTRTYPE clu ) ;
32 PTRTYPE lcclugetparticleids( PTRTYPE clu ) ;
33 PTRTYPE lcclugetclusters( PTRTYPE clu ) ;
34 PTRTYPE lcclugetcalorimeterhits( PTRTYPE clu ) ;
35 PTRTYPE lcclugetsubdetectorenergies( PTRTYPE clu ) ;
37 int lcclusettypebit( PTRTYPE clu,
int index,
int val ) ;
38 int lcclusetenergy( PTRTYPE clu,
float energy ) ;
39 int lcclusetenergyerr( PTRTYPE clu,
float enerr ) ;
40 int lcclusetposition( PTRTYPE clu,
float* refpoint ) ;
41 int lcclusetpositionerror( PTRTYPE clu,
float* poserr ) ;
42 int lcclusetitheta( PTRTYPE clu,
float theta ) ;
43 int lcclusetiphi( PTRTYPE clu,
float phi ) ;
44 int lcclusetdirectionerror( PTRTYPE clu,
float* direrr ) ;
45 int lcclusetshape( PTRTYPE clu, PTRTYPE pshapevec ) ;
46 int lccluaddparticleid( PTRTYPE clu, PTRTYPE pid ) ;
47 int lccluaddcluster( PTRTYPE clu, PTRTYPE clus ) ;
48 int lccluaddhit( PTRTYPE clu, PTRTYPE calohit,
float weigth ) ;
52 int lcclugethitcontributions( PTRTYPE clu,
float* ener,
int* nener ) ;
53 int lcclusetsubdetectorenergies( PTRTYPE cluster,
float* floatv,
const int nfloatv ) ;
58 FCALLSCFUN0(CFORTRANPNTR, lcclucreate, LCCLUCREATE, lcclucreate )
59 FCALLSCFUN1(INT, lccludelete, LCCLUDELETE, lccludelete, CFORTRANPNTR )
61 FCALLSCFUN1(INT, lccluid, LCCLUID, lccluid, CFORTRANPNTR)
62 FCALLSCFUN1(INT, lcclugettype, LCCLUGETTYPE, lcclugettype, CFORTRANPNTR)
64 FCALLSCFUN1(FLOAT, lcclugetenergy, LCCLUGETENERGY, lcclugetenergy, CFORTRANPNTR)
65 FCALLSCFUN1(FLOAT, lcclugetenergyerr, LCCLUGETENERGYERR, lcclugetenergyerr, CFORTRANPNTR)
66 FCALLSCFUN2(INT, lcclugetposition, LCCLUGETPOSITION, lcclugetposition, CFORTRANPNTR, FLOATV)
67 FCALLSCFUN2(INT, lcclugetpositionerror, LCCLUGETPOSITIONERROR, lcclugetpositionerror, CFORTRANPNTR, FLOATV)
68 FCALLSCFUN1(FLOAT, lcclugetitheta, LCCLUGETITHETA, lcclugetitheta, CFORTRANPNTR)
69 FCALLSCFUN1(FLOAT, lcclugetiphi, LCCLUGETIPHI, lcclugetiphi, CFORTRANPNTR)
70 FCALLSCFUN2(INT, lcclugetdirectionerror, LCCLUGETDIRECTIONERROR, lcclugetdirectionerror, CFORTRANPNTR, FLOATV)
71 FCALLSCFUN1(CFORTRANPNTR, lcclugetshape, LCCLUGETSHAPE, lcclugetshape, CFORTRANPNTR )
72 FCALLSCFUN1(CFORTRANPNTR, lcclugetparticleids, LCCLUGETPARTICLEIDS, lcclugetparticleids, CFORTRANPNTR )
74 FCALLSCFUN1(CFORTRANPNTR, lcclugetclusters, LCCLUGETCLUSTERS, lcclugetclusters, CFORTRANPNTR)
75 FCALLSCFUN1(CFORTRANPNTR, lcclugetcalorimeterhits, LCCLUGETCALORIMETERHITS, lcclugetcalorimeterhits, CFORTRANPNTR)
76 FCALLSCFUN1(CFORTRANPNTR, lcclugetsubdetectorenergies, LCCLUGETSUBDETECTORENERGIES, lcclugetsubdetectorenergies, CFORTRANPNTR)
77 FCALLSCFUN3(INT, lcclugethitcontributions, LCCLUGETHITCONTRIBUTIONS, lcclugethitcontributions, CFORTRANPNTR, FLOATV, INTV)
79 FCALLSCFUN3(INT, lcclusettypebit, LCCLUSETTYPEBIT, lcclusettypebit, CFORTRANPNTR, INT, INT)
80 FCALLSCFUN2(INT, lcclusetenergy, LCCLUSETENERGY, lcclusetenergy, CFORTRANPNTR, FLOAT)
81 FCALLSCFUN2(INT, lcclusetenergyerr, LCCLUSETENERGYERR, lcclusetenergyerr, CFORTRANPNTR, FLOAT)
82 FCALLSCFUN2(INT, lcclusetposition, LCCLUSETPOSITION, lcclusetposition, CFORTRANPNTR, FLOATV)
83 FCALLSCFUN2(INT, lcclusetpositionerror, LCCLUSETPOSITIONERROR, lcclusetpositionerror, CFORTRANPNTR, FLOATV)
84 FCALLSCFUN2(INT, lcclusetitheta, LCCLUSETITHETA, lcclusetitheta, CFORTRANPNTR, FLOAT)
85 FCALLSCFUN2(INT, lcclusetiphi, LCCLUSETIPHI, lcclusetiphi, CFORTRANPNTR, FLOAT)
86 FCALLSCFUN2(INT, lcclusetdirectionerror, LCCLUSETDIRECTIONERROR, lcclusetdirectionerror, CFORTRANPNTR, FLOATV)
87 FCALLSCFUN2(INT, lcclusetshape, LCCLUSETSHAPE, lcclusetshape, CFORTRANPNTR, CFORTRANPNTR )
92 FCALLSCFUN2(INT, lccluaddparticleid, LCCLUADDPARTICLEID, lccluaddparticleid, CFORTRANPNTR, CFORTRANPNTR)
93 FCALLSCFUN2(INT, lccluaddcluster, LCCLUADDCLUSTER, lccluaddcluster, CFORTRANPNTR, CFORTRANPNTR)
94 FCALLSCFUN3(INT, lccluaddhit, LCCLUADDHIT, lccluaddhit, CFORTRANPNTR, CFORTRANPNTR, FLOAT)
95 FCALLSCFUN3(INT, lcclusetsubdetectorenergies, LCCLUSETSUBDETECTORENERGIES, lcclusetsubdetectorenergies, CFORTRANPNTR, FLOATV, INT )