gibuu is hosted by Hepforge, IPPP Durham
GiBUU

TABLE OF CONTENTS


/NievesHadronTensor [ Modules ]

[ Top ] [ Modules ]

NAME

module NievesHadronTensor

PURPOSE

This module implements the hadronic tensor for 1-pion production.


NievesHadronTensor/DeltaPole [ Global module-variables ]

[ Top ] [ NievesHadronTensor ] [ Global module-variables ]

SOURCE

  logical, save :: DeltaPole=.true.

PURPOSE


NievesHadronTensor/crossedDelta [ Global module-variables ]

[ Top ] [ NievesHadronTensor ] [ Global module-variables ]

SOURCE

  logical, save :: crossedDelta=.true.

PURPOSE


NievesHadronTensor/nucleonPole [ Global module-variables ]

[ Top ] [ NievesHadronTensor ] [ Global module-variables ]

SOURCE

  logical, save :: nucleonPole=.true.

PURPOSE


NievesHadronTensor/crossedNucleonPole [ Global module-variables ]

[ Top ] [ NievesHadronTensor ] [ Global module-variables ]

SOURCE

  logical, save :: crossedNucleonPole=.true.

PURPOSE


NievesHadronTensor/contactTerm [ Global module-variables ]

[ Top ] [ NievesHadronTensor ] [ Global module-variables ]

SOURCE

  logical, save :: contactTerm=.true.

PURPOSE


NievesHadronTensor/pionPole [ Global module-variables ]

[ Top ] [ NievesHadronTensor ] [ Global module-variables ]

SOURCE

  logical, save :: pionPole=.true.

PURPOSE


NievesHadronTensor/pionInFlight [ Global module-variables ]

[ Top ] [ NievesHadronTensor ] [ Global module-variables ]

SOURCE

  logical, save :: pionInFlight=.true.

PURPOSE


NievesHadronTensor/debug_HNV_hadrTens [ Global module-variables ]

[ Top ] [ NievesHadronTensor ] [ Global module-variables ]

SOURCE

  integer, parameter :: debug_HNV_hadrTens=1

PURPOSE


NievesHadronTensor/nl_NievesHadronTensor [ Namelists ]

[ Top ] [ NievesHadronTensor ] [ Namelists ]

NAME

NAMELIST nl_NievesHadronTensor

PURPOSE

Includes the switches:


NievesHadronTensor/NievesHadronTensor_1pi [ Functions ]

[ Top ] [ NievesHadronTensor ] [ Functions ]

NAME

function NievesHadronTensor_1pi(process_ID,q,p_in, position, charge_in, p_out,

                                                charge_out, pion_charge_out, matrix) result(success)

PURPOSE

This function returns the hadronic tensor for 1-pion production (that is: lepton A --> lepton nucleon pion A-1) by a current type defined by "process" (e.g. CC, NC, em).

INPUTS

  • integer,intent(in) :: process -- type of the process (EM, CC, NC)
  • real, dimension(0:3), intent(in) :: q -- momentum transferred
  • real, dimension(0:3), intent(in) :: p_in -- 4-momentum of incoming nucleon
  • real, dimension(1:3), intent(in) :: position -- position --- is used for in-medium propagator
  • real,intent(in) :: charge_in -- charge of incoming nucleon
  • real, dimension(0:3),intent(in) :: p_out -- 4-momentum of outgoing nucleon
  • real,intent(in) :: charge_out -- charge of outgoing nucleon
  • real,intent(in) :: pion_charge_out -- charge of outgoing pion

OUTPUT

  • complex, dimension(0:3,0:3) :: matrix -- H^mu nu
  • logical, intent(out) :: success -- true if there is a coupling strength to the process;
  • false if there is no coupling, therefore H^mu nu=0

NOTES

  • We use the Peskin notation where the spin sum(u(p) ubar(p))=slashed(p)+m !!