JSFReadParton

class JSFReadParton : public JSFSpring

    public:

                      JSFReadParton(const char* name = "JSFReadParton", const char* title = "Read Parton data from a file")
                      JSFReadParton(const JSFReadParton&)
              virtual ~JSFReadParton()
       virtual Bool_t BeginRun(Int_t run)
       static TClass* Class()
       virtual Bool_t EndRun()
              Char_t* GetDataFileName()
                Int_t GetType()
                Int_t GetUnit()
      virtual TClass* IsA() const
       virtual Bool_t Process(Int_t event)
                 void SetDataFileName(Char_t* name)
                 void SetType(Int_t type)
                 void SetUnit(Int_t nunit)
         virtual void ShowMembers(TMemberInspector& insp, char* parent)
         virtual void Streamer(TBuffer& b)
                 void StreamerNVirtual(TBuffer& b)

Data Members

    protected:

       Int_t fUnit               Fortran logical unit number to output SIMDST data.
      Char_t fDataFileName[256]  ! File name of output file.
       Int_t fType               Input data type (0=binary, 1=asc)

Class Description

 JSFReadPaarton

 Read Parton data from a file, and store them into JSFSpringParton class
 for subsequent hadronization by JSFHadronize.
 Here parton means quarks, leptons and EW gauge bosons.
 Input data could be Fortran binary file or ASC text file.
 In case of a Fortran binary file, format of each event data is as follows:

 INTEGER*4 NENDIAN
 INTEGER*4 NVERS
 INTEGER*4 NEVENT
 INTEGER*4 NPART
 INTEGER*4 IDAT(7,NPART)
 REAL*4    RDAT(6,NPART)

   IU=1
   NENDIAN=1296651082
   NVERS  =101
   WRITE(IU) NENDIAN, NVERS, NEVENT, NPART,
  .          ((IDAT(I,J),I=1,7),J=1,NPART),
  .          ((RDAT(I,J),I=1,6),J=1,NPART)

   where
    NEVENT : Event number
    NPART  : Number of partons
    IDAT(1,i) : Particle ID a la PDG of i-th parton
        (2,i) : Number of child particles
        (3,i) : Serial number of 1st child particle.
        (4,i) : Serial number of parent particle.
        (5,i) : helicity of parton.
        (6,i) : Color singlet group ID.
        (7,i) : Shower infomation ( 100*Shower level + Shower pair ID)
      ( Serial number is a number from 1 to NPART )
    RDAT(1,i) : Mass of i-th parton (GeV)
        (2,i) : Charge
        (3,i) : Px (GeV)
        (4,i) : Py (GeV)
        (5,i) : Pz (GeV)
        (6,i) : E(GeV)

   If RDAT(6,i) is negative, it is calculated by this class using mass and P.

   For more information about IDAT, please see
    How to prepare Psring:Parton_List .

   In case of an ASC File, input data must be prepared so that they can
   be read by following fortran statements.

     READ(IU,*,END=300) NVERS, NEVENT, NPART
     DO 200 J = 1, NPART
       READ(IU,*) (IDAT(I,J),I=1,7),(RDAT(K,J),K=1,6)
 200 CONTINUE

 300 continue  ! end of data

   Comment lines can be inserted anywhere.  It is identified by a character "#"
   at first column.

$Id: JSFReadParton.cxx,v 1.2 1999/07/28 06:09:14 miyamoto Exp $

Inline Functions

                Int_t GetUnit()
                Int_t GetType()
              Char_t* GetDataFileName()
                 void SetUnit(Int_t nunit)
                 void SetType(Int_t type)
                 void SetDataFileName(Char_t* name)
              TClass* Class()
              TClass* IsA() const
                 void ShowMembers(TMemberInspector& insp, char* parent)
                 void Streamer(TBuffer& b)
                 void StreamerNVirtual(TBuffer& b)
        JSFReadParton JSFReadParton(const JSFReadParton&)